global proc float calcDistance(float $pos1X, float $pos1Z, float $pos2X, float $pos2Z)
{
	float $distance = sqrt(pow(($pos1X - $pos2X),2) + pow(($pos1Z - $pos2Z),2));
	return $distance;
}