' 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