#COMPILE EXE "s57_strptr.exe"
' Sample: STRPTR - string pointer
FUNCTION PBMAIN() AS LONG
    DIM s AS STRING
    s = "Hello World"
    PRINT "String: "; s
    PRINT "Length ="; LEN(s)
    PRINT "STRPTR result available for WinAPI calls"
    FUNCTION = 0
END FUNCTION
