From ac12e8ff541b2d30f0b5dd070f83fc43d9b2116d Mon Sep 17 00:00:00 2001 From: brunzelchen Date: Sun, 4 Jul 2010 17:06:14 +0000 Subject: - possible/remainings score bar in singscreen: red at start, decreasing with lost score, filling green from left with score - added session log. log all played songs with player names and score - fixed calculation of possible scores - change tabs on/off: now with CTRL+T (songscreen) git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1 Challenge MOD@2573 b956fd51-792f-4845-bead-9b4dfca2ff2c --- Game/Code/Classes/UIni.pas | 17 ++++++++++++++--- 1 file changed, 14 insertions(+), 3 deletions(-) (limited to 'Game/Code/Classes/UIni.pas') diff --git a/Game/Code/Classes/UIni.pas b/Game/Code/Classes/UIni.pas index 6e2f1b16..2c84cec3 100644 --- a/Game/Code/Classes/UIni.pas +++ b/Game/Code/Classes/UIni.pas @@ -83,6 +83,7 @@ type SumPlayers: integer; DuelRatio: integer; PossibleScore: integer; + LogSession: integer; // Soundcards SoundCard: array[0..7, 1..2] of integer; @@ -170,14 +171,15 @@ const // Advanced ILoadAnimation: array[0..1] of string = ('Off', 'On'); IEffectSing: array[0..1] of string = ('Off', 'On'); - IScreenFade: array[0..1] of String =('Off', 'On'); + IScreenFade: array[0..1] of String = ('Off', 'On'); IAskbeforeDel: array[0..1] of string = ('Off', 'On'); IOnSongClick: array[0..2] of string = ('Sing', 'Select Players', 'Open Menu'); ILineBonus: array[0..2] of string = ('Off', 'At Score', 'At Notes'); IPartyPopup: array[0..1] of string = ('Off', 'On'); ISumPlayers: array[0..2] of string = ('Never', 'Dynamic', 'Always'); IDuelRatio: array[0..9] of string = ('normal', '10%', '20%', '30%', '40%', '50%', '60%', '70%', '80%', '90%'); - IPossibleScore: array[0..1] of string = ('Off', 'On'); + IPossibleScore: array[0..2] of string = ('Off', 'Bar', 'Numbers'); + ILogSession: array[0..1] of string = ('Off', 'On'); IChannel: array[0..6] of string = ('Off', '1', '2', '3', '4', '5', '6'); @@ -607,10 +609,15 @@ begin if Tekst = IDuelRatio[Pet] then Ini.DuelRatio := Pet; // PossibleScore - Tekst := IniFile.ReadString('Advanced', 'PossibleScore', IPossibleScore[0]); + Tekst := IniFile.ReadString('Advanced', 'PossibleScore', IPossibleScore[1]); for Pet := 0 to High(IPossibleScore) do if Tekst = IPossibleScore[Pet] then Ini.PossibleScore := Pet; + // LogSession + Tekst := IniFile.ReadString('Advanced', 'LogSession', ILogSession[0]); + for Pet := 0 to High(ILogSession) do + if Tekst = ILogSession[Pet] then Ini.LogSession := Pet; + // SongPath if (Params.SongPath <> '') then SongPath := IncludeTrailingPathDelimiter(Params.SongPath) @@ -842,6 +849,10 @@ begin Tekst := IPossibleScore[Ini.PossibleScore]; IniFile.WriteString('Advanced', 'PossibleScore', Tekst); + //LogSession + Tekst := ILogSession[Ini.LogSession]; + IniFile.WriteString('Advanced', 'LogSession', Tekst); + IniFile.Free; end; end; -- cgit v1.2.3