10 PRINT "This is the first line" 20 PRINT "This is the second line" 30 GOSUB 60:REM in-text remarks are kept though for convenience 40 PRINT "This is the end of test" 50 GOTO 70 60 FOR X=1 TO 23:PRINT ".";:NEXT X:PRINT:RETURN 70 END