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 uCollisions, uVariables, uUtils, uIO; |
71 uses uCollisions, uVariables, uUtils, uDebug; |
72 |
72 |
73 const KillScore = 200; |
73 const KillScore = 200; |
74 |
74 |
75 var friendlyfactor: LongInt = 300; |
75 var friendlyfactor: LongInt = 300; |
76 KnownExplosion: record |
76 KnownExplosion: record |