- added ScreenPartyRounds (a screen to select the modes to play)

- added missing language entries to German and English language file
- themed ScreenPartyOptions
- some minor theme changes concerning party screens
- some minor code changes concerning party screens

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

1 files changed, 3 insertions, 21 deletions

diff --git a/Lua/src/screens/UScreenPartyPlayer.pas b/Lua/src/screens/UScreenPartyPlayer.pas
index 2cdc0366..3fcaa4ba 100644
--- a/Lua/src/screens/UScreenPartyPlayer.pas
+++ b/Lua/src/screens/UScreenPartyPlayer.pas
@@ -151,32 +151,12 @@ begin
 
   if (Party.ModesAvailable) then
   begin //mode for current playersetup available
-    // to - do : add round select screen
-    // atm just add random rounds to the rounds array
-    SetLength(Rounds, ScreenPartyOptions.Rounds + 2);
-
-    for I := 0 to High(Rounds) do
-      Rounds[I] := Party_Round_Random;
-
-    // start party game
-    if (Party.StartGame(Rounds)) then
-    begin
-      FadeTo(@ScreenPartyNewRound, SoundLib.Start);
-    end
-    else
-    begin
-      //error starting party game
-      ScreenPopupError.ShowPopup(Language.Translate('ERROR_CAN_NOT_START_PARTY'));
-
-      Party.Clear;
-    end;
-
+    FadeTo(@ScreenPartyRounds, SoundLib.Start);
   end
   else
   begin
     // no mode available for current player setup
     ScreenPopupError.ShowPopup(Language.Translate('ERROR_NO_MODES_FOR_CURRENT_SETUP'));
-
     Party.Clear;
   end;
 end;
@@ -443,6 +423,8 @@ begin
     Button[10].Text[0].Text := Ini.NameTeam[2];
     // Templates for Names Mod end
 
+  Party.Clear;
+
   UpdateInterface;
 end;