From 36e04782552fde9e26710f29f453d574b2ee9c0b Mon Sep 17 00:00:00 2001
From: f1fth_freed0m <f1fth_freed0m@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Thu, 6 Mar 2008 02:16:07 +0000
Subject: Translated Some Variables TonGamy    to ToneGamus DlugoscNut to
 NoteLenght Akt        to Current AktBeat    to CurrentBeat AktBeatD   to
 CurrentBeatD AktBeatC   to CurrentBeatC OldCzesc   to OldLine Teraz      to
 CurrentTime Razem      to TotalTime TCzas      to TLineState Czas       to
 LineState

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

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

diff --git a/Game/Code/Classes/UMusic.pas b/Game/Code/Classes/UMusic.pas
index 90e78dd7..2ffe13ce 100644
--- a/Game/Code/Classes/UMusic.pas
+++ b/Game/Code/Classes/UMusic.pas
@@ -17,10 +17,10 @@ type
   //http://paste.ubuntu-nl.org/51892/
 
   TMelody = record
-    Path:   string;
-    Start:  integer;        // start of song in ms
-    IlNut:  integer;        // (TODO: Il = tone, Nut(a) = Note)
-    DlugoscNut:   integer;  // (TODO: Dlugosc = length, Nut(a) = Note)
+    Path:       string;
+    Start:      integer;      // start of song in ms
+    IlNut:      integer;      // (TODO: Il = tone, Nut(a) = Note)
+    NoteLenght: integer;
   end;
 
   PLine = ^TLine;
@@ -29,7 +29,7 @@ type
     StartNote:  integer;
     Lyric:      string;
     LyricWidth: real;
-    End_:     integer;
+    End_:       integer;
     BaseNote:   integer;
     HighNote:   integer;
     IlNut:      integer;      // (TODO: Il = tone, Nut(a) = Note)
@@ -37,52 +37,52 @@ type
     Note:     array of record
       Color:      integer;
       Start:      integer;
-      Lenght:    integer;
-      Tone:        integer;    // full range tone
-      TonGamy:    integer;    // tone unified to one octave (TODO: rename to something meaningful, ToneGamus)
-      Text:      string;     // (TODO: rename to Text)
+      Lenght:     integer;
+      Tone:       integer;    // full range tone
+      ToneGamus:  integer;    // tone unified to one octave
+      Text:       string;
       FreeStyle:  boolean;
-      NoteType:    integer;    // normal-note: 1, golden-note: 2 (TODO: wartosc=value, rename to Type_ or Kind?)
+      NoteType:   integer;    // normal-note: 1, golden-note: 2
     end;
   end;
-  ALine = array of TLine; // (TODO: rename to TLineArray)
+  ALine = array of TLine;     // (TODO: rename to TLineArray)
 
   // (TCzesci = TSentences)  TCzesci changed to TLines because TSentences exist elseware in incompatible form
   TLines = record
-    Akt:        integer;        // for drawing of current line (Akt = Current)
+    Current:    integer;      // for drawing of current line
     High:       integer;
-    Ilosc:      integer;        // (TODO: Ilosc = Number/Count)
+    Ilosc:      integer;      // (TODO: Ilosc = Number/Count)
     Resolution: integer;
     NotesGAP:   integer;
-    NoteType:    integer;        // TODO: rename (wartosc=value)
-    Line:       ALine;          // TODO: rename to Sentence or Line - renamed to Line
+    NoteType:   integer;
+    Line:       ALine;
   end;
 
   // (TODO: rename TCzas to something like T(Line/Sentence)Time/TLinePosition/TLineState)
   // (Czas = time)
-  TCzas = record              // all that concerns the current frames
-    OldBeat:      integer;    // previous discovered beat 
-    AktBeat:      integer;    // current beat (TODO: rename)
-    MidBeat:      real;       // like AktBeat
+  TLineState = record        // all that concerns the current frames
+    OldBeat:      integer;    // previous discovered beat
+    CurrentBeat:  integer;
+    MidBeat:      real;       // like CurrentBeat
 
     // now we use this for super synchronization!
     // only used when analyzing voice
     OldBeatD:     integer;    // previous discovered beat
-    AktBeatD:     integer;    // current beat (TODO: rename)
-    MidBeatD:     real;       // like AktBeatD
+    CurrentBeatD: integer;
+    MidBeatD:     real;       // like CurrentBeatD
     FracBeatD:    real;       // fractional part of MidBeatD
 
     // we use this for audible clicks
     OldBeatC:     integer;    // previous discovered beat
-    AktBeatC:     integer;    // current beat (TODO: rename)
-    MidBeatC:     real;       // like AktBeatC
+    CurrentBeatC: integer;
+    MidBeatC:     real;       // like CurrentBeatC
     FracBeatC:    real;       // fractional part of MidBeatC
 
 
-    OldCzesc:     integer;    // previous displayed sentence (Czesc = part (here: sentence/line))
+    OldLine:      integer;    // previous displayed sentence
 
-    Teraz:        real;       // (TODO: Teraz = current time)
-    Razem:        real;       // (TODO: Razem = total time)
+    CurrentTime:  real;
+    TotalTime:    real;
   end;
 
 
@@ -288,13 +288,13 @@ type
 
 var // TODO : JB --- THESE SHOULD NOT BE GLOBAL
   // music
-  Melody:   TMelody; // TODO: rename
+  Melody:   TMelody;
 
   // czesci z nutami;
-  Lines:   array of TLines;  // TODO: rename to Sentences/Lines
+  Lines:   array of TLines;
 
-  // czas
-  Czas:     TCzas;             // TODO: rename
+  // LineState
+  LineState:     TLineState;
 
   SoundLib: TSoundLibrary;
 
-- 
cgit v1.2.3