translated some polish code

AddCzesc -> AddLine
NrCzesc -> NrLine
NrCzesci -> NrLines
Pet -> Count
SingDrawCzesc -> SingDrawLine
SingDrawPlayerCzesc -> SingDrawPlayerLine
SingDrawPlayerBGCzesc -> SingDrawPlayerBGLine
EditDrawCzesc -> EditDrawLine
Tekst -> Text

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1020 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 6 insertions, 6 deletions

diff --git a/Game/Code/Classes/ULyrics_bak.pas b/Game/Code/Classes/ULyrics_bak.pas
index e44800d6..c4ce0e1b 100644
--- a/Game/Code/Classes/ULyrics_bak.pas
+++ b/Game/Code/Classes/ULyrics_bak.pas
@@ -86,7 +86,7 @@ type
       constructor Create;
       
       procedure AddWord(Text: string);
-      procedure AddCzesc(NrCzesci: integer);
+      procedure AddLine(NrLine: integer);
 
       function SelectedLetter: integer;  // LCD
       function SelectedLength: integer;  // LCD
@@ -259,15 +259,15 @@ begin
   Refresh;
 end;
 
-procedure TLyric.AddCzesc(NrCzesci: integer);
+procedure TLyric.AddLine(NrLine: integer);
 var
   N:    integer;
 begin
   Clear;
-  for N := 0 to Lines[0].Line[NrCzesci].HighNote do begin
-    Italic := Lines[0].Line[NrCzesci].Note[N].NoteType = ntFreestyle;
-    AddWord(Lines[0].Line[NrCzesci].Note[N].Text);
-    Text := Text + Lines[0].Line[NrCzesci].Note[N].Text;
+  for N := 0 to Lines[0].Line[NrLine].HighNote do begin
+    Italic := Lines[0].Line[NrLine].Note[N].NoteType = ntFreestyle;
+    AddWord(Lines[0].Line[NrLine].Note[N].Text);
+    Text := Text + Lines[0].Line[NrLine].Note[N].Text;
   end;
   Selected := -1;
 end;