hedgewars/uAIAmmoTests.pas
changeset 7501 1763dc3bc9b7
parent 7486 f3a13da9fa4e
child 7620 fa3bc79dc0b8
--- a/hedgewars/uAIAmmoTests.pas	Sun Aug 05 23:03:49 2012 +0400
+++ b/hedgewars/uAIAmmoTests.pas	Sun Aug 05 19:38:16 2012 -0400
@@ -1096,7 +1096,8 @@
     x, y, trackFall: LongInt;
     cake: TGear;
 begin
-    Level:= Level; // avoid compiler hint
+    if (Level > 2) then
+        exit(BadTurn);
     ap.ExplR:= 0;
     ap.Time:= 0;
     ap.Power:= BadTurn; // use it as max score value in checkCakeWalk