global i
subroutine timeit()
	iter = 0
	starter = msec
	while True
		iter += 1
		if msec >= starter + i then exit while
	end while
	print iter; " iteraciones en "; i; " milisegundo";
	if i > 1 then print "s" else print
end subroutine

for i = 1 to 3
	call timeit()
next i

i = 200
call timeit()
end