- 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

1 files changed, 14 insertions, 3 deletions

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;