From b271750f0ba7b1174d26f8164bc8f9f46766c5e3 Mon Sep 17 00:00:00 2001
From: whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Sun, 15 Apr 2007 10:05:09 +0000
Subject: Added Prevention of starting PartyMode without Plugins Loaded or with
 less then 2 Players

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@92 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Screens/UScreenMain.pas | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/Game/Code/Screens/UScreenMain.pas b/Game/Code/Screens/UScreenMain.pas
index 976c0e07..90a6310d 100644
--- a/Game/Code/Screens/UScreenMain.pas
+++ b/Game/Code/Screens/UScreenMain.pas
@@ -84,7 +84,7 @@ const Credits_Text: Array[0..49] of PChar = (
 
 implementation
 
-uses Windows, UGraphic, UMain, UIni, UTexture, USongs, Textgl, opengl, ULanguage, UParty;
+uses Windows, UGraphic, UMain, UIni, UTexture, USongs, Textgl, opengl, ULanguage, UParty, UDLLManager;
 
 
 function TScreenMain.ParseInput(PressedKey: Cardinal; ScanCode: byte; PressedDown: Boolean): Boolean;
@@ -128,8 +128,11 @@ begin
         end;
       SDLK_M:
         begin
-          Music.PlayStart;
-          FadeTo(@ScreenPartyOptions);
+          if (Ini.Players >= 2) AND (Length(DLLMan.Plugins)>=1) then
+          begin
+            Music.PlayStart;
+            FadeTo(@ScreenPartyOptions);
+          end;
         end;
 
       SDLK_RETURN:
@@ -147,8 +150,6 @@ begin
           if Interaction = 2 then begin
             Music.PlayStart;
             FadeTo(@ScreenOptions);
-//            SDL_SetVideoMode(800, 600, 32, SDL_OPENGL);// or SDL_FULLSCREEN);
-//            LoadTextures;
           end;
           if Interaction = 3 then begin
             Result := false;
-- 
cgit v1.2.3