hedgewars/uAIAmmoTests.pas
changeset 7671 43f38923bc6e
parent 7620 fa3bc79dc0b8
child 7716 95117607b81a
equal deleted inserted replaced
7670:9485b88f6a44 7671:43f38923bc6e
   121             );
   121             );
   122 
   122 
   123 const BadTurn = Low(LongInt) div 4;
   123 const BadTurn = Low(LongInt) div 4;
   124 
   124 
   125 implementation
   125 implementation
   126 uses uAIMisc, uVariables, uUtils, uGearsHandlers, uCollisions;
   126 uses uAIMisc, uVariables, uUtils, uGearsHandlers;
   127 
   127 
   128 function Metric(x1, y1, x2, y2: LongInt): LongInt; inline;
   128 function Metric(x1, y1, x2, y2: LongInt): LongInt; inline;
   129 begin
   129 begin
   130 Metric:= abs(x1 - x2) + abs(y1 - y2)
   130 Metric:= abs(x1 - x2) + abs(y1 - y2)
   131 end;
   131 end;