ICh habe es jetzt ein wenig geändert!!!

define x byte
define y byte
define z ad[1]

#loop
IF not z >=30 then goto loop

#Start
x = timer
goto Stop

#Stop
y = Timer-x
print y
pause = 100
IF z >= 1 then goto Stop2
gosub start


#Stop2
pause = 100
goto loop