Sub GetJoyTrackBall(joy_num, ball, ByRef dx, ByRef dy)

Gets the axis values of a track ball