home *** CD-ROM | disk | FTP | other *** search
/ Sound Sensations! / sound_sensations.iso / miscprog / sngedt / ft.bas (.txt) < prev    next >
Encoding:
GW-BASIC  |  1990-05-05  |  757 b   |  17 lines
  1. 1  CLS:PRINT "SONG EDITOR. File Translator into BASIC-Interpritator "
  2. 3  PRINT "This program will help you to translate  Song Editor basic output file"
  3. 4  PRINT "to BASIC-Interpritator file. This should be done by the following way:"
  4. 5  PRINT "  1. Enter the name of the file which you want to translate."
  5. 6  PRINT "  2. Your file will be shown on the screen."
  6. 7  PRINT "  3. To memorize this file one should set cursor on each line and press Enter."
  7. 8  PRINT "  4. Then save file on the disk. That's it."
  8. 9  PRINT "To repeat this procedure you need to load the File Translator program again."
  9. 10  INPUT "Enter file name :",F$
  10. 15  OPEN F$ FOR INPUT AS #1
  11. 20  IF EOF(1)=-1 THEN GOTO 45
  12. 25  INPUT #1,A$
  13. 30  I=I+5
  14. 35  PRINT I;A$
  15. 40  GOTO 20
  16. 45  PRINT "That's it!":DELETE 1-45
  17.