Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

How to #OUTPUT the & character

91 views
Skip to first unread message

Keith

unread,
Nov 16, 2023, 9:33:59 PM11/16/23
to
I want to print the & character from #OUTPUT. Tried setting #OUTFORMAT and #INFORMAT but it doesn't seem to work. TACL keeps thinking it is a continuation char.

Randall

unread,
Nov 17, 2023, 2:41:32 PM11/17/23
to
On Thursday, November 16, 2023 at 9:33:59 p.m. UTC-5, Keith wrote:
> I want to print the & character from #OUTPUT. Tried setting #OUTFORMAT and #INFORMAT but it doesn't seem to work. TACL keeps thinking it is a continuation char.

Does this work?

#SET #OUTFORMAT PRETTY
#OUTPUT Hello ~&

You can also try
#OUTPUT Hello ~&~_


j-ma...@pacbell.net

unread,
Nov 17, 2023, 3:41:33 PM11/17/23
to
This is probably overkill, but it's what I do when I need to output control characters:

[#DEF DELTA^CMD DELTA |BODY|J38I]
[#DEF AMPERSAND TEXT |BODY|[#DELTA /COMMANDS DELTA^CMD/]]
#output Here is an Ampersand: [AMPERSAND]

Jon Marcus

Randall

unread,
Nov 18, 2023, 1:53:10 PM11/18/23
to
Well, if you're going to use DELTA... (good show)

JShepherd

unread,
Nov 20, 2023, 10:31:24 AM11/20/23
to
In article <71f38adc-536e-4757...@googlegroups.com>,
kga...@gmail.com says...
[#def CHARACTER struct
begin
byte ampb value 38;
char amp redefines ampb;
end;
]
#output [CHARACTER:amp]


== similar with 6530 control codes
[#def T6530 struct
begin
byte b0(0:1) value 27 73 ;
char clear(0:1) redefines b0;
byte b1(0:1) value 27 111 ;
char line25(0:1) redefines b1;
end;
]

[#output [T6530:line25(0:1)] Line 25 Text ]

==
== have tacl put session info on line 25
==
?section _prompter routine
#frame
#push _text
[#def T6530 struct
begin
byte b0(0:1) value 27 73 ;
char clear(0:1) redefines b0;
byte b1(0:1) value 27 111 ;
char line25(0:1) redefines b1;
end;
]
#set _text [#DEFAULTS] [#MYTERM] [#USERNAME [#PROCESSINFO/PAID/]]
#set _text [_text] [#PROCESSINFO/processid/]
#set _text [#SHIFTSTRING /down/ [_text] ]
[#output [T6530:line25(0:1)] [_text] ]
#unframe



0 new messages