| changeset 1001 | 502508979713 |
| parent 922 | 63c52f8d5cfd |
| child 1066 | 1f1b3686a2b0 |
| 1000:e7b204880318 | 1001:502508979713 |
|---|---|
52 |
52 |
53 implementation |
53 implementation |
54 uses uTeams, uMisc, uLand, uCollisions; |
54 uses uTeams, uMisc, uLand, uCollisions; |
55 const KillScore = 200; |
55 const KillScore = 200; |
56 MAXBONUS = 1024; |
56 MAXBONUS = 1024; |
57 friendlyfactor: Longword = 300; |
57 friendlyfactor: LongInt = 300; |
58 |
58 |
59 type TBonus = record |
59 type TBonus = record |
60 X, Y: LongInt; |
60 X, Y: LongInt; |
61 Radius: LongInt; |
61 Radius: LongInt; |
62 Score: LongInt; |
62 Score: LongInt; |