REM GFA- nach Sharp-Konvertierungstest
REM
GOSUB proc
REM
GOTO label
label:
REM
PRINT "Test 1"
REM
RESTORE
REM
FOR i=0 TO 4
  PRINT "Test 2"
NEXT i
REM
IF i=i
  PRINT "Test 3"
ENDIF
REM
RESTORE daten
READ d$
PRINT d$
REM
PROCEDURE proc
  PRINT "Test 4"
  HARDCOPY
RETURN
REM
daten:
DATA dummy