*NEW: Press Left-Ctrl + * (* on Numpad) or Left-Ctrl + R to Shuffle Player Names in Classic Party Mode "Team- and Player Names"-Screen

*NEW: Set "NewPartyPoints" in config.ini to "On" to give Winner Team 2Points and 2nd placed Team 1Point while playing with 3 Teams (default=on)
thx to merc!

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/1.0.1 Challenge MOD@2214 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 df291ec3..e5891f58 100644
--- a/Game/Code/Classes/UIni.pas
+++ b/Game/Code/Classes/UIni.pas
@@ -23,6 +23,7 @@ type
     Sorting:        integer;

     Debug:          integer;

     LoadFaultySongs:integer;

+    NewPartyPoints: integer;

 

     // Graphics

     Screens:        integer;

@@ -122,6 +123,7 @@ const
 

   IDebug:         array[0..1] of string = ('Off', 'On');

   ILoadFaultySongs: array[0..1] of string = ('Off', 'On');

+  INewPartyPoints: array[0..1] of string = ('Off', 'On');

 

   IScreens:       array[0..1] of string = ('1', '2');

   IFullScreen:    array[0..1] of string = ('Off', 'On');

@@ -257,6 +259,11 @@ begin
   for Pet := 0 to High(ILoadFaultySongs) do

     if Tekst = ILoadFaultySongs[Pet] then Ini.LoadFaultySongs := Pet;

 

+  // NewPartyPoints

+  Tekst := IniFile.ReadString('Game', 'NewPartyPoints', INewPartyPoints[1]);

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

+    if Tekst = INewPartyPoints[Pet] then Ini.NewPartyPoints := Pet;

+

   //if Ini.Debug = 1 then SongPath := 'E:\UltraStar 03\Songs\';

 

   // Screens

@@ -645,6 +652,10 @@ begin
     Tekst := ILoadFaultySongs[Ini.LoadFaultySongs];

     IniFile.WriteString('Game',     'LoadFaultySongs',   Tekst);

 

+    // NewPartyPoints

+    Tekst := INewPartyPoints[Ini.NewPartyPoints];

+    IniFile.WriteString('Game',     'NewPartyPoints',   Tekst);

+

     // Screens

     Tekst := IScreens[Ini.Screens];

     IniFile.WriteString('Graphics', 'Screens', Tekst);

@@ -849,4 +860,4 @@ begin
   end;

 end;

 

-end.

+end.
\ No newline at end of file