home *** CD-ROM | disk | FTP | other *** search
/ Nibble Magazine / nib41b.dsk / TEXT.FILER.bas < prev   
BASIC Source File  |  2023-02-26  |  333b  |  10 lines
  1. 10  REM  PROGRAM TEXT.FILER
  2. 20  REM  SAVES A BASIC PROGRAM TO A TEXT FILE
  3. 30  REM  ASSUMES LINE RANGE OF 1-30000
  4. 40  REM  TO USE ADD TO END OF PROGRAM AND GOTO LINE 40
  5. 50  PRINT  CHR$(4)"OPEN LISTFILE"
  6. 60  REM  USE APPROPRIATE PATHNAME
  7. 70  PRINT  CHR$(4)"WRITE LISTFILE"
  8. 80  LIST 1 -30000
  9. 90  PRINT  CHR$(4)"CLOSE LISTFILE"
  10. 100  END