#COMPILE EXE "s91_beep.exe"
#INCLUDE ONCE "windows_core.pbi"
' Sample: GetSystemMetrics WinAPI call
FUNCTION PBMAIN() AS LONG
    DIM w AS QUAD, h AS QUAD
    w = GetSystemMetrics(0)   ' SM_CXSCREEN
    h = GetSystemMetrics(1)   ' SM_CYSCREEN
    PRINT "Screen resolution via WinAPI:"
    PRINT "Width:"; w
    PRINT "Height:"; h
    FUNCTION = 0
END FUNCTION
