hedgewars/uAIMisc.pas
changeset 14607 e54e41554529
parent 14528 184df3900ec4
parent 14606 8736f3a0ff7f
child 14785 b3fa6a19fc25
--- a/hedgewars/uAIMisc.pas	Mon Jan 14 00:34:56 2019 +0100
+++ b/hedgewars/uAIMisc.pas	Mon Jan 14 12:35:32 2019 -0500
@@ -247,6 +247,7 @@
                 else if (Gear^.State and gstAttacking) <> 0 then
                     AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 100, -50); // mine is on
                 end;
+            gtAirMine: if ((Gear^.State and gstFrozen) = 0) then AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), gear^.Angle+5, -30);
 
             gtExplosives:
                 begin