From fb9fe1202a541b911332e69d7c157197dcb9cc61 Mon Sep 17 00:00:00 2001 From: brunzelchen Date: Wed, 20 Apr 2011 11:01:31 +0000 Subject: new option: "LyricGolden" On/Off: draw golden lyrics yellow instead of blue. git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1 Challenge MOD@2826 b956fd51-792f-4845-bead-9b4dfca2ff2c --- Game/Code/Classes/UIni.pas | 11 +++++++++++ 1 file changed, 11 insertions(+) (limited to 'Game/Code/Classes/UIni.pas') diff --git a/Game/Code/Classes/UIni.pas b/Game/Code/Classes/UIni.pas index 8323345b..3546e196 100644 --- a/Game/Code/Classes/UIni.pas +++ b/Game/Code/Classes/UIni.pas @@ -62,6 +62,7 @@ type LyricsFont: integer; LyricsEffect: integer; Solmization: integer; + LyricsGolden: integer; // Themes Theme: integer; @@ -182,6 +183,7 @@ const ILyricsFont: array[0..2] of string = ('Plain', 'OLine1', 'OLine2'); ILyricsEffect: array[0..3] of string = ('Simple', 'Zoom', 'Slide', 'Ball'); ISolmization: array[0..3] of string = ('Off', 'Euro', 'Jap', 'American'); + ILyricsGolden: array[0..1] of string = ('Off', 'On'); IColor: array[0..8] of string = ('Blue', 'Green', 'Pink', 'Red', 'Violet', 'Orange', 'Yellow', 'Brown', 'Black'); @@ -477,6 +479,11 @@ begin for Pet := 0 to High(ISolmization) do if Tekst = ISolmization[Pet] then Ini.Solmization := Pet; + // LyricsGolden + Tekst := IniFile.ReadString('Lyrics', 'LyricsGolden', ILyricsGolden[0]); + for Pet := 0 to High(ILyricsGolden) do + if Tekst = ILyricsGolden[Pet] then Ini.LyricsGolden := Pet; + // Theme //Theme List Patch @@ -862,6 +869,10 @@ begin Tekst := ISolmization[Ini.Solmization]; IniFile.WriteString('Lyrics', 'Solmization', Tekst); + // LyricsGolden + Tekst := ILyricsGolden[Ini.LyricsGolden]; + IniFile.WriteString('Lyrics', 'LyricsGolden', Tekst); + // Theme Tekst := ITheme[Ini.Theme]; IniFile.WriteString('Themes', 'Theme', Tekst); -- cgit v1.2.3