hedgewars/uAI.pas
changeset 375 18012da67681
parent 371 731ad6d27bd1
child 393 db01cc79f278
--- a/hedgewars/uAI.pas	Sun Jan 28 16:40:04 2007 +0000
+++ b/hedgewars/uAI.pas	Sun Jan 28 20:58:06 2007 +0000
@@ -134,7 +134,7 @@
                   AddAction(MadeActions, aia_HJump, 0, 305, 0, 0);
                   AddAction(MadeActions, aia_HJump, 0, 350, 0, 0);
                   if (Me^.dX < 0) then AddAction(MadeActions, aia_WaitXL, hwRound(AltMe.X), 0, 0, 0)
-                                 else AddAction(MadeActions, aia_WaitXR, hwRound(AltMe.X), 0, 0, 0);
+                                  else AddAction(MadeActions, aia_WaitXR, hwRound(AltMe.X), 0, 0, 0);
                   end;
        if (BotLevel < 3) and (GoInfo.JumpType = jmpLJump) then // ljump support
           if Push(ticks, Actions, AltMe, Me^.Message) then
@@ -142,7 +142,7 @@
                   begin
                   AddAction(MadeActions, aia_LJump, 0, 305, 0, 0);
                   if (Me^.dX < 0) then AddAction(MadeActions, aia_WaitXL, hwRound(AltMe.X), 0, 0, 0)
-                                 else AddAction(MadeActions, aia_WaitXR, hwRound(AltMe.X), 0, 0, 0);
+                                  else AddAction(MadeActions, aia_WaitXR, hwRound(AltMe.X), 0, 0, 0);
                   end;
        if not CanGo then break;
        inc(steps);
@@ -162,13 +162,13 @@
        if ((Me^.State and gstAttacked) = 0)
            and ((steps mod 4) = 0) then
            begin
-           if SDL_GetTicks - AIThinkStart > 3 then
+           TestAmmos(Actions, Me);
+           if SDL_GetTicks - AIThinkStart >= cTimerInterval then
               begin
               dec(Actions.Count, 3);
               Push(ticks, Actions, Me^, Me^.Message);
               exit
-              end;
-           TestAmmos(Actions, Me)
+              end
            end
        end;
 until false