97 |
98 |
98 TurnTimeLeft:= 0; |
99 TurnTimeLeft:= 0; |
99 if AliveCount = 0 then |
100 if AliveCount = 0 then |
100 begin // draw |
101 begin // draw |
101 AddCaption(trmsg[sidDraw], $FFFFFF, capgrpGameState); |
102 AddCaption(trmsg[sidDraw], $FFFFFF, capgrpGameState); |
|
103 SendStat(siGameResult, trmsg[sidDraw]); |
102 AddGear(0, 0, gtATFinishGame, 0, 0, 0, 2000) |
104 AddGear(0, 0, gtATFinishGame, 0, 0, 0, 2000) |
103 end else // win |
105 end else // win |
104 begin |
106 begin |
105 AddCaption(Format(trmsg[sidWinner], AliveTeam.TeamName), $FFFFFF, capgrpGameState); |
107 s:= Format(trmsg[sidWinner], AliveTeam.TeamName); |
|
108 AddCaption(s, $FFFFFF, capgrpGameState); |
|
109 SendStat(siGameResult, s); |
106 AddGear(0, 0, gtATFinishGame, 0, 0, 0, 2000) |
110 AddGear(0, 0, gtATFinishGame, 0, 0, 0, 2000) |
107 end; |
111 end; |
108 end; |
112 end; |
109 |
113 |
110 procedure SwitchHedgehog; |
114 procedure SwitchHedgehog; |