From a4accf241c7623b5b36e1e31bded05f94f662585 Mon Sep 17 00:00:00 2001 From: f1fth_freed0m Date: Mon, 10 Mar 2008 07:29:30 +0000 Subject: Removed zlportio from Code git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@954 b956fd51-792f-4845-bead-9b4dfca2ff2c --- Game/Code/Screens/UScreenSing.pas | 10 ++++++---- 1 file changed, 6 insertions(+), 4 deletions(-) (limited to 'Game/Code/Screens/UScreenSing.pas') diff --git a/Game/Code/Screens/UScreenSing.pas b/Game/Code/Screens/UScreenSing.pas index d50d4360..608bae72 100644 --- a/Game/Code/Screens/UScreenSing.pas +++ b/Game/Code/Screens/UScreenSing.pas @@ -23,7 +23,7 @@ uses UMenu, TextGL, OpenGL12, UThemes, - ULCD, + //ULCD, //TODO: maybe LCD Support as Plugin? UGraphicClasses, USingScores; @@ -108,7 +108,7 @@ type function Draw: boolean; override; procedure Finish; virtual; - procedure UpdateLCD; + //procedure UpdateLCD; //TODO: maybe LCD Support as Plugin? procedure Pause; //Pause Mod(Toggles Pause) procedure onSentenceEnd(S: Cardinal); //OnSentenceEnd for LineBonus + Singbar @@ -637,7 +637,7 @@ begin While (not Lyrics.LineinQueue) AND (Lyrics.LineCounter <= High(Lines[0].Line)) do Lyrics.AddLine(@Lines[0].Line[Lyrics.LineCounter]); - UpdateLCD; + //UpdateLCD; //TODO: maybe LCD Support as Plugin? //Deactivate Pause Paused := False; @@ -1286,7 +1286,8 @@ begin SetFontItalic (False); end; -procedure TScreenSing.UpdateLCD; +(* +procedure TScreenSing.UpdateLCD; //TODO: maybe LCD Support as Plugin? var T: string; begin @@ -1302,6 +1303,7 @@ begin if Copy(T, Length(T), 1) <> ' ' then T := T + ' '; LCD.AddTextBR(T);} end; +*) procedure TScreenSing.onSentenceEnd(S: Cardinal); var -- cgit v1.2.3