# HG changeset patch
# User nemo
# Date 1321198475 18000
# Node ID 27931e3ceff851f8ad508e35118a26127ef4ef16
# Parent  0cf6f1e24dcec59b766ca6264c3dd8475f37c10d
Make AI avoid barrels the more they are damaged

diff -r 0cf6f1e24dce -r 27931e3ceff8 hedgewars/uAIMisc.pas
--- a/hedgewars/uAIMisc.pas	Sun Nov 13 09:51:01 2011 -0500
+++ b/hedgewars/uAIMisc.pas	Sun Nov 13 10:34:35 2011 -0500
@@ -147,6 +147,7 @@
                           AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 50, -50)
                       else if (Gear^.State and gstAttacking) <> 0 then
                           AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 100, -50); // mine is on
+          gtExplosives: AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 75, -60+Gear^.Health);
           gtSMine:    AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 50, -30);
           gtDynamite: AddBonus(hwRound(Gear^.X), hwRound(Gear^.Y), 150, -75);
           gtHedgehog: begin