home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 7 / 007.d81 / write (.txt) < prev   
Commodore BASIC  |  2022-08-26  |  243b  |  20 lines
  1. 10 open15,8,15
  2. 20 open2,8,2,"#"
  3. 30 :
  4. 40 print"what do you want to put on the disk?"
  5. 50 input a$
  6. 60 :
  7. 70 tr=10 : se=15
  8. 80 :
  9. 90 print#2,a$
  10. 100 :
  11. 110 print#15,"u2:"2;0;tr;se
  12. 120 :
  13. 125 print:print:print
  14. 127 :
  15. 130 print"o.k."
  16. 140 print"writing complete!!"
  17. 150 :
  18. 160 close2:close15
  19. 170 end
  20.