; Script to test buzzscript speed
; written by James Johnston

;test with 5000 loops
;
;(disable/enable a combiantion of the below 3 statements...
;execoff means only debugging info is displayed (no program flow)
;debugoff completely disables the debugging
;and mtoff disables multitasking - BE CAREFUL WITH THIS COMMAND!!!
;its only designed for small slow program loops...not whole scripts)

execoff
debugoff
mtoff

setstring nol 5000

setstring start timer

LABEL again

ADD 1 TRACKCOUNT

COMPARE TRACKCOUNT nol
ISLESS again
setstring end timer
mton
subtract start end
info end
ENDSCRIPT


