+- QB64 Phoenix Edition (https://qb64phoenix.com/forum)
+-- Forum: QB64 Rising (https://qb64phoenix.com/forum/forumdisplay.php?fid=1)
+--- Forum: Code and Stuff (https://qb64phoenix.com/forum/forumdisplay.php?fid=3)
+---- Forum: Utilities (https://qb64phoenix.com/forum/forumdisplay.php?fid=8)
+---- Thread: Find that angle (/showthread.php?tid=1414)
Find that angle - James D Jarvis - 01-21-2023
a little function to find the angle (measured in radians) from point x1,y1 to point x2,y2
Code: (Select All)
Function Rtan2 (x1, y1, x2, y2)
'========================
' returns an angle in radians between points x1,y1 and x2,y2
deltaX = x2 - x1
deltaY = y2 - y1
rtn = _Atan2(deltaY, deltaX)
If rtn < 0 Then Rtan2 = rtn + (2 * _Pi) Else Rtan2 = rtn
End FunctionRE: Find that angle - OldMoses - 01-22-2023
I love _ATAN2, no trapping for division by zero required.
RE: Find that angle - bplus - 01-22-2023
Yeah don't even have to go to Florida!