hedgewars/uAI.pas
changeset 6317 83b93a2d2741
parent 5600 c6da15eddab3
child 6328 d14adf1c7721
child 6392 f2ef5a8cccb4
equal deleted inserted replaced
6316:ac23ba018ed2 6317:83b93a2d2741
   265 if (PGear(Me)^.State and gstAttacked) = 0 then
   265 if (PGear(Me)^.State and gstAttacked) = 0 then
   266    if Targets.Count > 0 then
   266    if Targets.Count > 0 then
   267       begin
   267       begin
   268       WalkMe:= BackMe;
   268       WalkMe:= BackMe;
   269       Walk(@WalkMe);
   269       Walk(@WalkMe);
   270       if (StartTicks > GameTicks - 1500) and not StopThinking then SDL_Delay(1000);
   270       if (StartTicks > GameTicks - 1500) and (not StopThinking) then SDL_Delay(1000);
   271       if BestActions.Score < -1023 then
   271       if BestActions.Score < -1023 then
   272          begin
   272          begin
   273          BestActions.Count:= 0;
   273          BestActions.Count:= 0;
   274          AddAction(BestActions, aia_Skip, 0, 250, 0, 0);
   274          AddAction(BestActions, aia_Skip, 0, 250, 0, 0);
   275          end;
   275          end;