From 3fee8809240ec65ea6bf3e8a143fd88b31550f11 Mon Sep 17 00:00:00 2001
From: mogguh <mogguh@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Wed, 12 Dec 2007 19:28:09 +0000
Subject: Some tweaking on the lyrics, credits to blindy! :X

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

(limited to 'Game/Code/Classes')

diff --git a/Game/Code/Classes/ULyrics.pas b/Game/Code/Classes/ULyrics.pas
index 70031ef0..2d826547 100644
--- a/Game/Code/Classes/ULyrics.pas
+++ b/Game/Code/Classes/ULyrics.pas
@@ -59,7 +59,7 @@ type
 
       //Some helper Procedures for Lyric Drawing
       procedure DrawLyrics (Beat: Real);
-      procedure DrawLyricsLine(const X, W, Y: Real; Size: Byte; const Line: TLyricLine; Beat: Real);
+      procedure DrawLyricsLine(const X, W, Y: Real; Size: Byte; const Line: PLyricLine; Beat: Real);
       procedure DrawPlayerIcon(const Player: Byte; const Enabled: Boolean; const X, Y, Size, Alpha: Real);
     public
       //Positions, Line specific Settings
@@ -418,8 +418,8 @@ end;
 //---------------
 procedure TLyricEngine.DrawLyrics (Beat: Real);
 begin
-  DrawLyricsLine(UpperLineX, UpperLineW, UpperlineY, 15, Upperline, Beat);
-  DrawLyricsLine(LowerLineX, LowerLineW, LowerlineY, 15, Lowerline, Beat);
+  DrawLyricsLine(UpperLineX, UpperLineW, UpperlineY, 15, PUpperline, Beat);
+  DrawLyricsLine(LowerLineX, LowerLineW, LowerlineY, 15, PLowerline, Beat);
 end;
 
 //---------------
@@ -453,7 +453,7 @@ end;
 //---------------
 // DrawLyricsLine(private) - Helper for Draw; Draws one LyricLine
 //---------------
-procedure TLyricEngine.DrawLyricsLine(const X, W, Y: Real; Size: Byte; const Line: TLyricLine; Beat: Real);
+procedure TLyricEngine.DrawLyricsLine(const X, W, Y: Real; Size: Byte; const Line: PLyricLine; Beat: Real);
 var
   I: Integer;
   CurWord: Integer;
@@ -490,19 +490,19 @@ begin
   DrawPlayerIcon (2, True, X + (IconSize + 1)*2, Y, IconSize, IconAlpha);}
 
   //Check if a Word in the Sentence is active
-  if ((Line.Start > Beat) AND (Line.Start + Line.Length < Beat)) then
+  if ((Line^.Start > Beat) AND (Line^.Start + Line^.Length < Beat)) then
   begin
     //Get Start Position:
     {  Start of Line - Width of all Icons + LineWidth/2 (Center}
     LyricX  := X + (W - ((IconSize + 1) * 6))/2 + ((IconSize + 1) * 3);
 
-    LyricX2 := LyricX + Line.Width;
+    LyricX2 := LyricX + Line^.Width;
 
     //Draw complete Sentence
     glEnable(GL_TEXTURE_2D);
     glEnable(GL_BLEND);
     glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
-    glBindTexture(GL_TEXTURE_2D, Line.Tex);
+    glBindTexture(GL_TEXTURE_2D, Line^.Tex);
 
     glColorRGB(LineColor_en);
     glBegin(GL_QUADS);
@@ -528,7 +528,7 @@ begin
     glEnable(GL_TEXTURE_2D);
     glEnable(GL_BLEND);
     glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
-    glBindTexture(GL_TEXTURE_2D, Line.Tex);
+    glBindTexture(GL_TEXTURE_2D, Line^.Tex);
 
     glColorRGB(LineColor_akt);
     glBegin(GL_QUADS);
-- 
cgit v1.2.3