[fa.info-terms] Ann Arbor Ambassador termcaps

info-terms (06/08/82)

>From teklabs!tekid!clives@Berkeley Mon Jun  7 23:48:37 1982
Hi Mark: 

We've had some system problems here, so am resending you this. Please
let me know if you get it.

I'm enclosing the latest set of Ann Arbor termcaps in use at this site,
Tektronix Instrument Division Vax. The core one is aaa36.

Also included are some mods we found helpful for the vt-100/132 and TAB
terminals to fix auto-margin on vi, a termcap for the Tek (OEM'ed) CT-8500,
some better versions for the gamut of Tek DVST terminals, and a slight mod
for the Tek 402x's.

Here are some problems with the Ann Arbor termcaps you sent on the net:

(Please don't consider them at all personal - I have some inkling of 
the headache you've taken on, just hope these help.)

	1. Neither yours nor Rand's adequately initializes the multifarous
	   modes, thus may not cancel previous intended or otherwise
	   terminal programming.

	2. Your version causes our rogue (3.6) to strangle and die during it's
	   initialization. Rand is ok in this regard.

	   (I've had this problem before - seemed to have something to do
	   with vi/ve strings. So I eliminated them. One never wants
	   unhappy rogue players on one's case!)

	3. Both yours and Rand's use underline for vi cursor -
	   much harder to find than block cursor in text.

	4. Rand erases screen on terminal initialization - very bad for logins.
	   One loses motd, mail, news, bb info.

	5. Yours erases vi screen coming out - our users don't like this
	   or general erase on exit behavior. They like the remains of the
	   text to be there.

	6. Yours causes bold stuff in emacs to come out in reverse video, 
	   and puts cursor in the wrong place on exit.


So, here they are. Thanks for your efforts to keep us all up to date, it is
appreciated by those who end up with some site responsibility for it (!).


				Clive Steward
				!teklabs!tekid!clives
				Tektronix, Inc. 39-133
				P.O. Box 500
				Beaverton, Oregon 97077
#
# various screensize ann arbor termcaps
# all flow into aaa36, the default
#
aA|aaa18|ann arbor ambassador with 18 line screen:\
	:is=\E7\E[60;;;18p\E[m\E9\E8\E[m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:li#18:ti=\E[18;;;18p\E[J\E[>31h:\
	:te=\E7\E[60;;;18p\E8\E[J\E[>31l:\
	:tc=aaa:
aB|aaa20|ann arbor ambassador with 20 line screen:\
	:is=\E7\E[60;;;20p\E[m\E9\E8\E[m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:li#20:ti=\E[20;;;20p\E[J\E[>31h:\
	:te=\E7\E[60;;;20p\E8\E[J\E[>31l:\
	:tc=aaa:
aC|aaa22:ann arbor ambassador with 22 line screen:\
	:is=\E7\E[60;;;22p\E[m\E9\E8\E[m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:li#22:ti=\E[22;;;22p\E[J\E[>31h:\
	:te=\E7\E[60;;;22p\E8\E[J\E[>31l:\
	:tc=aaa:
aD|aaa24|ann arbor ambassador with 24 line screen:\
	:is=\E7\E[60;;;24p\E[m\E9\E8\E[m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:li#24:ti=\E[24;;;24p\E[J\E[>31h:\
	:te=\E7\E[60;;;24p\E8\E[J\E[>31l:\
	:tc=aaa:
aE|aaa26|ann arbor ambassador with 26 line screen:\
	:is=\E7\E[60;;;26p\E[m\E9\E8\E[m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:li#26:ti=\E[26;;;26p\E[J\E[>31h:\
	:te=\E7\E[60;;;26p\E8\E[J\E[>31l:\
	:tc=aaa:
aF|aaa28|ann arbor ambassador with 28 line screen:\
	:is=\E7\E[60;;;28p\E[m\E9\E8\E[m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:li#28:ti=\E[28;;;28p\E[J\E[>31h:\
	:te=\E7\E[60;;;28p\E8\E[J\E[>31l:\
	:tc=aaa:
aG|aaa30|ann arbor ambassador with 30 line screen:\
	:is=\E7\E[60;;;30p\E[m\E9\E8\E[m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:li#30:ti=\E[30;;;30p\E[J\E[>31h:\
	:te=\E7\E[60;;;30p\E8\E[J\E[>31l:\
	:tc=aaa:
#
# This one (aaa36) is the recommended normal line window
# (If you like big letters, aaa24 is good)
#
# Notes Bene:
#
# The large number of is string flag inits is quite necessary - 
# that's the price of Ann Arbor's mode flexibility
#
# The erase key is made to function "normally" by reprogramming it in is.
#
# No separate ve vs entries since using them to change the cursor mode
# at least caused big problems with (how could you!) rogue.
#
aH|aaa36|aaa|ambassador|ann arbor|ann arbor ambassador|aa-100|ann arbor ambassador with 36 lines:\
	:is=\E7\E[60;;;36p\E[m\E9\E8\E[m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:co#80:am:bs:pt:\
	:cd=\E[J:ce=\E[K:cl=\E[;;;p\E[J:\
	:cm=\E[%i%d;%dH:ch=\E[%i%d\140:cv=\E[%i%dd:nd=\E[C:\
	:dc=\E[P:dl=\E[M:al=\E[L:ei=:ic=\E[@:im=:\
	:ks=\E[>27h:\
	:ku=\E[A:kd=\E[B:kr=\E[C:kl=\E[D:kh=\E[H:\
	:ke=\E[>27l:\
	:li#36:se=\E[m:so=\E[1m:ue=\E[m:us=\E[4m:\
	:ti=\E[36;;;36p\E[J\E[>31h:\
	:te=\E7\E[60;;;36p\E8\E[J\E[>31l:\
	:bw:do=\ED:up=\EM:
aI|aaa40|ann arbor ambassador with 40 line screen:\
	:is=\E7\E[60;;;40p\E[m\E9\E8\E[m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:li#40:ti=\E[40;;;40p\E[J\E[>31h:\
	:te=\E7\E[60;;;40p\E8\E[J\E[>31l:\
	:tc=aaa:
aJ|aaa48|ann arbor ambassador with 48 line screen:\
	:is=\E7\E[60;;;48p\E[m\E9\E8\E[m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:li#48:ti=\E[48;;;48p\E[J\E[>31h:\
	:te=\E7\E[60;;;48p\E8\E[J\E[>31l:\
	:tc=aaa:
aK|aaa60|ann arbor ambassador with 60 line screen:\
	:is=\E7\E[60;;;60p\E[m\E9\E8\E[m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:li#60:ti=\E[60;;;60p\E[J\E[>31h:\
	:te=\E7\E[60;;;60p\E8\E[J\E[>31l:\
	:tc=aaa:
#
# The following operate the terminal in inverse video
#
aL|aaa18inv|ann arbor ambassador with inverse video and 18 lines:\
	:is=\E7\E[60;;;18p\E[7m\E9\E8\E[7m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:se=\E[7m:\
	:li#18:ti=\E[18;;;18p\E[J:\
	:te=\E7\E[60;;;18p\E8\E[J:\
	:tc=aaa:
aM|aaa24inv|ann arbor ambassador with inverse video and 24 lines:\
	:is=\E7\E[60;;;24p\E[7m\E9\E8\E[7m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:se=\E[7m:\
	:li#24:ti=\E[24;;;24p\E[J:\
	:te=\E7\E[60;;;24p\E8\E[J:\
	:tc=aaa:
aN|aaa36inv|ann arbor ambassador with inverse video and 36 lines:\
	:is=\E7\E[60;;;36p\E[7m\E9\E8\E[7m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:se=\E[7m:\
	:ti=\E[36;;;36p\E[J:\
	:te=\E7\E[60;;;36p\E8\E[J:\
	:tc=aaa:
aO|aaa60inv|ann arbor ambassador with inverse video and 60 lines:\
	:is=\E7\E[60;;;60p\E[7m\E9\E8\E[7m\
\E[>6;4;20;18;51;46;38;31;32;30;50;47;40;26;27;25;52;29;36;39l\
\E[>37;35;28;34;33h\E[1Q\E[X\
\EP\140>y~[[;;;{P}~[[J\E\\:\
	:se=\E[7m:\
	:li#60:ti=\E[J:\
	:te=\E7\E[;;;p\E8\E[J:\
	:tc=aaa:
#
# vt-100 entry: took out am, xn since this terminal has a different notion
# of autowrap from vi/curses. vi calculates it fine.
# Clive Steward 5 April 1982
#
d1|vt100|vt-100|pt100|pt-100|dec vt100:\
	:co#80:li#24:cl=50\E[;H\E[2J:bs:cm=5\E[%i%2;%2H:nd=2\E[C:up=2\E[A:\
	:ce=3\E[K:cd=50\E[J:so=2\E[7m:se=2\E[m:us=2\E[4m:ue=2\E[m:\
	:is=\E>\E[?3l\E[?4l\E[?5l\E[?7h\E[?8h:ks=\E[?1h\E=:ke=\E[?1l\E>:\
	:if=/usr/lib/tabset/vt100:ku=\EOA:kd=\EOB:kr=\EOC:kl=\EOD:\
	:kh=\E[H:k1=\EOP:k2=\EOQ:k3=\EOR:k4=\EOS:pt:sr=5\EM:

# Took out xn on vt-132 so autowrap will work right - see vt-100 comment above
# Clive Steward 5 April 1982

d3|vt132|vt-132:\
	:al=99\E[L:dl=99\E[M:ip=7:dc=7\E[P:ei=\E[4l:im=\E[4h:dN#30:tc=vt100:

# This CT8500 termcap imported as-is from Walker Road
# Not well tested but seems to work - Clive Steward 5 April 1982

o2|ct8500|OEM terminal ct8500:\
	:al=\E^L:am:bs:cd=\E^U:ce=\E^T:cl=\E^D:cm=\E|%+ %+ :co#80:da:\
	:db:dc=\E^]:dl=\E^M:ho=\ET:ic=\E^\:kd=\EQ:ke=\E]:kh=\ET:kl=\EP:\
	:kn#7:ko=al,cd,ce,cl,dc,dl,ic:kr=\ES:ks=\E=:ku=\ER:li#25:se=\E :sg#1:\
	:so=\E$:ue=\E :ug#1:up=\ER:us=\E\041:
#
# Tab 132/15 terminal entries revised 3/29/82
#
# Select x-on/off mode, VT132 mode, smooth/jump scroll and tab stops
# from keyboard.
M1|tab132|tab|tab 132/15 with 80 columns:\
	:is=\E<\E[20l\E[}\E[?7h:\
	:al=\E[L:bs:cd=\E[J:ce=\E[K:cl=\E[2J\E[H:cm=\E[%i%d;%dH:co#80:da:db:\
	:dc=\E[P:dl=\E[M:do=\E[B:ei=\E[4l:im=\E[4h:kd=\E[B:kl=\E[D:kr=\E[C:\
	:ku=\E[A:li#24:mi:ms:nd=\E[C:pt:se=\E[m:sf=\ED:so=\E[7m:sr=\EM:\
	:ue=\E[m:ul:up=\E[A:us=\E[4m:
M2|tab132w|tabw|tab 132/15 with 132 columns:\
	:is=\E<\E[20l\E[}\E[?3h\E[?7h:co#132:tc=tab132:
M3|tab132rv|tab 132/15 with 80 columns, reverse video:\
	:is=\E<\E[20l\E[}\E[?5h\E[?7h:tc=tab132:
M4|tab132wrv|tab 132/15 with 132 columns, reverse video:\
	:is=\E<\E[20l\E[}\E[?3h\E[?5h\E[?7h:co#132:tc=tab132:
#
# Tektronix storage terminal entries revised 3/17/82
#
Xa|tek|tek4012|4012|tektronix 4012:\
	:is=\E^O:bs:cl=1000\E^L:co#74:ns:li#35:os:
Xb|tek4013|4013|tektronix 4013:\
	:as=\E^N:ae=\E^O:tc=4012:
Xc|tek4014|4014|tektronix 4014:\
	:is=\E^O\E9:co#81:li#38:dF#1000:tc=tek4012:
Xd|tek4015|4015|tektronix 4015:\
	:as=\E^N:ae=\E^O:tc=4014:
Xe|tek4014sm|4014sm|tektronix 4014 in small font:\
	:is=\E^O\E\072:co#121:li#58:tc=tek4014:
Xf|tek4015sm|4015sm|tektronix 4015 in small font:\
	:as=\E^N:ae=\E^O:tc=4014sm:
Xg|tek4006|4006|tektronix 4006:\
	:bs@:tc=tek4012:
Xh|tek4010|4010|tektronix 4010:\
	:tc=tek4012:
Xi|tek4051|4051|tektronix 4051:\
	:tc=tek4012:
#
# moded to fix home key
#
X5|4025|4027|4024|tek4025|tek4027|tek4024|4025cu|4027cu|tektronix 4024/4025/4027:\
	:is=\41com 31\r\n^_sto 9,17,25,33,41,49,57,65,73\r:\
	:ks=^_lea p4 /h/\r^_lea p8 /k/\r^_lea p6 / /\r^_lea p2 /j/\r^_lea p5 /H/\r:\
	:ke=^_lea p2\r^_lea p4\r^_lea p6\r^_lea p8\r^_lea p5\r:\
	:am:bs:da:db:pt:li#34:co#80:cl=^_era\r\n\n:up=^K:nd=^_rig\r:\
	:al=145^_up\r^_ili\r:dl=^_dli\r:\
	:dc=^_dch\r:im=^_ich\r:ei=^F\n^K:nl=^F\n:\
	:ce=^_dch 80\r:cd=^_dli 50\r:CC=^_:

info-terms (06/11/82)

>From teklabs!tekid!clives@Berkeley Thu Jun 10 19:57:37 1982
Hi Mark - 

Still haven't gotten confirmation that one of the mailing addresses is 
getting through to you. However, apparently one person connected to 
berkeley did get the termcaps, and sent me a note, which I enclose
along with my reply.

*************** Forwarded **************************

From: teklabs!ucbvax!mclure
Date: Tue  8 Jun 1982 at 0153
Date: 8 Jun 82 0:44-PDT
From: mclure at SRI-UNIX
To: teklabs!tekid!clives at berkeley, mark at berkeley
Subject: Tek Ambassador Termcap entry: caution

Since I liked the description of your Ambassador changes, I went
ahead and tried a test version of Termcap incorporating the new
version.  Unfortunately, they seem to be grossly buggy.  The
Ambassador termcap version from Rand (and Berkeley's) worked perfectly
with our local Emacs look-a-like Elle.  The Tektronix version does
lots of strange things.  For one, it causes the screen to spazz when
the init and cursor addressing initialization strings are sent.
Second, and more serious, it does weird things with control keys!  For
example, the command ^N in Elle means go to next line.  In the other
Termcap descriptions of the Ambassador this simple command worked
properly in Elle.  However, now it merely causes Elle to beep.  There
are a number of other control characters that seem to have been
disabled, ^X, ^Z, ^P, etc.  I withdrew back to the previous Termcap we
had (Rand's) and all is working properly again.

I recommend caution with this Ambassador description. It seems to have
problems.

**************** My reply ******************

To: teklabs!ucbvax!mclure,teklabs!ucbcad!csvax:mark
Subject: Re: Tek Ambassador Termcap entry: caution
In-reply-to: Your message of Tue  8 Jun 1982 at 0153,
    8 Jun 82 0:44-PDT.
--------
Howdy -

Thanks for your comments.

Wonder what the difficulty is? Many programs in regular use here exercise
all the things you've had problems with. In particular, I have a copy of the
CMU-Jim Gosling emacs up here which works fine.  We have about 20 Ann Arbors
on line at the moment, no problems.

I'm thinking that the "spazzing" you mention is the important clue.
That's certainly not normal operation.

Such a thing could happen, along with all else you describe, if there was
a comm problem. We once had a port multiplexer here which didn't really like
long full-speed bursts sent through it, for instance. The terminal init 
sequence for this termcap is 110 characters long. 

I'd like to hear further if you find a cause.  And would you please pass this
on to mark? I got a rejection notice from a ucb mailer daemon about the return
address on his original net article, and don't know a sure good one yet.

			Clive Steward