Subversion Repositories jumper

Rev

Rev 21 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 21 Rev 25
Line 53... Line 53...
53
end;
53
end;
54
 
54
 
55
function TFinishForm.Execute(LevelName: String; Score, StonesTotal, StonesRemoved, Seconds: Integer; GoalStatus: TGoalStatus; JumpHistory: TStringList): Integer;
55
function TFinishForm.Execute(LevelName: String; Score, StonesTotal, StonesRemoved, Seconds: Integer; GoalStatus: TGoalStatus; JumpHistory: TStringList): Integer;
56
resourcestring
56
resourcestring
57
  LNG_SCORE = 'Score: %d';
57
  LNG_SCORE = 'Score: %d';
58
  LNG_REMAINING = 'Remaining stones: %d (%f%%)';
58
  LNG_REMAINING = 'Remaining stones: %d (%f%%)'; // Jumping stone not counted!
59
  LNG_TIME_SECONDS = 'Time: %d seconds';
59
  LNG_TIME_SECONDS = 'Time: %d seconds';
60
  LNG_POINTS_PER_MINUTE = '%d points per minute';
60
  LNG_POINTS_PER_MINUTE = '%d points per minute';
61
  LNG_GOAL_RED = 'Red stone in target field (%d points)';
61
  LNG_GOAL_RED = 'Red stone in target field (%d points)';
62
  LNG_GOAL_YELLOW = 'Yellow stone in target field (%d points)';
62
  LNG_GOAL_YELLOW = 'Yellow stone in target field (%d points)';
63
  LNG_GOAL_GREEN = 'Green stone in target field (%d points)';
63
  LNG_GOAL_GREEN = 'Green stone in target field (%d points)';