Post by tbird on Nov 12, 2019 22:18:38 GMT -6
Hey n00b I am not entirely sure what this means but I keep getting an error with this code: "Error on Line 33 in bug_test_001.bas: Expected identifier of same type in assignment"
This works fine in 3.10, is there something in the new version that requires variable definition now?
Function Atan2(a, b)
radian = 0
pi = 3.14159
if b > 0 then
radian = atan(a/b)
elseif b < 0 and a >= 0 then
radian = atan(a/b) + pi
elseif b < 0 and a < 0 then
radian = atan(a/b) - pi
elseif b = 0 and a > 0 then
radian = pi / 2
elseif b = 0 and a < 0 then
radian = 0 - (pi / 2 )
elseif b = 0 and a = 0 then
radian = 1000 'represents undefined
end if
return radian
End Function
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'Get the degrees
Function GetDirection(mPX, mPY, posX, posY)
pi = 3.14159
radian = atan2((mPY - posY), (mPX - posX))
degrees = radian * 180 / pi
return degrees
End Function
