' Common Win32 API Constants as % equates
#COMPILE EXE
#DIM ALL

CONST WM_DESTROY = &H0002
CONST WM_SIZE = &H0005
CONST WM_MOVE = &H0003
CONST WM_CLOSE = &H0010
CONST WM_QUIT = &H0012
CONST WM_PAINT = &H000F
CONST WM_CREATE = &H0001
CONST WM_COMMAND = &H0111
CONST WM_LBUTTONDOWN = &H0201
CONST WM_LBUTTONUP = &H0202
CONST WM_RBUTTONDOWN = &H0204
CONST WM_RBUTTONUP = &H0205
CONST WM_MOUSEMOVE = &H0200
CONST WM_KEYDOWN = &H0100
CONST WM_KEYUP = &H0101
CONST WM_CHAR = &H0102
CONST WM_TIMER = &H0113
CONST WM_USER = &H0400
CONST WS_OVERLAPPED = &H00000000
CONST WS_POPUP = &H80000000
CONST WS_CHILD = &H40000000
CONST WS_MINIMIZE = &H20000000
CONST WS_VISIBLE = &H10000000
CONST WS_DISABLED = &H08000000
CONST WS_CLIPSIBLINGS = &H04000000
CONST WS_CLIPCHILDREN = &H02000000
CONST WS_MAXIMIZE = &H01000000
CONST WS_CAPTION = &H00C00000
CONST WS_BORDER = &H00800000
CONST WS_DLGFRAME = &H00400000
CONST WS_VSCROLL = &H00200000
CONST WS_HSCROLL = &H00100000
CONST WS_SYSMENU = &H00080000
CONST WS_THICKFRAME = &H00040000
CONST WS_MINIMIZEBOX = &H00020000
CONST WS_MAXIMIZEBOX = &H00010000
CONST WS_OVERLAPPEDWINDOW = WS_OVERLAPPED OR WS_CAPTION OR WS_SYSMENU OR WS_THICKFRAME OR WS_MINIMIZEBOX OR WS_MAXIMIZEBOX
CONST WS_POPUPWINDOW = WS_POPUP OR WS_BORDER OR WS_SYSMENU
CONST SW_HIDE = 0
CONST SW_SHOWNORMAL = 1
CONST SW_SHOWMINIMIZED = 2
CONST SW_SHOWMAXIMIZED = 3
CONST SW_SHOWNOACTIVATE = 4
CONST SW_SHOW = 5
CONST SW_RESTORE = 9
CONST MB_OK = 0
CONST MB_OKCANCEL = 1
CONST MB_YESNO = 4
CONST MB_YESNOCANCEL = 3
CONST MB_RETRYCANCEL = 5
CONST MB_ICONERROR = 16
CONST MB_ICONQUESTION = 32
CONST MB_ICONWARNING = 48
CONST MB_ICONINFORMATION = 64
CONST MB_DEFBUTTON1 = 0
CONST MB_DEFBUTTON2 = 256
CONST MB_DEFBUTTON3 = 512
CONST IDOK = 1
CONST IDCANCEL = 2
CONST IDABORT = 3
CONST IDRETRY = 4
CONST IDIGNORE = 5
CONST IDYES = 6
CONST IDNO = 7
CONST CW_USEDEFAULT = &H80000000
CONST COLOR_WINDOW = 5
CONST COLOR_BTNFACE = 15
CONST COLOR_HIGHLIGHT = 13
CONST COLOR_WINDOWTEXT = 8
CONST GENERIC_READ = &H80000000
CONST GENERIC_WRITE = &H40000000
CONST FILE_SHARE_READ = 1
CONST FILE_SHARE_WRITE = 2
CONST OPEN_EXISTING = 3
CONST CREATE_ALWAYS = 2
CONST OPEN_ALWAYS = 4
CONST INVALID_HANDLE_VALUE = -1
FUNCTION PBMAIN() AS LONG
    PRINT "Win32 API Constants Reference"
    PRINT "============================"
    PRINT ""
    PRINT "Window Messages:"
    PRINT "  WM_DESTROY = "; HEX$(WM_DESTROY)
    PRINT "  WM_CREATE = "; HEX$(WM_CREATE)
    PRINT "  WM_PAINT = "; HEX$(WM_PAINT)
    PRINT "  WM_CLOSE = "; HEX$(WM_CLOSE)
    PRINT "  WM_COMMAND = "; HEX$(WM_COMMAND)
    PRINT ""
    PRINT "Window Styles:"
    PRINT "  WS_OVERLAPPED = "; HEX$(WS_OVERLAPPED)
    PRINT "  WS_CAPTION = "; HEX$(WS_CAPTION)
    PRINT "  WS_SYSMENU = "; HEX$(WS_SYSMENU)
    PRINT "  WS_OVERLAPPEDWINDOW = "; HEX$(WS_OVERLAPPEDWINDOW)
    PRINT ""
    PRINT "Message Box:"
    PRINT "  MB_OK = "; MB_OK
    PRINT "  MB_YESNO = "; MB_YESNO
    PRINT "  MB_ICONERROR = "; MB_ICONERROR
    PRINT "  MB_ICONINFORMATION = "; MB_ICONINFORMATION
    PRINT ""
    PRINT "ShowWindow:"
    PRINT "  SW_SHOW = "; SW_SHOW
    PRINT "  SW_HIDE = "; SW_HIDE
    PRINT "  SW_RESTORE = "; SW_RESTORE
    PRINT ""
    PRINT "Constants loaded successfully."

    FUNCTION = 0
END FUNCTION
