- new option "PossibleScore": show max possible score in singscreen (toggle on/off with "S")

- fade the "ball" also
- fixed screensong preview volume
- update of acinerella

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1 Challenge MOD@2565 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 12 insertions, 1 deletions

diff --git a/Game/Code/Classes/UIni.pas b/Game/Code/Classes/UIni.pas
index cc24e3a8..6e2f1b16 100644
--- a/Game/Code/Classes/UIni.pas
+++ b/Game/Code/Classes/UIni.pas
@@ -82,6 +82,7 @@ type
     PartyPopup:     integer;

     SumPlayers:     integer;

     DuelRatio:      integer;

+    PossibleScore:  integer;

 

     // Soundcards

     SoundCard:      array[0..7, 1..2] of integer;

@@ -169,13 +170,14 @@ 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');

 

   IChannel:       array[0..6] of string = ('Off', '1', '2', '3', '4', '5', '6');

 

@@ -604,6 +606,11 @@ begin
   for Pet := 0 to High(IDuelRatio) do

     if Tekst = IDuelRatio[Pet] then Ini.DuelRatio := Pet;

 

+  // PossibleScore

+  Tekst := IniFile.ReadString('Advanced', 'PossibleScore', IPossibleScore[0]);

+  for Pet := 0 to High(IPossibleScore) do

+    if Tekst = IPossibleScore[Pet] then Ini.PossibleScore := Pet;

+

   // SongPath

   if (Params.SongPath <> '') then

     SongPath := IncludeTrailingPathDelimiter(Params.SongPath)

@@ -831,6 +838,10 @@ begin
     Tekst := IDuelRatio[Ini.DuelRatio];

     IniFile.WriteString('Advanced', 'DuelRatio', Tekst);

 

+    //PossibleScore

+    Tekst := IPossibleScore[Ini.PossibleScore];

+    IniFile.WriteString('Advanced', 'PossibleScore', Tekst);

+

     IniFile.Free;

   end;

 end;