EDTXTRAM REVISITED - for an HP71/Text Editor ROM



V6N6  included  a program, EDTXTRAM, for producing formatted textfiles  in  RAM.
EDTXTRAM requires  the  presence of another program, EDRDPRAM, in RAM. While the
latter is in RAM ALL textfiles that are formatted by the TEXT EDITOR ROM will be
formatted  in RAM.  To obviate the problem I included lines 30 (to read EDRDPRAM
from tape/disc) and 90 (... @ PURGE EDRDPRAM @ ...).  That is all  well and good
provided a tape/disc drive is handy. Without one, EDTXTRAM (V6N6P41) is useless.

What follows  is  an  alternative  version  of  EDTXTRAM  that  is  functionally
identical  to  the  previous  version  but  depends  on  the presence of  EDRDPR
(EDRDPRAM in TEXTfile form) in RAM.  Line 101 copies EDRDPR to EDRDPRAM and then
TRANSFORMs EDRDPRAM into BASIC at the start of each session.  When program usage
is terminated, EDRDPRAM is automatically deleted. 

100 ! EDTXTRAM
101 DISP "Working..." @ COPY EDRDPR TO EDRDPRAM @ TRANSFORM EDRDPRAM INTO BASIC
102 ON ERROR GOTO 103 @ CREATE TEXT FMT @ OFF ERROR @ GOTO 104
103 PURGE FMT @ GOTO 102
104 ON ERROR GOTO 107 @ BEEP 200 @ INPUT "Filename ? ";S$ @ CAT S$
    @ CALL EDFORM(S$,1,"")
105 F$=S$[1,LEN(S$)-1]&"Z" @ ON ERROR GOTO 106 @ RENAME FMT TO F$ @ CAT F$
    @ GOTO 104
106 OFF ERROR @ PURGE F$ @ GOTO 105
107 OFF ERROR @ PURGE EDRDPRAM @ BEEP 800 @ PUT "#43" @ END

Mark Cracknell [#129A]