Code:
:DistanceBetweenTwoPoints
0063: 0@ -= 3@ // (float)
0063: 1@ -= 4@ // (float)
0063: 2@ -= 5@ // (float)
006B: 0@ *= 0@ // (float)
006B: 1@ *= 1@ // (float)
006B: 2@ *= 2@ // (float)
005B: 0@ += 1@ // (float)
005B: 0@ += 2@ // (float)
01FB: 0@ = square_root 0@
ret 1 0@
Usage:
Code:
0AB1: call_scm_func @DistanceBetweenTwoPoints 6 Point_1 5@ 6@ 7@ Point_2 8@ 9@ 10@ RetTo 11@
:sadpepe: For no SF users