Public Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long
Public Declare Function QueryPerformanceFrequency Lib "kernel32" (lpFrequency As Currency) As Long
Public Declare Function QueryPerformanceCounter Lib "kernel32" (lpPerformanceCount As Currency) As Long
Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Public Const PI As Single = 3.14159265358979
Public Const PI2 As Single = 6.28318530717959
Public Const PI_3 As Single = 1.0471975511966
Public Const Deg2Rad As Single = PI / 180
Public Const power31 = &H80000000