10 FOR I=0 TO 500:PRINT I:NEXT
20 IF STRIG(0) THEN 10 ELSE 20