Path: utzoo!utgpu!news-server.csri.toronto.edu!rutgers!cs.utexas.edu!uunet!naitc!ddsw1!zane From: zane@ddsw1.MCS.COM (Sameer Parekh) Newsgroups: comp.sys.apple2 Subject: Re: Applesoft BASIC Message-ID: <1990Aug19.012206.27798@ddsw1.MCS.COM> Date: 19 Aug 90 01:22:06 GMT References: <24148@uflorida.cis.ufl.EDU> Reply-To: zane@ddsw1.MCS.COM (Sameer Parekh) Distribution: na Organization: ddsw1.MCS.COM Contributor, Wheeling, IL Lines: 32 In article <24148@uflorida.cis.ufl.EDU> bb0@beach.cis.ufl.edu () writes: >I have several rather large programs written in Applesoft BASIC. I now want >to make some changes, but I find these files hard to work with in the BASIC >environment. Is there a way to translate the BASIC files to text files? >Getting them back is simple enough, but these are 10-15 page programs and I'm >NOT going to retype them! >Any help is greatly appreciated! > >-Bowie bb0@beach.cis.ufl.edu > or > garm%pine.decnet@oak.circa.ufl.edu What I would do is change line 0: 0 GOTO [LINE AFTER ALL OTHER LINES] Then put in the following program. (At that LINE, I will call it 10000) 10000 ?CHR$(4);"OPEN ";FILENAME$ 10100 ?CHR$(4);"WRITE ";FILENAME$ 10200 LIST 1-[LAST LINE IN PROGRAM] 10300 ?CHR$(4);"CLOSE ";FILENAME$ 10400 END Be sure you have FILENAME$ equal to a valid filename, (Don't use a variable, just put something in.) Then you will have a text file which you can import into AppleWorks, Proterm, or others. -- Sameer Parekh | Disclaimer: I do not work for anyone. Libertyville IL 60048 | ()_____________ () (708)-362-9659 | / \ zane@ddsw1.MCS.COM | ~~~~/~~~~~~~\~~~~