diff options
Diffstat (limited to 'unicode/src/base/UParty.pas')
| -rw-r--r-- | unicode/src/base/UParty.pas | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/unicode/src/base/UParty.pas b/unicode/src/base/UParty.pas index 3cfcb6cb..52eb5a05 100644 --- a/unicode/src/base/UParty.pas +++ b/unicode/src/base/UParty.pas @@ -254,8 +254,13 @@ var begin if ((CurRound < high(Rounds)) or (CurRound = high(CurRound))) then begin - //Increase Current Round - Inc(CurRound); + // Increase Current Round but not beyond its limit + // CurRound is set to 255 to begin with! + // Ugly solution if you ask me. + if CurRound < high(CurRound) then + Inc(CurRound) + else + CurRound := 0; Rounds[CurRound].Winner := 255; DllMan.LoadPlugin(Rounds[CurRound].Plugin); |