mirror of
https://github.com/CHOMPStation2/CHOMPStation2.git
synced 2025-12-10 10:12:45 +00:00
ecd8125771
Co-authored-by: silicons <2003111+silicons@users.noreply.github.com> Co-authored-by: silicons <no@you.cat>
38 lines
859 B
Plaintext
38 lines
859 B
Plaintext
/**
|
|
* checks distance from one thing to another but automatically resolving for turf / nesting
|
|
*/
|
|
/proc/in_range_of(atom/A, atom/B, dist = 1)
|
|
return game_range_to(A, B) <= dist
|
|
|
|
/**
|
|
* gets real dist from A to B, including resolving for turf. if not the same Z, returns infinity.
|
|
*/
|
|
/proc/game_range_to(atom/A, atom/B)
|
|
A = get_turf(A)
|
|
B = get_turf(B)
|
|
return A.z == B.z? get_dist(A, B) : INFINITY
|
|
|
|
/**
|
|
* real dist because byond dist doesn't go above 127 :/
|
|
*
|
|
* accepts **TURFS**
|
|
*/
|
|
/proc/get_chebyshev_dist(turf/A, turf/B)
|
|
return max(abs(A.x - B.x), abs(A.y - B.y))
|
|
|
|
/**
|
|
* real euclidean dist
|
|
*
|
|
* accepts **TURFS**
|
|
*/
|
|
/proc/get_euclidean_dist(turf/A, turf/B)
|
|
return sqrt((A.x - B.x) ** 2 + (A.y - B.y) ** 2)
|
|
|
|
/**
|
|
* real taxicab dist
|
|
*
|
|
* accepts **TURFS**
|
|
*/
|
|
/proc/get_manhattan_dist(turf/A, turf/B)
|
|
return abs(A.x - B.x) + abs(A.y - B.y)
|