diff options
Diffstat (limited to 'Game/Code/Classes/UFiles.pas')
-rw-r--r-- | Game/Code/Classes/UFiles.pas | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/Game/Code/Classes/UFiles.pas b/Game/Code/Classes/UFiles.pas index def74c70..8d3a1c42 100644 --- a/Game/Code/Classes/UFiles.pas +++ b/Game/Code/Classes/UFiles.pas @@ -38,17 +38,17 @@ uses TextGL, //-------------------- procedure ResetSingTemp; var - Pet: integer; + Count: integer; begin SetLength(Lines, Length(Player)); - for Pet := 0 to High(Player) do begin - SetLength(Lines[Pet].Line, 1); - SetLength(Lines[Pet].Line[0].Note, 0); - Lines[Pet].Line[0].Lyric := ''; - Lines[Pet].Line[0].LyricWidth := 0; - Player[pet].Score := 0; - Player[pet].IlNut := 0; - Player[pet].HighNote := -1; + for Count := 0 to High(Player) do begin + SetLength(Lines[Count].Line, 1); + SetLength(Lines[Count].Line[0].Note, 0); + Lines[Count].Line[0].Lyric := ''; + Lines[Count].Line[0].LyricWidth := 0; + Player[Count].Score := 0; + Player[Count].IlNut := 0; + Player[Count].HighNote := -1; end; (* FIXME |