145 (((cMineDudPercent < 90) and (Gear^.Health <> 0)) or |
145 (((cMineDudPercent < 90) and (Gear^.Health <> 0)) or |
146 ((Gear^.Health = 0) and (Gear^.Damage > 30))) then |
146 ((Gear^.Health = 0) and (Gear^.Damage > 30))) then |
147 AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 50, -50) |
147 AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 50, -50) |
148 else if (Gear^.State and gstAttacking) <> 0 then |
148 else if (Gear^.State and gstAttacking) <> 0 then |
149 AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 100, -50); // mine is on |
149 AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 100, -50); // mine is on |
|
150 gtExplosives: AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 75, -60+Gear^.Health); |
150 gtSMine: AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 50, -30); |
151 gtSMine: AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 50, -30); |
151 gtDynamite: AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 150, -75); |
152 gtDynamite: AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 150, -75); |
152 gtHedgehog: begin |
153 gtHedgehog: begin |
153 if Gear^.Damage >= Gear^.Health then |
154 if Gear^.Damage >= Gear^.Health then |
154 AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 60, -25) |
155 AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 60, -25) |