1 2 3 4 5 6 7 8 | INPUT "Enter Filename: "; n$OPEN n$ FOR OUTPUT AS #1PRINT #1, "This is saved to the file."CLOSEOPEN n$ FOR INPUT AS #1INPUT #1, a$PRINT "Read from file: "; a$CLOSE |
1 2 3 4 5 6 7 8 | INPUT "Enter Filename: "; n$OPEN n$ FOR OUTPUT AS #1PRINT #1, "This is saved to the file."CLOSEOPEN n$ FOR INPUT AS #1INPUT #1, a$PRINT "Read from file: "; a$CLOSE |