Re: BASIC to TeXT

[dalloff@freenet.columbus.oh.us (Dave Althoff)]

J. L. Walters (bird@MCS.COM) wrote:

: The following is more generic in that you do not have to change it for
: each file you want to save. It is the result of a large amount of
: feedback from other experts on the net. If someone has a "better"
: version I (and others), would love to see it so it can become the
: 'standard'. 

: The following is one line and "?" is an alias for: PRINT

: 0 PRINT CHR$(21): TEXT:HOME:D$ = CHR$ (4):INPUT "File Name?";A$: PRINT
: D$"OPEN"A$: PRINT D$"WRITE"A$: POKE 33,33:LIST 1- : PRINT
: D$"CLOSE":TEXT:END

Two suggestions, Joe:

1)  Suggest changing the INPUT statement to use all-caps for ][+
    compatability.

2)  Does "LIST 1-" actually work from within a program?  I seem to recall
    having trouble with that syntax (though it works fine from immediate
    mode).  Using LIST 1,63999 is fairly bullet-proof under Applesoft;
    though it would require a change to LIST 1,32767 for Integer BASIC.

A trick for using the above program is to put that one line into a text
file.  Then load your BASIC program, and EXEC the text file with the
text-capture program.  That will add Line 0 to the beginning of your
program so that you can run the file capture.

The same technique is useful for loading subroutine libraries; something I
have done on occasion.  For instance, if I discover I need to use a
"Flashing Touch Now" prompt in a program, I can simply EXEC that
subroutine from a library disk into my program, and use a GOSUB 60010 to
execute it.

--Dave Althoff, ][.
-- 
    /-\      Celebrating the International Year of the Roller Coaster
   /XXX\      /X\     /X\_      _     /XX\_      _     _        _____  
  /XXXXX\    /XXX\  _/XXXX\_   /X\   /XXXXX\    /X\   /X\      /XXXXX
_/XXXXXXX\__/XXXXX\/XXXXXXXX\_/XXX\_/XXXXXXX\__/XXX\_/XXX\_/\_/XXXXXX