10 REM Files: writing and reading
20 DIM L$(40)
30 OPEN #1,8,0,"D:NOTES.TXT"
40 PRINT #1;"First line"
50 PRINT #1;"Second line"
60 PRINT #1;12345
70 CLOSE #1
80 OPEN #1,4,0,"D:NOTES.TXT"
90 TRAP 140
100 INPUT #1,L$
110 PRINT "Read: ";L$
120 GOTO 100
140 CLOSE #1
150 PRINT "End of the file, error ";PEEK(195)