' Simple benchmark program - PvE.
' The higher the outcome, the better the performance.
' Just to save typing, BCX's NOW$ function isn't applicable here
const NOW = time(null)
DIM endtime as INTEGER
DIM t as DOUBLE
endtime = NOW + 10
DO
t = t + 0.0001
LOOP WHILE NOW < endtime
PRINT "Result is: ", t