lenght -> length

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

1 files changed, 14 insertions, 14 deletions

diff --git a/Game/Code/Classes/UMain.pas b/Game/Code/Classes/UMain.pas
index fd0c9eb5..3cf2f7d0 100644
--- a/Game/Code/Classes/UMain.pas
+++ b/Game/Code/Classes/UMain.pas
@@ -59,7 +59,7 @@ type
     IlNut:     integer;

     Note:     array of record

       Start:     integer;

-      Lenght:    integer;

+      Length:    integer;

       Detekt:    real;     // accurate place, detected in the note

       Tone:      real;

       Perfect:   boolean;  // true if the note matches the original one, lit the star

@@ -747,9 +747,9 @@ begin
   for N := 0 to Lines[0].Line[Lines[0].Current].HighNote do

   begin

     if (Lines[0].Line[Lines[0].Current].Note[N].Start <= LineState.MidBeat) and

-       (Lines[0].Line[Lines[0].Current].Note[N].Start + Lines[0].Line[Lines[0].Current].Note[N].Lenght >= LineState.MidBeat) then

+       (Lines[0].Line[Lines[0].Current].Note[N].Start + Lines[0].Line[Lines[0].Current].Note[N].Length >= LineState.MidBeat) then

     begin

-      Done := (LineState.MidBeat - Lines[0].Line[Lines[0].Current].Note[N].Start) / (Lines[0].Line[Lines[0].Current].Note[N].Lenght);

+      Done := (LineState.MidBeat - Lines[0].Line[Lines[0].Current].Note[N].Start) / (Lines[0].Line[Lines[0].Current].Note[N].Length);

     end;

   end;

 

@@ -758,7 +758,7 @@ begin
   // wylacza ostatnia nute po przejsciu

   {// todo: Lyrics

   if (Ini.LyricsEffect = 1) and (Done = 1) and

-    (LineState.MidBeat > Lines[0].Line[Lines[0].Current].Note[N].Start + Lines[0].Line[Lines[0].Current].Note[N].Lenght)

+    (LineState.MidBeat > Lines[0].Line[Lines[0].Current].Note[N].Start + Lines[0].Line[Lines[0].Current].Note[N].Length)

     then Sender.LyricMain.Selected := -1;

 

   if Done > 1 then Done := 1;

@@ -943,9 +943,9 @@ begin
       for Count := 0 to Lines[0].Line[S].HighNote do

       begin

         if ((Lines[0].Line[S].Note[Count].Start <= LineState.CurrentBeatD)

-          and (Lines[0].Line[S].Note[Count].Start + Lines[0].Line[S].Note[Count].Lenght - 1 >= LineState.CurrentBeatD))

+          and (Lines[0].Line[S].Note[Count].Start + Lines[0].Line[S].Note[Count].Length - 1 >= LineState.CurrentBeatD))

           and (not Lines[0].Line[S].Note[Count].FreeStyle) // but don't allow when it's FreeStyle note

-          and (Lines[0].Line[S].Note[Count].Lenght > 0) then // and make sure the note lenghts is at least 1

+          and (Lines[0].Line[S].Note[Count].Length > 0) then // and make sure the note lengths is at least 1

         begin

           SDet := S;

           Mozna := true;

@@ -967,7 +967,7 @@ begin
       begin

         if (Lines[0].Line[S].Note[Count].Start <= LineState.OldBeatD+1) and

            (Lines[0].Line[S].Note[Count].Start +

-            Lines[0].Line[S].Note[Count].Lenght > LineState.OldBeatD+1) then

+            Lines[0].Line[S].Note[Count].Length > LineState.OldBeatD+1) then

         begin

           // to robi, tylko dla pary nut (oryginalnej i gracza)

 

@@ -1027,15 +1027,15 @@ begin
       if S = SMax then

       begin

         New := true;

-        // jezeli ostatnia ma ten sam Tone

+        // if last has the same tone

         if (Player[CP].IlNut > 0 ) and

            (Player[CP].Note[Player[CP].HighNote].Tone = AudioInputProcessor.Sound[CP].Tone) and

-           (Player[CP].Note[Player[CP].HighNote].Start + Player[CP].Note[Player[CP].HighNote].Lenght = LineState.CurrentBeatD) then

+           (Player[CP].Note[Player[CP].HighNote].Start + Player[CP].Note[Player[CP].HighNote].Length = LineState.CurrentBeatD) then

         begin

           New := false;

         end;

 

-        // jezeli jest jakas nowa nuta na sprawdzanym beacie

+        // if is not as new note to control "beacie" (TODO: translate polish "beacie")

         for Count := 0 to Lines[0].Line[S].HighNote do

         begin

           if (Lines[0].Line[S].Note[Count].Start = LineState.CurrentBeatD) then

@@ -1050,7 +1050,7 @@ begin
           Player[CP].HighNote := Player[CP].HighNote + 1;

           SetLength(Player[CP].Note, Player[CP].IlNut);

           Player[CP].Note[Player[CP].HighNote].Start   := LineState.CurrentBeatD;

-          Player[CP].Note[Player[CP].HighNote].Lenght := 1;

+          Player[CP].Note[Player[CP].HighNote].Length := 1;

           Player[CP].Note[Player[CP].HighNote].Tone     := AudioInputProcessor.Sound[CP].Tone; // Ton || TonDokl

           Player[CP].Note[Player[CP].HighNote].Detekt  := LineState.MidBeat;

 

@@ -1062,14 +1062,14 @@ begin
         else

         begin

           // przedluzenie nuty

-          Player[CP].Note[Player[CP].HighNote].Lenght := Player[CP].Note[Player[CP].HighNote].Lenght + 1;

+          Player[CP].Note[Player[CP].HighNote].Length := Player[CP].Note[Player[CP].HighNote].Length + 1;

         end;

 

         // check for perfect note and then lit the star (on Draw)

         for Count := 0 to Lines[0].Line[S].HighNote do

         begin

           if (Lines[0].Line[S].Note[Count].Start = Player[CP].Note[Player[CP].HighNote].Start) and

-             (Lines[0].Line[S].Note[Count].Lenght = Player[CP].Note[Player[CP].HighNote].Lenght) and

+             (Lines[0].Line[S].Note[Count].Length = Player[CP].Note[Player[CP].HighNote].Length) and

              (Lines[0].Line[S].Note[Count].Tone = Player[CP].Note[Player[CP].HighNote].Tone) then

           begin

             Player[CP].Note[Player[CP].HighNote].Perfect := true;

@@ -1085,7 +1085,7 @@ begin
   if (sDet >= low(Lines[0].Line)) and (sDet <= high(Lines[0].Line)) then

   begin

     if assigned( Sender ) and

-       ((Lines[0].Line[SDet].Note[Lines[0].Line[SDet].HighNote].Start + Lines[0].Line[SDet].Note[Lines[0].Line[SDet].HighNote].Lenght - 1) = LineState.CurrentBeatD) then

+       ((Lines[0].Line[SDet].Note[Lines[0].Line[SDet].HighNote].Start + Lines[0].Line[SDet].Note[Lines[0].Line[SDet].HighNote].Length - 1) = LineState.CurrentBeatD) then

     begin

       Sender.onSentenceEnd(sDet);

     end;