Hi Jon
I have not followed in detail your problem with TRA but I have often used
it successfully.
I have a TRA_EPSON for my EPSON printer which I send as an attachment since
it contains control codes.
Here is the BASIC TRA program to compare with yours >>>
100 REMark TRA-command for RS232 Translations
110 REMark Jan Bredenbeek, Hilversum
120 REMark 1986 April 13
130 :
140 DIM v(3)
150 start=ALCHP(1024)
160 POKE_W start,19195: REMark $4AFB
170 table_a=start+6: table_b=start+262
180 POKE_W start+2,table_a-start: POKE_W start+4,table_b-start
190 FOR i=0 TO 255:POKE table_a+i,i
200 pointer=table_b+1
210 ncodes=0
220 CLS
230 REPeat loop
240 INPUT "Code ? (ENTER to stop)"!a$
250 IF a$="" THEN EXIT loop
260 REPeat loop1
270 INPUT "Number of replace codes (1-3) ?"!n
280 IF n>0 AND n<4 THEN EXIT loop1
290 END REPeat loop1
300 FOR i=1 TO n
310 INPUT "replace code"!(i);"?:"!v(i)
320 END FOR i
330 IF n=1 THEN
340 POKE table_a+a$,v(1)
350 ELSE
360 POKE table_a+a$,0
370 POKE pointer,a$
380 FOR i=1 TO n:POKE pointer+i,v(i)
390 ncodes=ncodes+1
400 pointer=pointer+4
410 END IF
420 END REPeat loop
430 POKE table_b,ncodes
440 TRA start,0
445 INPUT "full new TRA file name ";a$
450 SBYTES a$,start,pointer-start
460 PRINT "You may reload your codes with:"
470 PRINT "a=ALCHP(";pointer-start;")"
480 PRINT "LBYTES ";a$;",a"
490 PRINT "TRA a"
500 REMark *** end of listing TRA1_b
To use tra_epson you must do:
a=alchp(263):lbytes win1_tra_epson,a:tra a
and NOT use lrespr
I have often modified the TRA_x using SPY or QD (not sure) for a special
purpose. I admit it is some time that I used TRA and there have been many
changes since.
Good luck with TRA la la!
Ian Pizer, 49 ch. Machery, 1292 Chambesy, Geneva.
e-mail [EMAIL PROTECTED] tel.41227581410
epson
