diff -r a889cb350930 -r 6023a4f06013 hedgewars/uUtils.pas --- a/hedgewars/uUtils.pas Mon Oct 30 21:59:25 2017 +0100 +++ b/hedgewars/uUtils.pas Mon Oct 30 22:06:43 2017 +0100 @@ -57,8 +57,6 @@ function DxDy2AttackAngle(const _dY, _dX: hwFloat): LongInt; function DxDy2AttackAnglef(const _dY, _dX: extended): LongInt; -function PointDistance(const x1, x2, y1, y2: hwFloat; checkWrap: boolean): hwFloat; - procedure SetLittle(var r: hwFloat); function Str2PChar(const s: shortstring): PChar; @@ -379,37 +377,6 @@ DxDy2AttackAnglef:= trunc(arctan2(_dY, _dX) * (cMaxAngle/pi)) end; -function PointDistance(const x1, x2, y1, y2: hwFloat; checkWrap: boolean): hwFloat; -var dist_center, dist_across: hwFloat; -vx1, vx2, vy1, vy2: hwFloat; -begin - // Sort values - vx1:= x1; - vx2:= x2; - vy1:= y1; - vy2:= y2; - if x1 < x2 then - begin - vx1:= x2; - vx2:= x1; - end; - if y1 < y2 then - begin - vy1:= y2; - vy2:= y1; - end; - if checkWrap and (WorldEdge = weWrap) then - begin - dist_center:= Distance(vx2-vx1, vy2-vy1); - dist_across:= Distance((vx2 - int2hwFloat(LeftX)) + (int2hwFloat(RightX) - vx1), vy2-vy1); - if (dist_across < dist_center) then - PointDistance:= dist_across - else - PointDistance:= dist_center; - end - else - PointDistance:= Distance(vx2-vx1, vy2-vy1); -end; procedure SetLittle(var r: hwFloat); begin