From e80ec1918ada3406d9e7cdd6a27b259dfa3bfc3d Mon Sep 17 00:00:00 2001
From: f1fth_freed0m <f1fth_freed0m@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Thu, 6 Mar 2008 01:26:21 +0000
Subject: Translated so Variable Names Koniec  to End_ Wartosc to NoteType
 Dlugosc to Lenght Ton	to Tone Tekst   to Text

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@915 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Classes/USong.pas | 30 +++++++++++++++---------------
 1 file changed, 15 insertions(+), 15 deletions(-)

(limited to 'Game/Code/Classes/USong.pas')

diff --git a/Game/Code/Classes/USong.pas b/Game/Code/Classes/USong.pas
index c7d11374..5db250c5 100644
--- a/Game/Code/Classes/USong.pas
+++ b/Game/Code/Classes/USong.pas
@@ -181,7 +181,7 @@ begin
   MultBPM           := 4; // multiply beat-count of note by 4
   Mult              := 1; // accuracy of measurement of note
   Base[0]           := 100; // high number
-  Lines[0].Wartosc := 0;
+  Lines[0].NoteType := 0;
   self.Relative     := false;
   Rel[0]            := 0;
   CP                := 0;
@@ -295,7 +295,7 @@ begin
         Lines[CP].Line[Lines[CP].High].TotalNotes := 0;
         for I := low(Lines[CP].Line[Lines[CP].High].Note) to high(Lines[CP].Line[Lines[CP].High].Note) do
         begin
-         Lines[CP].Line[Lines[CP].High].TotalNotes := Lines[CP].Line[Lines[CP].High].TotalNotes + Lines[CP].Line[Lines[CP].High].Note[I].Dlugosc * Lines[CP].Line[Lines[CP].High].Note[I].Wartosc;
+         Lines[CP].Line[Lines[CP].High].TotalNotes := Lines[CP].Line[Lines[CP].High].TotalNotes + Lines[CP].Line[Lines[CP].High].Note[I].Lenght * Lines[CP].Line[Lines[CP].High].Note[I].NoteType;
         end;
         //Total Notes Patch End
       end else begin
@@ -306,7 +306,7 @@ begin
           Lines[Pet].Line[Lines[Pet].High].TotalNotes := 0;
           for I := low(Lines[Pet].Line[Lines[Pet].High].Note) to high(Lines[Pet].Line[Lines[Pet].High].Note) do
           begin
-            Lines[Pet].Line[Lines[Pet].High].TotalNotes := Lines[Pet].Line[Lines[Pet].High].TotalNotes + Lines[Pet].Line[Lines[Pet].High].Note[I].Dlugosc * Lines[Pet].Line[Lines[Pet].High].Note[I].Wartosc;
+            Lines[Pet].Line[Lines[Pet].High].TotalNotes := Lines[Pet].Line[Lines[Pet].High].TotalNotes + Lines[Pet].Line[Lines[Pet].High].Note[I].Lenght * Lines[Pet].Line[Lines[Pet].High].Note[I].NoteType;
           end;
           //Total Notes Patch End
         end;
@@ -592,29 +592,29 @@ begin
 //        Start := Note[HighNote].Start;
     end;
 
-    Note[HighNote].Dlugosc := DurationP;
-    Melody.DlugoscNut := Melody.DlugoscNut + Note[HighNote].Dlugosc;
+    Note[HighNote].Lenght := DurationP;
+    Melody.DlugoscNut := Melody.DlugoscNut + Note[HighNote].Lenght;
 
     // back to the normal system with normal, golden and now freestyle notes
     case TypeP of
-      'F':  Note[HighNote].Wartosc := 0;
-      ':':  Note[HighNote].Wartosc := 1;
-      '*':  Note[HighNote].Wartosc := 2;
+      'F':  Note[HighNote].NoteType := 0;
+      ':':  Note[HighNote].NoteType := 1;
+      '*':  Note[HighNote].NoteType := 2;
     end;
 
-    Lines[NrCzesci].Wartosc := Lines[NrCzesci].Wartosc + Note[HighNote].Dlugosc * Note[HighNote].Wartosc;
+    Lines[NrCzesci].NoteType := Lines[NrCzesci].NoteType + Note[HighNote].Lenght * Note[HighNote].NoteType;
 
-    Note[HighNote].Ton := NoteP;
-    if Note[HighNote].Ton < Base[NrCzesci] then Base[NrCzesci] := Note[HighNote].Ton;
+    Note[HighNote].Tone := NoteP;
+    if Note[HighNote].Tone < Base[NrCzesci] then Base[NrCzesci] := Note[HighNote].Tone;
     Note[HighNote].TonGamy := Note[HighNote].TonGamy mod 12;
 
-    Note[HighNote].Tekst := Copy(LyricS, 2, 100);
-    Lyric := Lyric + Note[HighNote].Tekst;
+    Note[HighNote].Text := Copy(LyricS, 2, 100);
+    Lyric := Lyric + Note[HighNote].Text;
 
     if TypeP = 'F' then
       Note[HighNote].FreeStyle := true;
 
-    Koniec := Note[HighNote].Start + Note[HighNote].Dlugosc;
+    End_ := Note[HighNote].Start + Note[HighNote].Lenght;
   end; // with
 end;
 
@@ -631,7 +631,7 @@ begin
   Lines[NrCzesciP].Line[Lines[NrCzesciP].High].TotalNotes := 0;
   for I := low(Lines[NrCzesciP].Line[Lines[NrCzesciP].High].Note) to high(Lines[NrCzesciP].Line[Lines[NrCzesciP].High].Note) do
   begin
-    Lines[NrCzesciP].Line[Lines[NrCzesciP].High].TotalNotes := Lines[NrCzesciP].Line[Lines[NrCzesciP].High].TotalNotes + Lines[NrCzesciP].Line[Lines[NrCzesciP].High].Note[I].Dlugosc * Lines[NrCzesciP].Line[Lines[NrCzesciP].High].Note[I].Wartosc;
+    Lines[NrCzesciP].Line[Lines[NrCzesciP].High].TotalNotes := Lines[NrCzesciP].Line[Lines[NrCzesciP].High].TotalNotes + Lines[NrCzesciP].Line[Lines[NrCzesciP].High].Note[I].Lenght * Lines[NrCzesciP].Line[Lines[NrCzesciP].High].Note[I].NoteType;
   end;
   //Total Notes Patch End
 
-- 
cgit v1.2.3