#COMPILE EXE "s73_format_print.exe"
' Sample: Formatted output
FUNCTION PBMAIN() AS LONG
    DIM price AS SINGLE
    price = 19.99
    PRINT "Product   Price"
    PRINT "--------   -----"
    PRINT "Widget     "; FORMAT$(price, "0.00")
    PRINT "Gadget     "; FORMAT$(price*2, "0.00")
    PRINT "Total      "; FORMAT$(price*3, "0.00")
    FUNCTION = 0
END FUNCTION
