equal
deleted
inserted
replaced
33 procedure Skipped; |
33 procedure Skipped; |
34 procedure TurnReaction; |
34 procedure TurnReaction; |
35 procedure SendStats; |
35 procedure SendStats; |
36 |
36 |
37 implementation |
37 implementation |
38 uses uTeams, uSound, uMisc, uLocale, uWorld, uVariables, uUtils; |
38 uses uTeams, uSound, uMisc, uLocale, uWorld, uVariables, uUtils, uIO; |
39 |
39 |
40 var DamageGiven : Longword = 0; |
40 var DamageGiven : Longword = 0; |
41 DamageClan : Longword = 0; |
41 DamageClan : Longword = 0; |
42 DamageTotal : Longword = 0; |
42 DamageTotal : Longword = 0; |
43 KillsClan : LongWord = 0; |
43 KillsClan : LongWord = 0; |