aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authork-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-09-13 12:04:40 +0000
committerk-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>2008-09-13 12:04:40 +0000
commitb8888af755c5ce6102d66bb057fc7e8d4b128b74 (patch)
treefd046969c4400da31d048f4edde6a1a72a8153ec /src
parent76cf2462d732357522cc6aadcf66027bd55cad0f (diff)
downloadusdx-b8888af755c5ce6102d66bb057fc7e8d4b128b74.tar.gz
usdx-b8888af755c5ce6102d66bb057fc7e8d4b128b74.tar.xz
usdx-b8888af755c5ce6102d66bb057fc7e8d4b128b74.zip
rename X: integer to NoteIndex: integer
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@1379 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r--src/base/USong.pas23
1 files changed, 12 insertions, 11 deletions
diff --git a/src/base/USong.pas b/src/base/USong.pas
index a99ca4a4..b3410550 100644
--- a/src/base/USong.pas
+++ b/src/base/USong.pas
@@ -360,7 +360,8 @@ var
Param2: integer;
Param3: integer;
ParamS: string;
- I,J,X: integer;
+ I, J: integer;
+ NoteIndex: integer;
NoteType: Char;
SentenceEnd, Rest, Time: Integer;
@@ -441,13 +442,13 @@ begin
Lines[CP].Line[Lines[CP].High].LyricWidth := glTextWidth(PChar(Lines[CP].Line[Lines[CP].High].Lyric));
//Total Notes Patch
Lines[CP].Line[Lines[CP].High].TotalNotes := 0;
- for X := 0 to high(Lines[CP].Line[Lines[CP].High].Note) do
+ for NoteIndex := 0 to high(Lines[CP].Line[Lines[CP].High].Note) do
begin
- if (Lines[CP].Line[Lines[CP].High].Note[X].NoteType = ntGolden) then
- Lines[CP].Line[Lines[CP].High].TotalNotes := Lines[CP].Line[Lines[CP].High].TotalNotes + Lines[CP].Line[Lines[CP].High].Note[X].Length;
+ if (Lines[CP].Line[Lines[CP].High].Note[NoteIndex].NoteType = ntGolden) then
+ Lines[CP].Line[Lines[CP].High].TotalNotes := Lines[CP].Line[Lines[CP].High].TotalNotes + Lines[CP].Line[Lines[CP].High].Note[NoteIndex].Length;
- if (Lines[CP].Line[Lines[CP].High].Note[X].NoteType <> ntFreestyle) then
- Lines[CP].Line[Lines[CP].High].TotalNotes := Lines[CP].Line[Lines[CP].High].TotalNotes + Lines[CP].Line[Lines[CP].High].Note[X].Length;
+ if (Lines[CP].Line[Lines[CP].High].Note[NoteIndex].NoteType <> ntFreestyle) then
+ Lines[CP].Line[Lines[CP].High].TotalNotes := Lines[CP].Line[Lines[CP].High].TotalNotes + Lines[CP].Line[Lines[CP].High].Note[NoteIndex].Length;
end;
//Total Notes Patch End
end
@@ -459,12 +460,12 @@ begin
Lines[Count].Line[Lines[Count].High].LyricWidth := glTextWidth(PChar(Lines[Count].Line[Lines[Count].High].Lyric));
//Total Notes Patch
Lines[Count].Line[Lines[Count].High].TotalNotes := 0;
- for X := 0 to high(Lines[Count].Line[Lines[Count].High].Note) do
+ for NoteIndex := 0 to high(Lines[Count].Line[Lines[Count].High].Note) do
begin
- if (Lines[Count].Line[Lines[Count].High].Note[X].NoteType = ntGolden) then
- Lines[Count].Line[Lines[Count].High].TotalNotes := Lines[Count].Line[Lines[Count].High].TotalNotes + Lines[Count].Line[Lines[Count].High].Note[X].Length;
- if (Lines[Count].Line[Lines[Count].High].Note[X].NoteType <> ntFreestyle) then
- Lines[Count].Line[Lines[Count].High].TotalNotes := Lines[Count].Line[Lines[Count].High].TotalNotes + Lines[Count].Line[Lines[Count].High].Note[X].Length;
+ if (Lines[Count].Line[Lines[Count].High].Note[NoteIndex].NoteType = ntGolden) then
+ Lines[Count].Line[Lines[Count].High].TotalNotes := Lines[Count].Line[Lines[Count].High].TotalNotes + Lines[Count].Line[Lines[Count].High].Note[NoteIndex].Length;
+ if (Lines[Count].Line[Lines[Count].High].Note[NoteIndex].NoteType <> ntFreestyle) then
+ Lines[Count].Line[Lines[Count].High].TotalNotes := Lines[Count].Line[Lines[Count].High].TotalNotes + Lines[Count].Line[Lines[Count].High].Note[NoteIndex].Length;
end;
//Total Notes Patch End