DistanceBetweenUnits
not ratedDistance Between Two Units
function DistanceBetweenUnits takes unit unitA, unit unitB returns real
return SquareRoot((GetUnitX(unitB) - GetUnitX(unitA)) * (GetUnitX(unitB) - GetUnitX(unitA)) + (GetUnitY(unitB) - GetUnitY(unitA)) * (GetUnitY(unitB) - GetUnitY(unitA)))
endfunction
No comments.