diff options
| author | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2009-05-16 21:43:47 +0000 |
|---|---|---|
| committer | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2009-05-16 21:43:47 +0000 |
| commit | 231559df1075ccfdd4f073cbc779a19d1b4f8da9 (patch) | |
| tree | 8c22cb29fac8480aa3e69ec7755be703e882c1db /Lua/src/base | |
| parent | d5eacb28e3ff9fc39d1af923e6b8799757a788cf (diff) | |
| download | usdx-231559df1075ccfdd4f073cbc779a19d1b4f8da9.tar.gz usdx-231559df1075ccfdd4f073cbc779a19d1b4f8da9.tar.xz usdx-231559df1075ccfdd4f073cbc779a19d1b4f8da9.zip | |
adapted ScreenPartyScore
a fix in TPartyGame.GenScores
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@1743 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Lua/src/base')
| -rw-r--r-- | Lua/src/base/UParty.pas | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Lua/src/base/UParty.pas b/Lua/src/base/UParty.pas index 713cfc33..1ec0f82d 100644 --- a/Lua/src/base/UParty.pas +++ b/Lua/src/base/UParty.pas @@ -365,7 +365,7 @@ end; //---------- procedure TPartyGame.GenScores; var - I: byte; + I: Integer; begin if (Length(Teams) = 2) then begin // score generation for 2 teams, winner gets 1 point @@ -524,6 +524,8 @@ begin Self.Rounds[I].Mode := GetRandomMode; Self.Rounds[I].AlreadyPlayed := False; + + SetLength(Self.Rounds[I].Ranking, 0); end; // get the party started!11 |