equal
deleted
inserted
replaced
239 AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 20, -50); |
239 AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 20, -50); |
240 // avoid mines unless they are very likely to be duds, or are duds. also avoid if they are about to blow |
240 // avoid mines unless they are very likely to be duds, or are duds. also avoid if they are about to blow |
241 gtMine: begin |
241 gtMine: begin |
242 if (Gear^.State and gstMoving) <> 0 then bonuses.activity:= true; |
242 if (Gear^.State and gstMoving) <> 0 then bonuses.activity:= true; |
243 |
243 |
244 if ((Gear^.State and gstAttacking) = 0) and (((cMineDudPercent < 90) and (Gear^.Health <> 0)) |
244 if ((Gear^.State and gstAttacking) = 0) and (((cMineDudPercent < 90) or ((Gear^.State and gstWait) <> 0) and (Gear^.Health <> 0)) |
245 or (isAfterAttack and (Gear^.Health = 0) and (Gear^.Damage > 30))) then |
245 or (isAfterAttack and (Gear^.Health = 0) and (Gear^.Damage > 30))) then |
246 AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 50, -50) |
246 AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 50, -50) |
247 else if (Gear^.State and gstAttacking) <> 0 then |
247 else if (Gear^.State and gstAttacking) <> 0 then |
248 AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 100, -50); // mine is on |
248 AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 100, -50); // mine is on |
249 end; |
249 end; |