diff -r 46cd5dad1a28 -r 237b96f06aae hedgewars/uAIAmmoTests.pas --- a/hedgewars/uAIAmmoTests.pas Sun Mar 11 22:44:57 2012 -0400 +++ b/hedgewars/uAIAmmoTests.pas Sun Mar 11 23:24:09 2012 -0400 @@ -576,7 +576,7 @@ ap.Power:= 1; x:= Me^.X; y:= Me^.Y; -if Abs(hwRound(Me^.X) - Targ.X) + Abs(hwRound(Me^.Y) - Targ.Y) < 80 then +if Abs(hwRound(Me^.X) - Targ.X) + Abs(hwRound(Me^.Y) - Targ.Y) < 320 then exit(BadTurn); t:= _0_5 / Distance(int2hwFloat(Targ.X) - x, int2hwFloat(Targ.Y) - y); Vx:= (int2hwFloat(Targ.X) - x) * t; @@ -598,7 +598,11 @@ or (d > 200); if Abs(Targ.X - hwRound(x)) + Abs(Targ.Y - hwRound(y)) < 3 then - valueResult:= Max(0, (4 - d div 50) * 7 * 1024) + begin + if TraceShoveDrown(Me, Targ.X, Targ.Y, hwFloat2Float(vX) * 0.005 * 20, hwFloat2Float(vY) * 0.005 * 20) then + valueResult:= 204800 + else valueResult:= Max(0, (4 - d div 50) * 7 * 1024) + end else valueResult:= BadTurn; TestDesertEagle:= valueResult