--- a/hedgewars/uAIAmmoTests.pas	Sun Sep 28 15:45:37 2008 +0000
+++ b/hedgewars/uAIAmmoTests.pas	Sun Sep 28 15:55:07 2008 +0000
@@ -365,7 +365,7 @@
 or (Abs(hwRound(Me^.Y) - 50 - Targ.Y) > 50) then
 	begin
 	if TestColl(hwRound(Me^.Y), hwRound(Me^.Y) - 16, 6) then
-		Result:= 1
+		Result:= Succ(BadTurn)
 	else
 		Result:= BadTurn;
 	exit(Result)