home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib37b.dsk / READ.FILE.bas < prev    next >
BASIC Source File  |  2023-02-26  |  244b  |  11 lines
  1. 10 D$ =  CHR$(4): REM  Control-D
  2. 20  PRINT D$;"OPEN SEQUENTIAL.FILE"
  3. 30  PRINT D$;"READ SEQUENTIAL.FILE"
  4. 40  FOR I = 1 TO 7
  5. 50  INPUT A$(I)
  6. 60  NEXT I
  7. 70  PRINT D$;"CLOSE SEQUENTIAL.FILE"
  8. 80  FOR I = 1 TO 7
  9. 90  PRINT A$(I)
  10. 100  NEXT I
  11. 110  END