1 2 3 4 5 6 7
10 REM TOKEN NAMES IN THIS COMMENT MUST STAY LITERAL: PRINT IF THEN GOTO 20 A$ = "FOR I=1 TO 10 : NEXT I" 30 PRINT A$ 40 IF LEN(A$) > 0 THEN GOSUB 100 50 END 100 PRINT "SUBROUTINE" 110 RETURN