Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!csd4.milw.wisc.edu!lll-winken!uunet!mcvax!np1!h75
From: h75@np1.hep.nl (Henk Uijterwaal)
Newsgroups: comp.sys.apple
Subject: Re: applesoft file to text file
Message-ID: <149@np1.hep.nl>
Date: 23 Mar 89 08:09:47 GMT
References: <8903212330.aa10283@SMOKE.BRL.MIL>
Reply-To: h75@np1.hep.nl (Henk Uijterwaal)
Organization: Nikhef-H, Amsterdam (the Netherlands).
Lines: 22

In article <8903212330.aa10283@SMOKE.BRL.MIL> CHRIS@BROWNVM.BITNET (Christopher Chung) writes:
>Is there any easy to convert an applesoft file into a text file.  I need
>to upload many applesoft files to my mainframe for editting but they need
>to be converted to text file format first.  Is there a simple way to do it
>without having to load each file by hand.  Perhaps some program???
>Please send replies directly to me as I don't always to a chance to read the
>list in a timely manner.
>
Add these lines to your program:

  62000 D$=CHR$(4)
  62010 POKE 33,33
  62020 PRINT D$;"OPEN TEXTFILE"
  62030 PRINT D$;"WRITE TEXTFILE"
  62040 LIST ,61999
  62050 PRINT D$;"CLOSE TEXTFILE"
  62060 TEXT
  62070 END

Now type RUN 62000 and your file will be listed on a textfile.

Henk Uijterwaal.