equal
deleted
inserted
replaced
37 procedure Skipped; |
37 procedure Skipped; |
38 procedure TurnReaction; |
38 procedure TurnReaction; |
39 procedure SendStats; |
39 procedure SendStats; |
40 |
40 |
41 var |
41 var |
42 TotalRounds: Longword = -1; |
42 TotalRounds: LongInt = -1; |
43 FinishedTurnsTotal: LongInt = -1; |
43 FinishedTurnsTotal: LongInt = -1; |
44 |
44 |
45 implementation |
45 implementation |
46 uses uTeams, uSound, uMisc; |
46 uses uTeams, uSound, uMisc; |
47 var DamageGiven : Longword = 0; |
47 var DamageGiven : Longword = 0; |