hedgewars/uAIAmmoTests.pas
changeset 554 4f83b3de17c7
parent 543 465e2ec8f05f
child 556 49675457d76e
--- a/hedgewars/uAIAmmoTests.pas	Sun Jul 08 17:16:46 2007 +0000
+++ b/hedgewars/uAIAmmoTests.pas	Thu Jul 12 14:43:34 2007 +0000
@@ -289,6 +289,8 @@
 begin
 ap.ExplR:= 0;
 ap.Time:= 0;
+if (Level > 3) then exit(BadTurn);
+
 ap.AttackPutX:= Targ.X;
 ap.AttackPutY:= Targ.Y;