Requesting 4425/5425 Termcaps

Sat Mar 15 09:01:42 AEST 1986

# In article <126 at andromeda.UUCP> dave at andromeda.UUCP (Dave Bloom) writes:
# >Does anyone out there have a good termcap for Bell's
# >4425 Terminal? I will gladly summarize for those in- >terested.
# Here are the useful entries from my UNIXPC for the 44**/54**.

# -----cut here and run through sh-----
echo "Here is the termcap information from my AT&T UNIX PC."
echo "It should be relatively current; I'm not sure you can"
echo "trust some of the capital-letter features such as KM,"
echo "but I've included the kmap files in case you can."
echo "Either install them somewhere useful or zap them out."

echo "x - termcap.5425"
cat <<EOF >termcap.5425
# AT&T Teletype 5425 Terminal (a.k.a 4425)
# June 5, 1985
5425|4425|tty5425|att4425|AT&T Teletype 5425:\
	:al=\E[L:am:bs:cd=\E[J:ce=\E[K:cl=\E[H\E[J:\
	:cm=\E[%i%2;%2H:co#80:\
	:dc=\E[P:dl=\E[M:ei=\E[4l:im=\E[4h:\
	:kd=\E[B:kh=\E[H:kl=\E[D:kr=\E[C:ku=\E[A:\
	:li#24:nd=\E[C:se=\E[m:so=\E[2;7m:sr=\EM:\
	:ue=\E[m:up=\E[A:us=\E[4m:\
	:EE=\E[m:BO=\E[0;7m:DS=\E[2m:FL=\E[%d;00q%-16s\E~:FE=\E|:\
	:KM=/usr/lib/ua/kmap.5425:\
	:is=\E[0m^O\E[1;2;3;4;6l\E[12;13;14;20l\E[?6l\E[?7h\E[4i\E[9;0j\E[10;0j\E[11;0j\E[21;1j\E[25;1j\212:\
	:db:mi:pt:kn#8:\
	:k1=\EOc:k2=\EOd:k3=\EOe:k4=\EOf:k4=\EOg:k6=\EOh:\
	:k7=\EOi:k8=\EOj:\
	:ve=\E[12;0j:vs=\E[12;1j:ko=bt,nd,up,dc,dl,ho,im,al:
EOF

echo "x - termcap.5410"
cat <<EOF >termcap.5410
# AT&T Teletype 5410 Terminal (a.k.a. 4410)
# June 5, 1985
#
# Although the 5410 supports labels, it blanks the screen after
# each label is programmed creating to much visual activity.
# To use the labels, use FL=\E[%d;00q%-16s
#
5410|4410|tty5410|att4410|AT&T Teletype 5410 terminal with 80 columns:\
	:al=\E[L:am:bs:cd=\E[J:ce=\E[K:cl=\E[H\E[J:\
	:cm=5\E[%i%2;%2H:co#80:\
	:dc=\E[P:dl=\E[M:im=:ei=:ic=\E[@:\
	:kd=\E[B:kh=\E[H:kl=\E[D:kr=\E[C:ku=\E[A:\
	:li#24:nd=\E[C:se=\E[m:so=\E[2;7m:sr=\EM:\
	:ue=\E[m:up=\E[A:us=\E[4m:\
	:EE=\E[m:BO=\E[0;7m:DS=\E[2m:\
	:KM=/usr/lib/ua/kmap.5410:\
	:is=\E[0m^O\E[?6l:\
	:kn#8:\
	:k1=\EOc:k2=\EOd:k3=\EOe:k4=\EOf:k4=\EOg:k6=\EOh:\
	:k7=\EOi:k8=\EOj:\
	:ko=nd,up,ho:
EOF

echo "x - termcap.5420"
cat <<EOF >termcap.5420
# AT&T Teletype 5420 Terminal (a.k.a. 4415)
# June 5, 1985
5420|4415|tty5420|att4415|AT&T Teletype 5420 terminal:\
	:al=\E[L:am:bs:cd=\E[J:ce=\E[K:cl=\E[H\E[J:\
	:cm=\E[%i%2;%2H:co#80:\
	:dc=\E[P:dl=\E[M:im=\E[4h:ei=\E[4l:\
	:kd=\E[B:kh=\E[H:kl=\E[D:kr=\E[C:ku=\E[A:\
	:li#24:nd=\E[C:se=\E[m:so=\E[2;7m:sr=\EM:\
	:ue=\E[m:up=\E[A:us=\E[4m:\
	:EE=\E[m:BO=\E[0;7m:DS=\E[2m:\
	:KM=/usr/lib/ua/kmap.5420:\
	:is=\E[0m^O\E[1;2;3;4;6l\E[12;13;14;20l\E[?6;97;99l\E[?7h\E[4i\Ex\E[25;1j\212\E[8;0j\E[9;0j\E[10;0j\E[19;1j:\
	:db:mi:pt:kn#8:\
	:k1=\EOc:k2=\EOd:k3=\EOe:k4=\EOf:k4=\EOg:k6=\EOh:\
	:k7=\EOi:k8=\EOj:\
	:ve=\E[11;0j:\
	:vs=\E[11;1j:ko=bt,nd,up,dc,dl,ho,im,al:
EOF

echo "x - kmap.5425"
cat <<EOF >kmap.5425
#
# key map file for AT&T Teletype 4425/5425 Terminal
#
BackTab		\E[Z
# Screen Labeled Function Keys
F1		\EOc
F2		\EOd
F3		\EOe
F4		\EOf
F5		\EOg
F6		\EOh
F7		\EOi
F8		\EOj
# Screen Labeled Function Keys - shifted
# No shifted SLKs on 5425/4425
#
# Left Keypad Function Keys
ClearLine	\E[2K
Dlete		\E[M
Mark		\EOS
DleteChar	\E[P
InputMode	\E[L
InputMode	\E[4h
# Left Keypad Function Keys - shifted
# No left shifted
#
# Right Keypad Function Keys
Exit		\EOR
Cmd		\EOP
Back		\E[D
Beg		\Et
Home		\E[H
Up		\E[A
Down		\E[B
Cancl		\EOQ
End		\Ez
Forward		\E[C
# Right Keypad Function Keys - shifted
RollUp		\E[S
RollDn		\E[T
# 3270 PF keys
# None
EOF

echo "x - kmap.5410"
cat <<EOF >kmap.5410
#
# key map file for AT&T Teletype 4410/5410 keyboard
#
BackTab		\E[Z
# Screen Labeled Function Keys
# Correspond to keys f1 to f8 on 5410 keyboard
F1		\EOP
F2		\EOQ
F3		\EOR
F4		\EOS
F5		\EOT
F6		\EOU
F7		\EOV
F8		\EOW
# Screen Labeled Function Keys - shifted
# On 4410/5410, default settings do not transmit
#
# Left Keypad Function Keys
# On 4410/5410, no left keypad
#
# Left Keypad Function Keys - shifted
# No shifted ones either
#
# Right Keypad Function Keys
# Right keypad is very limited
#
Back		\E[D
Home		\E[H
Up		\E[A
Down		\E[B
End		\E[24;1H
Forward		\E[C
Clear		\E[2J
# 3270 PF keys
# No 3270 keys
EOF

echo "x - kmap.5420"
cat <<EOF >kmap.5420
#
# key map file for AT&T Teletype 4420/5420 keyboard
#
BackTab		\E[Z
# Screen Labeled Function Keys
F1		\EOc
F2		\EOd
F3		\EOe
F4		\EOf
F5		\EOg
F6		\EOh
F7		\EOi
F8		\EOj
# Screen Labeled Function Keys - shifted
# On 4410/5410, default settings do not transmit
#
# Left Keypad Function Keys
ClearLine	\E[2J
ClearLine	\E[2K
Dlete		\E[M
DleteChar	\E[P
InputMode	\E[4h
InputMode	\E[L
# Left Keypad Function Keys - shifted
# No shifted ones either
#
# Right Keypad Function Keys
# Right keypad is very limited
#
Beg		\Et
Back		\E[D
Home		\E[H
Up		\E[A
Down		\E[B
Page		\E[U
End		\Eu
End		\Ez
Forward		\E[C
# Right Keypad Function Keys - shifted
#
Clear		\E[2J
RollUp		\E[S
RollDn		\E[T
s-Page		\E[V
# 3270 PF keys
# No 3270 keys
EOF

echo "Here are the word counts you should get"
cat <<EOF
     35    119    597 kmap.5410
     46    134    699 kmap.5420
     42    119    614 kmap.5425
      8     61    645 termcap.5410
      3     29    586 termcap.5420
      3     27    592 termcap.5425
EOF

echo "Here are the word counts for the files you received"
wc kmap.5410 kmap.5420 kmap.5425 termcap.5410 termcap.5420 termcap.5425

echo "That's all, folks"
-- 
# Bill Stewart, AT&T Bell Labs 2G-202, Holmdel NJ 1-201-949-0705 ihnp4!ho95c!wcs