Added: New Options/Advanced item "auto party-menu": Switches automatic popup-menu in party-mode on/off. "on" is better usability for joypad, "off" for keyboard.

Changed: Keys in Party Song Selection, "m" is popup-menu and "enter" direkt to singscreen. 
Added: new Statics and Texts to UScreenSong, 2 sets, one for "normal" the other for party-mode.
Added: dismissed sound for party-mode.

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@202 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 9 insertions, 0 deletions

diff --git a/Game/Code/Classes/UIni.pas b/Game/Code/Classes/UIni.pas
index f12e3832..ca7afe9a 100644
--- a/Game/Code/Classes/UIni.pas
+++ b/Game/Code/Classes/UIni.pas
@@ -63,6 +63,7 @@ type
     AskbeforeDel:   integer;

     OnSongClick:    integer;

     LineBonus:      integer;

+    PartyPopup:     integer;

 

     // Controller

     Joypad:         integer;

@@ -140,6 +141,7 @@ const
   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');

 

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

   ILPT:           array[0..2] of string = ('Off', 'LCD', 'Lights');

@@ -455,6 +457,10 @@ begin
   for Pet := 0 to High(ILineBonus) do

     if Tekst = ILineBonus[Pet] then Ini.LineBonus := Pet;

 

+  // PartyPopup

+  Tekst := IniFile.ReadString('Advanced', 'PartyPopup', 'On');

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

+    if Tekst = IPartyPopup[Pet] then Ini.PartyPopup := Pet;

 

 

   // Joypad

@@ -638,6 +644,9 @@ begin
   Tekst := ILineBonus[Ini.LineBonus];

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

 

+  //Party Popup

+  Tekst := IPartyPopup[Ini.PartyPopup];

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

 

   // Joypad

   Tekst := IJoypad[Ini.Joypad];