#COMPILE EXE "s09_baseconv.exe"
' Sample: Number base conversion
FUNCTION PBMAIN() AS LONG
    DIM val AS LONG
    val = 255
    PRINT "Decimal:"; val
    PRINT "HEX$ = "; HEX$(val)
    PRINT "OCT$ = "; OCT$(val)
    PRINT "BIN$ = "; BIN$(val)
    FUNCTION = 0
END FUNCTION
