hedgewars/uAIActions.pas
changeset 7721 2b1ad418ba39
parent 7671 43f38923bc6e
child 7901 a86ccf3da9ca
equal deleted inserted replaced
7720:8e6b79a020f8 7721:2b1ad418ba39
   232             
   232             
   233             aia_Put:
   233             aia_Put:
   234                 doPut(X, Y, true);
   234                 doPut(X, Y, true);
   235                 
   235                 
   236             aia_waitAngle:
   236             aia_waitAngle:
   237                 if Me^.Angle <> Abs(Param) then exit;
   237                 if LongInt(Me^.Angle) <> Abs(Param) then exit;
   238 
   238 
   239             aia_waitAmmoXY:
   239             aia_waitAmmoXY:
   240                 if (CurAmmoGear <> nil) and ((hwRound(CurAmmoGear^.X) <> X) or (hwRound(CurAmmoGear^.Y) <> Y)) then exit;
   240                 if (CurAmmoGear <> nil) and ((hwRound(CurAmmoGear^.X) <> X) or (hwRound(CurAmmoGear^.Y) <> Y)) then exit;
   241 
   241 
   242             end
   242             end