hedgewars/uTeams.pas
changeset 13760 6908d1e65cdc
parent 13659 5b58aa82b5dc
child 13761 a0d6404a80a2
equal deleted inserted replaced
13759:5525f69bf76b 13760:6908d1e65cdc
    73 CheckForWin:= true;
    73 CheckForWin:= true;
    74 
    74 
    75 TurnTimeLeft:= 0;
    75 TurnTimeLeft:= 0;
    76 ReadyTimeLeft:= 0;
    76 ReadyTimeLeft:= 0;
    77 
    77 
    78 // if the game ends during a multishot, do last TurnReaction
    78 // if the game ends during a multishot, do last TurnStats + TurnReaction
    79 if (not bBetweenTurns) and isInMultiShoot then
    79 if (not bBetweenTurns) and isInMultiShoot then
       
    80     begin
       
    81     TurnStats();
    80     TurnReaction();
    82     TurnReaction();
       
    83     end;
    81 
    84 
    82 if not TeamsGameOver then
    85 if not TeamsGameOver then
    83     begin
    86     begin
    84     if AliveCount = 0 then
    87     if AliveCount = 0 then
    85         begin // draw
    88         begin // draw