#COMPILE EXE "s78_time.exe"
' Sample: TIME$ and TIMER functions
FUNCTION PBMAIN() AS LONG
    DIM start AS DOUBLE, elapsed AS DOUBLE
    PRINT "Current time: "; TIME$
    start = TIMER
    PRINT "TIMER (seconds since start):"; start
    FUNCTION = 0
END FUNCTION
