
//Load from Com Save to Tape

5 ON BREAK GOTO80
10 CLOSE#1
20 CLOSE#9
30 OPENOUT#1,1,"<YOUR FILENAME>"
40 OPEN#9,9
50 INPUT#9,a
60 PUT#1,a
70 GOTO 50
80 Close#1
100 END

//After Error 200 type Close#1


//Load from Tape Save to Com

5 ON BREAK GOTO80
10 CLOSE#1
20 CLOSE#9
30 OPEN#1,1
40 OPEN#9,9
50 GET#1,a
60 PRINT#9,a
70 GOTO 50
80 Close#1
100 END

// Ignore Error 133 Past End of File