hedgewars/uAIMisc.pas
changeset 14264 6f3f59266c4c
parent 14213 09dacb61d526
child 14507 184df3900ec4
child 14585 8736f3a0ff7f
equal deleted inserted replaced
14263:29d614a5c9eb 14264:6f3f59266c4c
   229             , gtAirBomb
   229             , gtAirBomb
   230             , gtCluster
   230             , gtCluster
   231             , gtMelonPiece
   231             , gtMelonPiece
   232             , gtMolotov: bonuses.activity:= true;
   232             , gtMolotov: bonuses.activity:= true;
   233             gtCase:
   233             gtCase:
   234                 AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y) + 3, 37, 25);
   234                 if (Gear^.AIHints and aihDoesntMatter) = 0 then
       
   235                     AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y) + 3, 37, 25);
   235             gtFlame:
   236             gtFlame:
   236                 if (Gear^.State and gsttmpFlag) <> 0 then
   237                 if (Gear^.State and gsttmpFlag) <> 0 then
   237                     AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 20, -50);
   238                     AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 20, -50);
   238 // avoid mines unless they are very likely to be duds, or are duds. also avoid if they are about to blow
   239 // avoid mines unless they are very likely to be duds, or are duds. also avoid if they are about to blow
   239             gtMine: begin
   240             gtMine: begin