10 oldAt%=@%:@%=&20109
 20 ON ERROR REPORT:@%=oldAt%:PRINT:END
 30 
 40 MODE 7
 50 
 60 PRINT "USING INTEGER VARS"
 70 PRINT " Using FOR"
 80 pre%=TIME DIV 100
 90 FOR iter%=1 TO 10000:NEXT
100 post%=TIME DIV 100
110 PRINT iter% / (post% - pre%)
120 
130 PRINT '" Using REPEAT"
140 pre%=TIME DIV 100
150 iter%=0:REPEAT:iter%=iter%+1:UNTIL iter%=10000
160 post%=TIME DIV 100
170 PRINT iter% / (post% - pre%)
180 
190 PRINT '"USING FLOAT VARS"
200 PRINT " Using FOR"
210 pre%=TIME DIV 100
220 FOR iter=1 TO 10000:NEXT
230 post%=TIME DIV 100
240 PRINT iter / (post% - pre%)
250 
260 PRINT '" Using REPEAT"
270 pre%=TIME DIV 100
280 iter=0:REPEAT:iter=iter+1:UNTIL iter=10000
290 post%=TIME DIV 100
300 PRINT iter / (post% - pre%)
310 
320 @%=oldAt%