diff -r 99f05a01a6a3 -r ece7b87f1334 hedgewars/uAIAmmoTests.pas --- a/hedgewars/uAIAmmoTests.pas Thu Sep 10 15:22:34 2009 +0000 +++ b/hedgewars/uAIAmmoTests.pas Thu Sep 10 15:29:28 2009 +0000 @@ -220,7 +220,7 @@ x:= Me^.X; y:= Me^.Y; dY:= -Vy; - + repeat x:= x + Vx; y:= y + dY; @@ -228,7 +228,7 @@ EX:= hwRound(x); EY:= hwRound(y); until TestColl(EX, EY, 5) or (EY > 1000); - + if (EY < 1000) and not dY.isNegative then begin Result:= RateExplosion(Me, EX, EY, 91);