#COMPILE EXE
#DIM ALL

DECLARE FUNCTION MessageBoxA LIB "user32.dll" ALIAS "MessageBoxA" (BYVAL hWnd AS QUAD, BYVAL lpText AS ASCIIZ PTR, BYVAL lpCaption AS ASCIIZ PTR, BYVAL uType AS LONG) AS LONG

FUNCTION PBMAIN() AS LONG
    LOCAL result AS LONG
    result = MessageBoxA(0, "Hello from PBXA64!", "WinAPI Test", 0 + 64)
    PRINT "MsgBox returned:", result
    FUNCTION = 0
END FUNCTION
