aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Classes/UParty.pas
diff options
context:
space:
mode:
authorwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-04-15 11:05:10 +0000
committerwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-04-15 11:05:10 +0000
commitfae5839e8025f020638b4cd0583a9a992c5a7a1e (patch)
tree23575cd865f33ed66dba502489e2311b075d221d /Game/Code/Classes/UParty.pas
parentb271750f0ba7b1174d26f8164bc8f9f46766c5e3 (diff)
downloadusdx-fae5839e8025f020638b4cd0583a9a992c5a7a1e.tar.gz
usdx-fae5839e8025f020638b4cd0583a9a992c5a7a1e.tar.xz
usdx-fae5839e8025f020638b4cd0583a9a992c5a7a1e.zip
Fixed some Bugs in Party Mode
Fixed Support CategoryOnly Playlist Support git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@93 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Game/Code/Classes/UParty.pas')
-rw-r--r--Game/Code/Classes/UParty.pas13
1 files changed, 10 insertions, 3 deletions
diff --git a/Game/Code/Classes/UParty.pas b/Game/Code/Classes/UParty.pas
index f5834dd8..e5252f82 100644
--- a/Game/Code/Classes/UParty.pas
+++ b/Game/Code/Classes/UParty.pas
@@ -107,13 +107,16 @@ begin
PlayersPlay := Teams.NumTeams;
+ //Get Teammode and Set Joker
TeamMode := True;
For I := 0 to Teams.NumTeams-1 do
+ begin
if Teams.Teaminfo[I].NumPlayers < 2 then
begin
TeamMode := False;
- Break;
end;
+ Teams.Teaminfo[I].Joker := Round(NumRounds*0.7);
+ end;
//Fill Plugin Array
SetLength(Plugins, 0);
@@ -186,7 +189,7 @@ begin
//Increase Current Round
Inc (CurRound);
- Rounds[CurRound].Winner := 0;
+ Rounds[CurRound].Winner := 255;
DllMan.LoadPlugin(Rounds[CurRound].Plugin);
//Select Players
@@ -241,9 +244,13 @@ var
Winners: Array of String;
I: Integer;
begin
+ Result := Language.Translate('PARTY_NOBODY');
+
+ if (Round > High(Rounds)) then
+ exit;
+
if (Rounds[Round].Winner = 0) then
begin
- Result := Language.Translate('PARTY_NOBODY');
exit;
end;