equal
deleted
inserted
replaced
66 Count: Longword; |
66 Count: Longword; |
67 ar: array[0..Pred(MAXBONUS)] of TBonus; |
67 ar: array[0..Pred(MAXBONUS)] of TBonus; |
68 end; |
68 end; |
69 |
69 |
70 implementation |
70 implementation |
71 uses uMisc, uCollisions, uVariables, uUtils; |
71 uses uCollisions, uVariables, uUtils, uIO; |
72 |
|
73 |
72 |
74 const KillScore = 200; |
73 const KillScore = 200; |
75 |
74 |
76 var friendlyfactor: LongInt = 300; |
75 var friendlyfactor: LongInt = 300; |
77 KnownExplosion: record |
76 KnownExplosion: record |