diff -r e593d5266e01 -r 458f4f58c1b6 hedgewars/uAI.pas
--- a/hedgewars/uAI.pas	Thu Sep 14 17:20:50 2006 +0000
+++ b/hedgewars/uAI.pas	Fri Sep 15 13:47:01 2006 +0000
@@ -79,6 +79,7 @@
               begin
               BestActions:= Actions;
               inc(BestActions.Score, Score);
+              
               AddAction(BestActions, aia_Weapon, Longword(a), 500);
               if Time <> 0 then AddAction(BestActions, aia_Timer, Time div 1000, 400);
               if (Angle > 0) then AddAction(BestActions, aia_LookRight, 0, 200)
@@ -250,7 +251,11 @@
       begin
       Walk(@WalkMe);
       if (StartTicks > GameTicks - 1500) and not StopThinking then SDL_Delay(2000);
-      if BestActions.Score = BadTurn then AddAction(BestActions, aia_Skip, 0, 250);
+      if BestActions.Score < -1023 then
+         begin
+         BestActions.Count:= 0;
+         AddAction(BestActions, aia_Skip, 0, 250);
+         end;
       end else
 else begin
       Walk(@WalkMe);
@@ -262,7 +267,6 @@
             Walk(@WalkMe)
             end
       end;
-
 Me.State:= Me.State and not gstHHThinking
 end;