Re: Converting

[andreasw@algonet.se (Andreas Wennborg)]

Bart A Flentje (flen0001@gold.tc.umn.edu) wrote:

: Does anyone have a clue to convert Applesoft BASIC files (attribute A) to 
: apple text files (attribute T)? 

Clip out the text below, and save it to a disk as a TXT file with, for 
example, the name BASIC2TXT.

    1) Load your applesoft program to memory.
    2) Type EXEC BASIC2TXT

The text file lands on volume /Ram5 with name the BASIC.TXT, change this 
if it doesn't suit your system.

Notice - your applesoft program cannot have program lines higher than 60699.
-----Clip here ------- 
60700  HOME:PRINT "            HANG ON...
60705  PRINT
60710 D$=CHR$(4)
60760  PRINT D$"OPEN /RAM5/BASIC.TXT"
60761  PRINT D$"APPEND /RAM5/BASIC.TXT"
60762  PRINT D$"WRITE /RAM5/BASIC.TXT"
60763  POKE 33,30: PRINT : PRINT : LIST 0,60699
60765  PRINT D$"CLOSE /RAM5/BASIC.TXT": TEXT : POKE 33,40
60766  VTAB 23: HTAB 10:INVERSE:PRINT "DONE.":NORMAL
60768 DEL 60700,60768
RUN 60700
------ Clip ------

This routine is written for ProDOS, I notice that you probably are 
running DOS 3.3, it shouldn't be so hard to convert this routine to work 
under DOS 3.3.

/Andreas

-- 
 :::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::: 
 Andreas Wennborg          andreasw@algonet.se          Chefs do not surf
 ::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::