home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #18 / NN_1992_18.iso / spool / comp / sys / apple2 / 19102 < prev    next >
Encoding:
Internet Message Format  |  1992-08-15  |  1.4 KB
  1. Path: sparky!uunet!cis.ohio-state.edu!ucbvax!gnh-cathouse.cts.com!kimba
  2. From: kimba@gnh-cathouse.cts.com (Kim Brennan)
  3. Newsgroups: comp.sys.apple2
  4. Subject: Re: BASIC listing => TEXT file ??
  5. Message-ID: <m0mJfVC-00011vC@crash.cts.com>
  6. Date: 16 Aug 92 08:16:38 GMT
  7. Sender: daemon@ucbvax.BERKELEY.EDU
  8. Distribution: world
  9. Organization: The Internet
  10. Lines: 27
  11. X-Unparsable-Date: Sat Aug 15 92 at 17:46:19 (EST)
  12.  
  13. > From: JOEL@jach.hawaii.edu (Joel Aycock)
  14. > Does anyone know how I can get an ASCII text file on disk, from a BASIC
  15. > program listing? I want to be able to transfer readable listings to
  16. > another (non-Apple) machine.... 
  17.  
  18. you insert something like the following in the code (forgive any precise
  19. errors, as it has been quite a while since I did Applesoft programming):
  20.  
  21. In the Basic Programming with ProDOS manual there is a small program that
  22. demonstrates how to do this...It is called LISTSELF (Page 93).
  23.  
  24. In the code of your program have something like this...
  25.  
  26. 10 D$=CHR$(4)
  27. 20 PRINT D$"OPEN LISTFILE"
  28. 30 PRINT D$"WRITE LISTFILE"
  29. 40 LIST
  30. 50 PRINT D$"CLOSE LISTFILE"
  31. 60 STOP
  32.  
  33. Then all you have to do is run 10, and your file will be listed in a text
  34. file.
  35.  
  36.                     -=> Message from Kim Brennan <=-
  37.                       (kimba@gnh-cathouse.cts.com)
  38.          {Cathouse BBS (301) 840-8567 3/12/24/9600 V.32 24 hours}
  39.       * "This is Rumor Control, and here are the facts." (Alien 3) *
  40.