[mod.sources] v08i018: A Micro-Emacs variant that resembles GNU Emacs

sources-request@mirror.UUCP (01/27/87)

Submitted by: Bob Larson <seismo!usc-oberon!blarson>
Mod.sources: Volume 8, Issue 18
Archive-name: micrognu/Part11


#! /bin/sh
# This is a shell archive, meaning:
# 1. Remove everything above the #! /bin/sh line.
# 2. Save the resulting text in a file.
# 3. Execute the file with /bin/sh (not csh) to create the files:
#	sys/vms/termcap/termcap.B
# This archive created: Sat Nov 15 15:52:56 1986
export PATH; PATH=/bin:$PATH
if test -f 'sys/vms/termcap/termcap.B'
then
echo shar: will not over-write existing file "'sys/vms/termcap/termcap.B'"
else
cat << \SHAR_EOF > 'sys/vms/termcap/termcap.B'
# basis from Peter Harrison, Computer Graphics Lab, San Francisco
#   ucbvax!ucsfmis!harrison ...uucp / ucbvax!ucsfmis!harrison@BERKELEY ...ARPA
ba|basis|BASIS108 computer with terminal translation table active:\
	:cr=^M:do=5000^J:nl=5000*^J:bl=^G:\
	:cd=\EY:ce=\ET:cl=300\E*:ma=^K^P^R^L^L :\
	:kb=^H:kl=^H:ku=^K:kr=^L:kd=^J:so=\E(:se=\E):tc=adm3a:
# Reports are that most of these Beehive entries (except superbee) have not been
# tested and do not work right.  se is a trouble spot.  Be warned.
b2|sb2|sb3|fixed superbee:xb@:tc=superbee:
bh|bh3m|beehiveIIIm:if=/usr/lib/tabset/beehive:\
	:al=160^S:am:bs:cd=^R:ce=^P:cl=^E^R:co#80:dl=350^Q:ho=^E:li#20:ll=^E^K:\
	:nd=^L:pt:se= ^_:so=^] :up=^K:
# This loses on lines > 80 chars long, use at your own risk
bi|superbeeic|super bee with insert char:\
	:ic=:im=\EQ:ei=\ER:tc=superbee:
bm|microb|microbee|micro bee series:\
	:am:bs:cd=\EJ:ce=\EK:cl=\EE:co#80:cm=\EF%+ %+ :\
	:k1=\Ep:k2=\Eq:k3=\Er:k4=\Es:k5=\Et:k6=\Eu:k7=\Ev:k8=\Ew:k9=\Ex:\
	:kd=\EB:kh=\EH:kl=\ED:kr=\EC:ku=\EA:\
	:li#24:nd=\EC:pt:se=\Ed@ :so= \EdP:ue=\Ed@:up=\EA:us=\Ed`:
# Superbee - f1=escape, f2=^C.
# Note: there are at least 3 kinds of superbees in the world.  The sb1
# holds onto escapes and botches ^C's.  The sb2 is the best of the 3.
# The sb3 puts garbage on the bottom of the screen when you scroll with
# the switch in the back set to CRLF instead of AEP.  This description
# is tested on the sb2 but should work on all with either switch setting.
# The f1/f2 business is for the sb1 and the :xb: can be taken out for
# the other two if you want to try to hit that tiny escape key.
# This description is tricky: being able to use cm depends on there being
# 2048 bytes of memory and the hairy nl string.
bs|sb1|superbee|superb|beehive super bee:if=/usr/lib/tabset/stdcrt:is=\EE:\
	:am:bs:cd=3\EJ:ce=3\EK:cl=3\EH\EJ:co#80:cm=\EF%r%3%3:cr=1000\r:\
	:dC#10:da:db:xb:dc=3\EP:dl=100\EM:so=\E_1:se=\E_0:\
	:li#25:nl=\n\200\200\200\n\200\200\200\EA\EK\200\200\200\ET\ET:\
	:nd=\EC:pt:up=\EA:ho=\EH:ve=\n:\
	:k1=\Ep:k2=\Eq:k3=\Er:k4=\Es:k5=\Et:k6=\Eu:k7=\Ev:k8=\Ew:\
	:kd=\EB:kh=\EH:kl=\ED:kr=\EC:ku=\EA:
# From vax135!hpk  Sat Jun 27 07:41:20 1981
# There seem to be a number of different versions of the C108 PROMS
# (with bug fixes in its Z-80 program).
# The first one that we had would lock out the keyboard if you send
# lots of short lines (like /usr/dict/words) at 9600 baud.
# Try that on your C108 and see if it sends a ^S when you type it.
# If so, you have an old version of the PROMs.
# The old one also messed up running vi with a 132-character line-length.
# You should configure the C108 to send ^S/^Q before running this.
# It's much faster (at 9600 baud) than the c100 because delays aren't fixed.
c4|c104|concept104|concept 104:\
	:is=\EU\Ef\E7\E5\E8\El\ENH\EK\E\200\Eo&\200\Eo\47\E:\
	:ti=\EU\Ev  8p\Ep\r:te=\Ev    \200\200\200\200\200\200\Ep\r\n:\
	:al=3*\E^R:am:bs:cd=16*\E^C:ce=16\E^S:cl=2*^L:cm=\Ea%+ %+ :co#80:\
	:dc=16\E^Q:dl=3*\E^B:ei=\E\200:eo:im=\E^P:in:ip=16*:li#24:mi:nd=\E=:\
	:pt:kb=^H:ta=8\t:ul:up=\E;:db:us=\EG:ue=\Eg:xn:vs=\EW:ve=\Ew:\
	:vb=\Ek\200\200\200\200\200\200\200\200\200\200\200\200\200\200\EK:\
	:us=\EG:ue=\Eg:ks=\EX:ke=\Ex:ku=\E;:kd=\E<:kl=\E>:kr=\E=:kh=\E?:\
	:k1=\E5:k2=\E6:k3=\E7:.dN#9:dC#9:vt#8:
c8|c108|c108-8|concept 108 w/8 pages and ^S/^Q:\
	:ti=\EU\Evh 8p\Ep\r:te=\Ev  ^A\177p\Ep\r\n:tc=c108-4:
c9|c108-rv-8p|concept108-rv-8p|concept 108 w/8 pages, in reverse video:\
	:vb=\EK\200\200\200\200\200\200\200\200\200\200\200\200\200\200\Ek:\
	:is=\EU\E F\Ef\E7\E5\E8\El\ENH\Ek\E\200\Eo&\200\Eo\47\E\E!\E^G!\E^HA@ :\
	:ts=\E z"\E?\E^C\EE\Ea %+ :fs=\Ee\E z :\
	:tc=c108-8:
cS|c108|c108-4|concept 108 w/4 pages and ^S/^Q:\
	:is=\EU\E F\Ef\E7\E5\E8\El\ENH\EK\E\200\Eo&\200\Eo\47\E:\
	:ti=\EU\Evh 8p\Ep\r:te=\Ev  \177p\Ep\r\n:\
	:al=\E^R:am:bs:cd=\E^C:ce=\E^S:cl=\E?\E^E:cm=\Ea%+ %+ :co#80:\
	:dc=\E^A:dl=\E^B:ei=\E\200:eo:im=\E^P:in:ip=:li#24:mi:nd=\E=:\
	:kb=^H:ul:up=\E;:db:us=\EG:ue=\Eg:xn:vs=\EW:ve=\Ew:\
	:vb=\Ek\200\200\200\200\200\200\200\200\200\200\200\200\200\200\EK:\
	:us=\EG:ue=\Eg:ks=\EX:ke=\Ex:ku=\E;:kd=\E<:kl=\E>:kr=\E=:kh=\E?:\
	:k1=\E5:k2=\E6:k3=\E7:so=\ED\EE:se=\Ed\Ee:
# Concept AVT: uses all cabilities, not VT100 compatible
# xon/xoff & wraparound set by is=, arrow and home keys set on for vi
# ch= & cv= not tested because they're not used by 4.1bsd vi
# by Tom Strong, amber:strong@ucbvax
c5|avt|HDS concept avt w/4 or 8 pages, 80 columns:\
	:is=\E[1*q\E[2!t\E[7!t\E[=4;101;103;119l\E[=107;118;207h\
\E)1\E[1Q\EW\E[0\0720\07232!r\E[w\E2\r\n:\
	:ae=^O:al=\E[L:am:as=^N:bs:bt=\E[Z:cd=\E[J:ce=\E[K:\
	:ch=\E[%i%2G:cl=\E[H\E[J:cm=\E[%i%2;%2H:co#80:cv=\E[%i%2d:\
	:dc=\E[P:dl=\E[M:do=\E[B:ei=\E1:eo:ho=\E[H:im=\E1:kb=^H:\
	:kd=\E[B:ke=\E>\E[;4!z\E[3;14!z\
\E[;7!z\E[;9!z:\
	:kh=\E[H:kl=\E[D:ko=do,ho,nd,up:kr=\E[C:\
	:ks=\E=\E[1;4!z\E[1;8!z\E[1;10!z\E[1;11!z\E[1;12!z\E[1;14!z\
\E[3;7!z\E[3;9!z:\
	:ku=\E[A:li#24:mi:nd=\E[C:pt:se=\E[7!{:so=\E[7m:\
	:te=\E[w\E2\n:ti=\E[1;24w\E2\n:ue=\E[4!{:ul:\
	:up=\E[A:us=\E[4m:ve=\E[=4;119l:vs=\E[4l\E[=119h:xn:
c6|avtw|HDS concept avt w/4 or 8 pages; 132 columns:\
	:is=\E[1*q\E[2!t\E[7!t\E[=4;101;119l\E[=103;107;118;207h\
\E)1\E[1Q\EW\E[0\0720\07232!r\E[w\E2\r\n:\
	:ch=\E[%i%3G:cm=\E[%i%2;%3H:co#132:tc=avt:
# Some tty drivers use cr3 for concept, others use nl3, hence dN/dC below.
# 2 nulls padding on te isn't always enough.  6 works fine.  Maybe less
# than 6 but more than 2 will work.
# It seems rather strange to have is end in escape.  Seems to reprogram
# arrow keys to send escape sequences instead of whatever sequences.
cp|c100rvpp|c100rv4ppp|c100 with printer port:\
	:is=\EU\Ef\E7\E5\E8\El\ENH\Ek\E\200\Eo&\200\Eo!\200\EQ"\EY(^W\Eo\47\E:\
	:tc=c100rv:
cn|c100rvna|c100rv4pna|c100 with no arrows:ks@:ke@:tc=c100rv:
cr|c100rv|c100rv4p|c100 rev video:\
	:vb=\EK\200\200\200\200\200\200\200\200\200\200\200\200\200\200\Ek:\
	:is=\EU\Ef\E7\E5\E8\El\ENH\Ek\E\200\Eo&\200\Eo\47\E:vs@:ve@:tc=c100:
cs|c100s|slowconcept|slowconcept100|slow concept 100:\
	:vb=\Ek\200\EK:pt:dC@:dN@:tc=c100:
cd|c100rvs|slow reverse concept 100:\
	:vb=\EK\200\Ek:pt:dC@:dN@:tc=c100rv:
# Note that xn glitch in vt100 is not quite the same as concept,
# since the cursor is left in a different position while in the
# weird state (concept at beginning of next line, vt100 at end of
# this line) so all pre-3.7 versions of vi don't handle xn on vt100.
# I assume you have smooth scroll off or are at a slow enough baud
# rate that it doesn't matter (1200? or less).  Also this assumes
# that you set auto-nl to "on", if you set it off use vt100nam below.
# Since there are two things here called vt100, the installer can make
# a local decision to make either one standard "vt100" by including
# it in the list of terminals in reorder, since the first vt100 in
# /etc/termcap is the one that it will find.
d0|vt100|vt100am|vt-100|pt100|pt-100|dec vt100:\
	:co#80:li#24:cl=50\E[;H\E[2J:bs:am:cm=5\E[%i%2;%2H:nd=\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:vt#3:xn:\
	:sc=\E7:rc=\E8:cs=\E[%i%2;%2r:
# vt100nam with initialization string that disables autowrap
# from csvsj@ucbopal (Steve Jacobson) Dec 12 1984
dn|vt100nam|vt100 w/no am:am@:xn@:\
	:is=\E>\E[?3l\E[?4l\E[?5l\E[?7l\E[?8h:ks=\E[?1h\E=:ke=\E[?1l\E>:\
	:tc=vt100am:
d1|vt100|vt100nam|vt100 w/no am:am@:xn@:tc=vt100am:
d6|vt125|vt125-am|DEC vt125:\
	:cr=^M:do=^J:nl=^J:bl=^G:co#80:li#24:cl=50\E[H\E[2J:le=^H:am:bs:\
	:cm=5\E[%i%d;%dH:nd=\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:md=2\E[1m:mr=2\E[7m:mb=2\E[5m:\
	:me=2\E[m:is=\Ec\E[1;24r\E>\E[?3l\E[?7h:\
	:ks=\E[?1h\E=:ke=\E[?1l\E>:if=/usr/lib/tabset/vt100:ku=\EOA:\
	:kd=\EOB:kr=\EOC:kl=\EOD:kb=^H:ho=\E[H:k1=\EOP:k2=\EOQ:k3=\EOR:\
	:k4=\EOS:ta=^I:pt:sr=5\EM:vt#3:sc=\E7:rc=\E8:cs=\E[%i%d;%dr:
# vt125 nam from jak@ucbopal Thu Jan 17 13:05:24 PST 1985
d9|vt125-nam|DEC vt125 no automatic margin:am@:tc=vt125-am:
d7|vt102|vt100 w/adv. video:\
	:al=\E[1L:dl=\E[1M:im=\E[4h:ei=\E[4l:mi:dc=\E[1P:ku=\EOA:kd=\EOB:\
	:kr=\EOC:kl=\EOD:k0=\EOp:k1=\EOq:k2=\EOr:k3=\EOs:k4=\EOt:k5=\EOu:\
	:k6=\EOv:k7=\EOw:k8=\EOx:k9=\EOy:as=\E(0:ae=\E(B:am@:xn@:tc=vt100am:
d8|direct831|direct vt100-lookalike:\
	:co#80:li#24:cl=50\E[;H E[2J:bs:am:cm=5\E[%i%2;%2H:\
	:nd=\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:vt#3:xn:sc=\E7:rc=\E8:cs=\E[%i%2;%2r:\
	:\042al=\E[L:dl=\E[M:im=\E[4h:ei=\E[4l:dc=\E[P:dc=\E[P:\
	:al=\E[L:im=\E[4h:ei=\E[4l:dl=\E[M:i2=\E[>6l\E[5s:\
	:ts=\EP&:fs=\E\\:es:hs:
d2|gt42|dec gt42:\
	:bs:co#72:ns:li#40:os:
d3|vt132|vt-132:\
	:al=99\E[L:dl=99\E[M:ip=7:dc=7\E[P:ei=\E[4l:im=\E[4h:xn:dN#30:tc=vt100:
d4|gt40|dec gt40:\
	:bs:co#72:ns:li#30:os:
d5|vt50|dec vt50:\
	:bs:cd=\EJ:ce=\EK:cl=\EH\EJ:co#80:li#12:nd=\EC:pt:up=\EA:
# From: Bracy H. Elton  <elton@lll-crg>
da|vt200|vt220|vt200-js|vt220-js|dec vt200 series with jump scroll:\
	:im=\E[4h:ei=\E[4l:mi:dc=\E[P:dm=:ed=:al=\E[L:dl=\E[M:\
	:cs=\E[%i%d;%dr:sf=\ED:sr=\EM:sb=\EM:ce=\E[K:cl=\E[H\E[J:cd=\E[J:\
	:cm=\E[%i%d;%dH:nd=\E[C:up=\E[A:so=\E[7m:se=\E[27m:us=\E[4m:\
	:ue=\E[24m:md=\E[1m:mr=\E[7m:mb=\E[5m:me=\E[m:\
	:is=\E>\E[?3l\E[?4l\E[?5l\E[?7h\E[?8h\E[1;24r\E[24;1H:\
	:rs=\E>\E[?3l\E[?4l\E[?5l\E[?7h\E[?8h:tc=vt100:
db|vt200-ss|vt220-ss|dec vt200 series with smooth scroll:\
	:is=\E>\E[?3l\E[?4h\E[?5l\E[?7h\E[?8h\E[1;24r\E[24;1H:\
	:rs=\E>\E[?3l\E[?4h\E[?5l\E[?7h\E[?8h:tc=vt200:
dc|vt200-w|vt220-w|vt200-wj|vt220-wj|dec vt200 series; 132 col.; jump scroll:\
	:is=\E>\E[?3h\E[?4l\E[?5l\E[?7h\E[?8h\E[1;24r\E[24;1H:\
	:rs=\E>\E[?3h\E[?4l\E[?5l\E[?7h\E[?8h:co#132:tc=vt200:
dd|vt200-ws|vt220-ws|dec vt200 series; 132 col.; smooth scroll:\
	:is=\E>\E[?3h\E[?4h\E[?5l\E[?7h\E[?8h\E[1;24r\E[24;1H:\
	:rs=\E>\E[?3h\E[?4h\E[?5l\E[?7h\E[?8h:co#132:tc=vt200:
dI|dw1|decwriter I:\
	:bs:co#72:hc:os:
dh|vt50h|dec vt50h:\
	:bs:cd=\EJ:ce=\EK:cl=\EH\EJ:cm=\EY%+ %+ :co#80:li#12:nd=\EC:\
	:pt:sr=\EI:up=\EA:
dl|dw3|la120|decwriter III:\
	:bs:kb=^H:co#132:hc:os:pt:\
	:is=\E(B\E[20l\E[w\E[1;132s\E[2g\E[9;17;25;33;41;49;57;65;73;81;89;97;105;113;121;129u\E[z\E[66t\E[1;66r\E[4g\E>\r:
# This version works but you might find the initialization sequence annoying.
do|ovt100|vt-100|pt100|pt-100|old dec vt100:\
	:co#80:li#24:am:cl=50\E[;H\E[2J:bs:cm=5\E[%i%2;%2H:nd=\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:xn:
ds|vt100s|vt-100s|pt100s|pt-100s|dec vt100 132 cols 14 lines:\
	:li#14:tc=vt100w:
dt|vt100w|vt-100w|pt100w|pt-100w|dec vt100 132 cols:\
	:co#128:li#24:is=\E>\E[?3h\E[?4l\E[?5l\E[?7h\E[?8h:tc=vt100:
dv|vt52|dec vt52:\
	:bs:cd=\EJ:ce=\EK:cl=\EH\EJ:cm=\EY%+ %+ :co#80:li#24:nd=\EC:\
	:pt:sr=\EI:up=\EA:ku=\EA:kd=\EB:kr=\EC:kl=\ED:
dw|dw2|decwriter II:\
	:kb=^H:bs:co#132:hc:os:
df|dw4|decwriter IV:\
	:bs:co#132:hc:os:am:pt:is=\Ec:\
	:k0=\EOP:k1=\EOQ:k2=\EOR:k3=\EOS:kb=^H:
e1|ep48|ep4080|execuport 4080:am:bs:os:co#80:hu=\036:hd=\034:
e2|ep40|ep4000|execuport 4000:am:bs:os:co#136:hu=\036:hd=\034:
fe|endura|ts28|falco endura ts-28:\
	:co#80:li#24:am:bs:cl=^L:cm=\E[%;%H:up=\E[A:do=\E[B:nd=\E[C:\
	:cd=\E[0J:ce=\E[0K:kl=\E[D:kd=\E[B:kr=\E[C:ku=\E[A:dc=\E[P:\E[M:\
	:dl=\E[M:im:ei:ic=\E@:al=\E[L:sf=\ED:sb=\EM:us=\E[4m:ue=\E[0m:\
	:so=\E[7;1m:se=\E[0m:cs=\E[%;%r:bt=\E~I
ft|falco|ts1|ts-1|falco ts-1:\
	:is=\Eu\E3:cr=^M:do=^J:nl=^J:bl=^G:al=\EE:am:bs:ce=\ET\EG0^h:\
	:cm=\E=%+ %+ :cl=\E*:cd=\EY:co#80:dc=\EW:dl=\ER:ei=\Er:ho=^^:\
	:im=\Eq:k0=^A0\r:kd=^J:kl=^H:pt:kr=^L:ku=^K:li#24:nd=^L:se=\Eg0:\
	:so=\Eg1:up=^K:us=\Eg1:ue=\Eg0:
g2|1200|tn1200|terminet 1200:\
	:co#120:hc:os:
g3|300|tn300|terminet 300:\
	:co#120:hc:os:
# Note: no "ho" on HP's since that homes to top of memory, not screen.
# Due to severe braindamage, the only way to get the arrow keys to
# transmit anything at all is to turn on the function key labels
# (f1-f8) with ks, and even then the poor user has to hold down shift!
# The default 2621 turns off the labels except when it has to to enable
# the function keys.  If your installation prefers labels on all the time,
# or off all the time (at the "expense" of the function keys) move the
# 2621nl or 2621wl labels to the front using reorder.
# 2621k45: untested
h3|2621k45|hp2621k45|k45|hp 2621 with 45 keyboard:\
	:kb=^H:ku=\EA:kd=\EB:kl=\ED:kr=\EC:kh=\Eh:ks=\E&s1A:ke=\E&s0A:tc=2621:
h4|hp|hp2645|2645|hp45|hp 264x series:\
	:if=/usr/lib/tabset/stdcrt:\
	:al=\EL:am:bs:cd=\EJ:ce=\EK:ch=\E&a%dC:cl=\EH\EJ:cm=6\E&a%r%dc%dY:\
	:co#80:cv=\E&a%dY:da:db:dc=\EP:dl=\EM:ei=\ER:im=\EQ:\
	:kb=^H:ku=\EA:kd=\EB:kl=\ED:kr=\EC:kh=\Eh:ks=\E&s1A:ke=\E&s0A:\
	:li#24:mi:ml=\El:mu=\Em:nd=\EC:pt:se=\E&d@:so=\E&dJ:\
	:us=\E&dD:ue=\E&d@:up=\EA:xs:vt#6:
h6|hp2626|hp2626a|hp2626p|2626|2626a|2626p|hp 2626:\
	:is=\E&j@\r\E3\r:if=/usr/lib/tabset/stdcrt:\
	:al=\EL:am:bs:bt=\Ei:cd=\EJ:ce=\EK:cl=\EH\EJ:\
	:cm=\E&a%r%dc%dY:co#80:da:db:dc=2\EP:dl=\EM:ei=\ER:\
	:im=\EQ:ip=2:li#24:mi:nd=\EC:pt:se=\E&d@:so=\E&dB:up=\EA:\
	:kh=\Eh:ku=\EA:kl=\ED:kr=\EC:kd=\EB:\
	:ma=j^Jk^P^K^Pl :sf=\ES:\
	:ta=2^I:xs:
# cD a pain - only screw up at 9600 baud.
h8|hp2648|hp2648a|2648a|2648|HP 2648a graphics terminal:\
	:cl=50\EH\EJ:cm=20\E&a%r%dc%dY:dc=7\EP:ip#5:is=130\Eg:tc=2645:
# 2640a doesn't have the Y cursor addressing feature, and C is memory relative
# instead of screen relative, as we need.
ha|2640|hp2640a|2640a|hp 2640a:\
	:cm@:ks@:ke@:tc=2645:
hb|2640b|hp2640b|2644a|hp2644a|hp 264x series:\
	:ks@:ke@:tc=2645:
# 2621 using all 48 lines of memory, only 24 visible at any time.  Untested.
hB|big2621|48 line 2621:\
	:li#48:ho=\EH:cm=\E&a%r%dc%dR:tc=2621:
hn|2621nl|2621-nl|hp2621nl|hp2621-nl|hp 2621 with no labels:\
	:ks@:ke@:kh@:ku@:kl@:kr@:kd@:tc=hp2621:
# Needed for our vax console, since lsi-11 expands tabs (wrong).
ht|2621nt|hp 2621 w/no tabs:\
	:pt@:tc=2621:
hw|2621wl|hp2621wl|hp 2621 with labels:\
	:is=\E&jA\r\E3\r:ke=\E&jA:tc=hp2621:
# Hp 110 computer, same as 2621 except has 16 lines.  From monet, 7/2/85.
hm|hp110|110|hewlett packard 110:li#16:tc=2621:
# Infoton is now called General Terminal Corp. or some such thing.
# gt100 sounds like something DEC would come out with.  Lets hope they don't.
i1|i100|gt100|gt100a|General Terminal 100A (formerly Infoton 100):\
	:cl=^L:cd=\EJ:ce=\EK:li#24:co#80:\
	:al=\EL:dl=\EM:up=\EA:nd=\EC:ho=\EH:cm=\Ef%r%+ %+ :vb=\Eb\Ea:am:bs:\
	:so=\Eb:se=\Ea:
i2|i200|infoton 200:\
	:am:bs:cd=^K:cl=^L:co#80:li#24:nd=^Y:up=^\:ho=^Z:
i4|i400|400|infoton 400:\
	:al=\E[L:am:bs:ce=\E[N:cl=\E[2J:cm=%i\E[%3;%3H:co#80:dl=\E[M:li#25:\
	:nd=\E[C:up=\E[A:im=\E[4h\E[2Q:ei=\E[4l\E[0Q:\
	:dc=\E[4h\E[2Q\E[P\E[4l\E[0Q:
ia|addrinfo:\
	:li#24:co#80:cl=^L:ho=^H:nd=^Y:cd=^K:\
	:up=^\:am:bc=^Z:cm=\037%+\377%+\377:ll=^H^\:
ik|infotonKAS:\
	:am:bc=^Z:cd=^K:cl=^L:co#80:li#24:nd=^Y:up=^\:ll=^H^\:
it|InterTube|IT|Intertec:\
	:bs:am:cl=^L:ho=^A:up=^Z:nd=^F:\
	:cm=50\EY%+\040%+\040:so=\E0P:se=\E0@:co#80:li#25:
kA|h19A|heathA|heathkitA|heathkit h19 ansi mode:\
	:al=1*\E[1L:am:bs:cd=\E[J:ce=\E[K:cl=\E[2J:cm=\E[%i%2;%2H:co#80:\
	:dc=\E[1P:dl=1*\E[1M:dn=\E[1B:ei=\E[4l:ho=\E[H:im=\E[4h:li#24:mi:\
	:nd=\E[1C:as=\E[10m:ae=\E[11m:ms:pt:se=\E[0m:so=\E[7m:up=\E[1A:\
	:vs=\E[>4h:ve=\E[>4l:kb=^H:ku=\E[1A:kd=\E[1B:kl=\E[1D:kr=\E[1C:\
	:kh=\E[H:kn#8:k1=\EOS:k2=\EOT:k3=\EOU:k4=\EOV:k5=\EOW:l6=blue:\
	:l7=red:l8=white:k6=\EOP:k7=\EOQ:k8=\EOR:\
	:sr=\EM:is=\E<\E[>1;2;3;4;5;6;7;8;9l\E[0m\E[11m\E[?7h:
kB|h19bs|heathkit w/keypad shifted:ks=\Et:ke=\Eu:tc=h19b:
kU|h19us|heathkit w/keypad shifted/underscore cursor:ks=\Et:ke=\Eu:tc=h19u:
# If the adm31 gives you trouble with standout mode, check the DIP switch
# in position 6, bank @c11, 25% from back end of pc.  Should be OFF.
# If there is no such switch, you have an old adm31 and must use oadm31
l1|adm31|31|lsi adm31:is=\Eu\E0:\
	:al=\EE:am:bs:ce=\ET:cm=\E=%+ %+ :cl=\E*:cd=\EY:co#80:dc=\EW:dl=\ER:\
	:ei=\Er:ho=^^:im=\Eq:k0=^A0\r:k1=^A1\r:k2=^A2\r:k3=^A3\r:k4=^A4\r:\
	:k5=^A5\r:k6=^A6\r:k7=^A7\r:k8=^A8\r:k9=^A9\r:kd=^J:kl=^H:kr=^L:ku=^K:\
	:li#24:ma=j^Jk^P^K^Pl ^R^L^L :mi:nd=^L:up=^K:\
	:so=\EG4:se=\EG0:sg#1:us=\EG1:ue=\EG0:ug#1:
l2|adm2|lsi adm2:\
	:al=\EE:am:bs:cd=\EY:ce=\ET:cl=\E;:cm=\E=%+ %+ :co#80:dc=\EW:dl=\ER:\
	:ei=:ho=^^:ic=\EQ:im=:kd=^J:kh=^^:kl=^H:kr=^L:ku=^K:li#24:nd=^L:up=^K:
l3|adm3|3|lsi adm3:\
	:am:bs:cl=^Z:co#80:li#24:ma=^K^P:
l4|adm42|42|lsi adm42:vs=\EC\E3 \E3(:\
	:al=270\EE:am:bs:cd=\EY:ce=\ET:cl=\E;:cm=\E=%+ %+ :co#80:\
	:dc=\EW:dl=\ER:ei=\Er:im=\Eq:ip=6*:li#24:\
	:bt=\EI:nd=^L:se=\EG0:so=\EG4:ta=\t:up=^K:\
	:ma=^K^P:pc=\177:
l5|adm5|5|lsi adm5:\
	:cd=\EY:ce=\ET:do=^J:kb=^H:kd=^J:kh=^^:kl=^H:kr=^L:ku=^K:\
	:ma=^Hh^Jj^Kk^Ll^^H:se=\EG:sg#1:so=\EG:tc=adm3a:
l6|adm21|lear siegler adm21:\
	:cd=\EY:ce=\ET:al=30*\EE:dl=30*\ER:im=:ei=:ic=\EQ:dc=\EW:\
	:so=\EG4:se=\EG0:sg#1:us=\EG8:ue=\EG0:ug#1:\
	:kb=^H:kl=^H:kr=^L:ku=^K:kd=^J:kh=^^:tc=adm3a:
l7|adm20|lear siegler adm20:\
	:am:li#24:co#80:bs:cl=^Z:cm=\E=%i%r%+^_%+^_:nd=^L:up=^K:ho=^^:\
	:ce=\ET:cd=\EY:al=\EE:dl=\ER:im=:ei=:ic=\EQ:dc=\EW:so=\E):se=\E(:\
	:bt=\EI:pt:kn#7:k1=^A:k2=^B:k3=^W:k4=^D:k5=^E:k6:^X:k7=^Z:
la|adm3a|3a|lsi adm3a:\
	:am:bs:cm=\E=%+ %+ :cl=^Z:co#80:li#24:ma=^K^P:ho=^^:nd=^L:up=^K:
lb|adm3a+|3a+:kl=^H:kd=^J:ku=^K:kr=^L:tc=adm3a:
lo|oadm31|o31|old adm31:so=\EG4:us@:ue@:tc=adm31:
# These mime1 entries refer to the Microterm Mime I or Mime II.
# The default mime is assumed to be in enhanced act iv mode.
m3|mime3a|mime1 emulating 3a:\
	:am@:ma=^X ^K^J^Z^P:ku=^Z:kd=^K:kl=^H:kr=^X:tc=adm3a:
m4|microterm|act4|microterm act iv:\
	:am:bs:cd=^_:ce=^^:cl=^L:cm=^T%.%.:co#80:li#24:nd=^X:up=^Z:ho=^]:
# The padding on sr and ta for act5 and mime is a guess and not final.
m5|microterm5|act5|microterm act v:\
	:uc=\EA:pt:ta=2^I:sr=3\EH:ku=^Z:kd=^K:kl=^H:kr=^X:ma=^Z^P^Xl^Kj:tc=act4:
# act5s is not tested and said not to work.
mS|act5s|skinny act5:\
	:ti=\EP:te=\EQ:li#48:co#39:tc=act5:
# Mimes using brightness for standout.  Half bright is really dim unless
# you turn up the brightness so far that lines show up on the screen.
# uc is disabled to get around a curses bug, and should be put back in someday.
mf|mimefb|full bright mime1:so=^Y:se=^S:uc@:is=^S\E:tc=mime:
mh|mimehb|half bright mime1:so=^S:se=^Y:uc@:is=^Y\E:tc=mime:
mm|mime|mime1|mime2|mimei|mimeii|microterm mime1:\
	:al=80^A:am:bs:cd=^_:ce=^^:cl=\035^C:cm=^T%+^X%> 0%+P:co#80:\
	:dl=80^W:ta=2^I:li#24:nd=^X:pt:uc=^U:up=^Z:ho=\035:do=^K:.is=^S\E:\
	:ma=^X ^K^J^Z^P:ku=^Z:kd=^K:kl=^H:kr=^X:sr=3^R:
# is commented out because it jams up cu.
# These termcaps (for mime 2a) put the terminal in low intensity mode
# since high intensity mode is so obnoxious.
ms|mime2as|microterm mime2a (emulating an enhanced soroc iq120):\
	:al=20*^A:am:bs:cd=20*\EJ:ce=\EK:cl=\EL:cm=\E=%+ %+ :co#80:dc=\ED:\
	:dl=20*^W:kl=^H:kr=^L:ku=^K:kd=^J:ho=^^:is=\E):sr=\EI\
	:im=\EE:ei=^Z:ip=2:li#24:nd=^L:so=\E\072:se=\E;:up=\EI:\
	:us=\E6:ue=\E7:
# This is the preferred mode (but ^X can't be used as a kill character)
mv|mime2a|mime2av|microterm mime2a (emulating an enhanced vt52):\
	:al=20*^A:bs:cd=20*\EQ:co#80:ce=\EP:cl=\EL:cm=\EY%+ %+ :is=^Y\
	:dc=^N:dl=20*^W:ip=2:ei=^Z:ho=\EH:im=^O:kd=\EB:kl=\ED:kr=\EC:ku=\EA:\
	:li#24:nd=\EC:pt:se=\E9:so=\E8:up=\EA:sr=\EA:us=\E4:ue=\E5:
mx|mime3ax|mime1 emulating enhanced 3a:\
	:al=80^A:dl=80^W:pt:ce=^X:cd=^_:tc=mime3a:
pe|pe550|perkin elmer 550:\
	:bs:co#80:ce=20\EI:cl=20\EK:cm=\EX%+ \EY%+ :\
	:ho=\EH:li#24:ll=\EH\EA:nd=\EC:up=\EA:ma=^Z^P:cd=6^N@^V:
pf|fox|perkin elmer 1100:if=/usr/lib/tabset/stdcrt:\
	:am:bs:cd=5.5*\EJ:ce=\EI:cl=132\EH\EJ:co#80:ho=\EH:li#24:\
	:ll=\EH\EA:nd=\EC:cm=\EX%+ \EY%+ :up=\EA:vb=^P^B^P^C:
po|owl|perkin elmer 1200:if=/usr/lib/tabset/stdcrt:\
	:al=5.5*\EL:am:bs:cd=5.5*\EJ:ce=5.5\EI:cl=132\EH\EJ:ho=\EH:ll=\EH\EA:\
	:cm=\EX%+ \EY%+ :co#80:dc=5.5*\EO:dl=5.5*\EM:ei=:ic=\EN:im=:ip=5.5*:\
	:kb=^H:in:li#24:nd=\EC:up=\EA:se?=\E!\200:so?=\E!^H:vb=^P^B^P^C:\
	:k1=\ERA:k2=\ERB:k3=\ERC:k4=\ERD:k5=\ERE:k6=\ERF:\
	:k7=\ERG:k8=\ERH:k9=\ERI:k0=\ERJ:
qe|exidy|exidy2500|exidy sorcerer as dm2500:\
	:al=^P^J^X:am:bs:ce=^W:cl=^^:cm=^L%r%n%.%.:co#64:\
	:dc=\b:dl=^P^Z^X:dm=^P:ed=^X:ei=^X:ho=^B:ic=^\:\
	:im=^P:li#30:nd=^\:pt:so=^N:se=^X:up=^Z:
qn|netx|netronics:\
	:bs:cd=2000^F^E:ce=1600^E:cl=466^L:cm=\E=%+@%+@:co#64:ho=^D:\
	:li#16:ma=j^Jk^Pl :nd=\E+@A:pc=\200:sr=\E=@@^K:up=^K:
qx|xitex|xitex sct-100:\
	:bs:cd=2000^F^E:ce=1600^E:cl=400^L:cm=\E=%+@%+@:co#64:ho=^D:\
	:li#16:ma=j^Jk^Pl :nd=\E+@A:pc=\200:sr=\E=@@^K:up=^K:
t3|ti|ti700|ti733|735|ti735|ti silent 700:\
	:bs:co#80:hc:os:dC#162:
t4|ti745|745|743|ti silent 745:\
	:bs:co#80:hc:os:
t8|ti800|ti omni 800:\
	:bs:co#132:hc:os:
# set to p.1 when entering ex (\E-17 ), reset to p.0 when exiting (\E-07 )
v4|tvi920-2p|tvi912-2p|920-2p|912-2p|tvi2p|televideo w/2 pages:\
	:ti=\E-17 :te=\E-07 :tc=tvi920c:
# tvi910+ termcap from ucsc@E via tut@opal  Mon Oct 31 10:54:55 1983
# Comments:  tvi910+ termcap working apparently without any problems; not sure
# whether the excess padding is needed.  The successful termcap looks like:
v6|tvi910+|tvi910|910+|910|televideo model 910+:if=/usr/lib/tabset/stdcrt:\
	:is=\EC\E.3:\
	:al=33*\EE:am:bs:bt=\EI:cd=\EY:ce=\ET:cm=\E=%+ %+ :cl=^Z:co#80:\
	:dc=\EW:dl=33*\ER:ei=:\
	:kb=^H:ku=^K:kd=^J:kl=^H:kr=^L:k1=^A@\r:k2=^AA\r:k3=^AB\r:k4=^AC\r:\
	:k5=^AD\r:k6=^AE\r:k7=^AF\r:k8=^AG\r:k9=^AH\r:k0=^AI\r:\
	:ho=^^:im=:ic=\EQ:li#24:nd=^L:pt:se=\EG0:so=\EG4:up=^K:us=\EG8:ue=\EG0:\
	:ma=^Kk^Ll^R^L:sg#1:vs=\E.2:ve=\E.3:
# tvi914 definition from Tim Monroe (ucbpopuli:phlos-ac) Mon Feb 13 1984
v7|tvi914|914|televideo 914:al=5*\EE:dl=5*\ER\
	:if=/usr/lib/tabset/stdcrt:am:bs:ce=\ET:cm=\E=%+\040%+\040\
	:cl=^Z:co#80:dc=\EW:ei=:kb=^H:ku=^K:kd=^V:kl=^H:kr=^L\
	:k1=^A@\r:k2=^AA\r:k3=^AB\r:k4=^AC\r:k5=^AD\r:k6=^AE\r\
	:k7=^AF\r:k8=^AG\r:k9=^AH\r:k0=^AI\r:ho=^^:im=:ic=\EQ\
	:li#24:nd=^L:pt:se=\EG0:so=\EG4:up=^K\
	:us=\040\EG8:ue=\EG0\040:ma=^Kk^Ll^R^L:sg#1:ug#1:ul:bt=\EI
# tvi950 definitions provided by B:pjphar at UC Berkeley
# is= for tvi950 sets:
#	\EDF full duplex, \EC conversation mode, \Ed white on black 	
#	\EG0 normal video, \Er edit mode, \EO line edit mode
#	\E\047 protect mode off, \E( write protect off
#	\E% graphics mode off, \Ew auto page flip off, \EX monitor mode off
#	\Ee\040 blank to space, ^O enable buffer control, \El send edit keys
#	\E016 program unshifted send key to send line all 
#	\E004 program shifted send key to send line unprotected 
#	\Ex0\200\200 null field delimiter, \Ex1\200\200 null line delimiter
#	\Ex2\200\200 null start-protected field delimiter 
#	\Ex3\200\200 null end-protected field delimiter
#	\Ex4\r\200 end of text delimiter carriage return/null
v5|tvi950|950|televideo950:if=/usr/lib/tabset/stdcrt:\
	:is=\EDF\EC\Ed\EG0\Er\EO\E\047\E(\E%\Ew\EX\Ee ^O\El\E016\E004\
	\Ex0\200\200\Ex1\200\200\Ex2\200\200\Ex3\200\200\Ex4\r\200:\
	:am:xn:bs:co#80:li#24:cl=\E*:cd=\Ey:ce=\Et:cm=\E=%+ %+ :\
	:al=\EE:dl=\ER:im=\Eq:ei=\Er:dc=\EW:up=^K:do=^V:nd=^L:ho=^^:\
	:k1=^A@\r:k2=^AA\r:k3=^AB\r:k4=^AC\r:k5=^AD\r:k6=^AE\r:k7=^AF\r:\
	:k8=^AG\r:k9=^AH\r:k0=^AI\r:kb=^H:ku=^K:kd=^V:kl=^H:kr=^L:kh=^^:\
	:ko=ic,dc,al,dl,cl,bt,ce,cd:ma=^Vj^Kk^Hh^Ll^^H:mi:ms:pt:\
	:so=\EG4:se=\EG0:sg#1:us=\EG8:ue=\EG0:ug#1:sr=\Ej:bt=\EI:\
	:vb=\Eb\200\200\200\200\200\200\200\200\200\200\200\200\200\200\200\Ed:
# is= for tvi950-2p adds:
#	\E\\2 set 48 line page, place cursor at 0,24,1 (\E-07 )
# when entering ex: \E\\1 set 24 line page, place cursor
# when exiting ex: \E\\2 reset 48 line page, place cursor
vt|tvi950-2p|950-2p|tvi9502p|9502p|televideo950 w/2 pages:\
	:is=\EDF\EC\Ed\EG0\Er\EO\E\047\E(\E%\Ew\EX\Ee ^O\El\E016\E004\
	\Ex0\200\200\Ex1\200\200\Ex2\200\200\Ex3\200\200\Ex4\r\200\E\\2\E-07 \
	:te=\E\\2\E-07 :ti=\E\\1\E-07 :tc=tvi950:
# is= for tvi950-4p adds:
#	\E\\3 set 96 line page, place cursor at 0,24,1 (\E-07 )
# when entering ex, \E\\1 set 24 line page, place cursor
# when exiting ex, \E\\3 reset 96 line page, place cursor
vf|tvi950-4p|950-4p|tvi9504p|9504p|televideo950 w/4 pages:\
	:is=\EDF\EC\Ed\EG0\Er\EO\E\047\E(\E%\Ew\EX\Ee ^O\El\E016\E004\
	\Ex0\200\200\Ex1\200\200\Ex2\200\200\Ex3\200\200\Ex4\r\200\E\\3\E-07 \
	:te=\E\\3\E-07 :ti=\E\\1\E-07 :tc=tvi950:
va|tvi950-ap|tvi 950 w/alt pages:\
	:is=\E\\1:ti=\E-06 :te=\E-16 :tc=tvi950:
# is= for tvi950rv has: set reverse video (\Ed)
# set vb accordingly (\Eb...nulls...\Ed)
vr|tvi950rv|950rv|televideo950 reverse video:\
	:is=\EDF\EC\Eb\EG0\Er\EO\E\047\E(\E%\Ew\EX\Ee ^O\El\E016\E004\
	\Ex0\200\200\Ex1\200\200\Ex2\200\200\Ex3\200\200\Ex4\r\200:\
	:vb=\Ed\200\200\200\200\200\200\200\200\200\200\200\200\200\200\200\Eb:\
	:tc=tvi950:
# combined 950-2p and 950rv
v3|tvi950rv2p|950rv2p|televideo950 rev video w/2 pages:\
	:is=\EDF\EC\Eb\EG0\Er\EO\E\047\E(\E%\Ew\EX\Ee ^O\El\E016\E004\
	\Ex0\200\200\Ex1\200\200\Ex2\200\200\Ex3\200\200\Ex4\r\200\E\\2\E-07 :\
	:te=\E\\2\E-07 :ti=\E\\1\E-07 :tc=tvi950rv:
# combined 950-4p and 950rv
vR|tvi950rv4p|950rv4p|televideo950 rev video w/4 pages:\
	:is=\EDF\EC\Eb\EG0\Er\EO\E\047\E(\E%\Ew\EX\Ee ^O\El\E016\E004\
	\Ex0\200\200\Ex1\200\200\Ex2\200\200\Ex3\200\200\Ex4\r\200\E\\3\E-07 :\
	:te=\E\\3\E-07 :ti=\E\\1\E-07 :tc=tvi950rv:
# Wyse entries from ernie, 10/1/84
ye|w50|wyse50|Wyse 50:\
	:al=\EE:am:bs:bt=\EI:cd=\EY:ce=\ET:cl=^Z:cm=\E=%+ %+ :co#80:\
	:dc=\EW:dl=\ER:do=^J:ei=\Er:im=\Eq:is=\E`\:\200\EC\EDF\E0\E'\E(\EA21:\
	:kd=^J:kl=^H:kr=^L:ku=^K:li#24:nd=^L:up=^K:us=\EG8:ue=\EG0:\
	:so=\EG4:se=\EG0:
#	:hs:ts=\Ef:fs=\Eg:	status line does not work with sysline
yg|w50-132|wyse50-132|Wyse 50-132:\
	:al=\EE:am:bs:bt=\EI:cd=\EY:ce=\ET:cl=^Z:cm=\Ea%i%dR%dC:co#132:\
	:dc=\EW:dl=\ER:do=^J:ei=\Er:im=\Eq:is=\E`;\200\EC\EDF\E0\E'\E(\EA21:\
	:kd=^J:kl=^H:kr=^L:ku=^K:li#24:nd=^L:up=^K:us=\EG8:ue=\EG0:\
	:so=\EG4:se=\EG0:
# Note two things called "teleray".  Reorder should move the common one
# to the front if you have either.  A dumb teleray with the cursor stuck
# on the bottom and no obvious model number is probably a 3700.
y1|t3700|teleray|dumb teleray 3700:\
	:bs:cl=^L:co#80:li#24:
y3|t3800|teleray 3800 series: \
	:bs:cd=\EJ:ce=\EK:cl=^L:cm=\EY%+ %+ :co#80: \
	:do=\n:ho=\EH:li#24:ll=\EY7 :nd=\EC:pt:up=^K:
y6|t1061|t10|teleray|teleray 1061:if=/usr/lib/tabset/teleray:\
	:al=2*\EL:am:bs:cd=1\EJ:ce=\EK:cl=1^L:cm=\EY%+ %+ :co#80:\
	:dc=\EQ:dl=2*\EM:ei=:ho=\EH:ic=\EP:im=:ip=0.4*:\
	:k1=^Z1:k2=^Z2:k3=^Z3:k4=^Z4:k5=^Z5:k6=^Z6:k7=^Z7:k8=^Z8:\
	:li#24:nd=\EC:pt:se=\ER@:so= \ERD:\
	:is=\Ee\EU01^Z1\EV\EU02^Z2\EV\EU03^Z3\EV\EU04^Z4\EV\EU05^Z5\EV\EU06^Z6\EV\EU07^Z7\EV\EU08^Z8\EV\Ef:\
	:up=\EA:us=\ERH:ue=\ER@:xs:xt:sg=2:ug=1:
yf|t1061f|teleray 1061 with fast PROMs:\
	:al=\EL:ip@:dl=\EM:tc=t1061:
zb|z29|zenith 29|z29b:\
	:if=/usr/lib/tabset/stdcrt:kn#10:k0=\E~:k9=\E0I:tc=h19:
# z29-e entry from ernie, 9/84
ze|z29-e|zenith 29 hacked for emacs:\
	:ip=1.5:ks=\Et:ke=\Eu:vs@:ve@:cr=^M:nl=^J:bl=^G:al=1*\EL:am:le=^H:\
	:bs:cd=\EJ:ce=\EK:cl=\EE:cm=\EY%+ %+ :co#80:dc=\EN:dl=1*\EM:\
	:do=\EB:ho=\EH:li#24:nd=\EC:as=\EF:ae=\EG:ms:\
	:ta=^I:pt:sr=\EI:se=\Eq:so=\Ep:up=\EA:vs=\Ex4:ve=\Ey4:kb=^h:\
	:ku=\EA:kd=\EB:kl=\ED:kr=\EC:kh=\EH:kn#8:k1=\ES:k2=\ET:k3=\EU:\
	:k4=\EV:k5=\EW:l6=blue:l7=red:l8=white:k6=\EP:k7=\EQ:k8=\ER:es:hs:\
	:ts=\Ej\Ex5\Ex1\EY8%+ \Eo:fs=\Ek\Ey5:ds=\Ey1:
zt|zt1|zenith zt1:\
	:al=1*\EL:am:bs:cd=\EJ:ce=\EK:cl=\EE:cm=\EY%+ %+ :co#80:\
	:dl=1*\EM:do=\EB:ho=\EH:li#24:mi:nd=\EC:as=\EF:ae=\EG:\
	:ms:pt:sr=\EI:se=\Eq:so=\Ep:up=\EA:vs=\Ex4:ve=\Ey4:\
	:kb=^H:ku=\EA:kd=\EB:kl=\ED:kr=\EC:kh=\EH:kn#8:
zu|z29u|zenith 29 w/ underscore cursor:vs@:ve@:tc=z29:
# zentec zephyr, from ernie, 12/14/84
ZZ|zen50|z50|zephyr:\
        :cm=\E=%+ %+ :cd=\EY:co#80:li#24:am:al=\EE:ce=\ET:dc=\EW:dl=\ER:\
	:ic=\EQ:im=:ei=:cl=\E+:bs:ma=^Hh^Ll^Jj^Kk:sg#1:se=\EGO:so=\EG4:\
        :kl=^H:kr=^L:ku=^K:kd=^J:kh=\036:up=^K:BS=^U:CL=^V:CR=^B:RK=^L:\
	:UK=^K:LK=^H:DK=^J:HM=\036:
# From cbosg!ucbvax!pur-ee!cincy!chris Thu Aug 20 09:09:18 1981
# This is incomplete, but it's a start.
ns|5520|nec|spinwriter|nec 5520|:\
	:ct=\E3:st=\E1:cr=^M:do=^J:nl=^J:bl=^G:\
	:kb=^h:le=^H:bs:co#132:ff=^L:hc:hu=\E]s\E9\E]W:hd=\E]s\n\E]W:\
	:os:ta=^I:pt:up=\E9:
m0|modgraph|mod|Modgraph terminal emulating vt100, 24x80:\
	:xn@:rf@:sr=5\EM\E[K:vs=\E\^9;0s\E\^7;1s:\
	:is=\E\^9;0s\E\^7;1s\E[3g\E\^11;9s\E\^11;17s\E\^11;25s\E\^11;33s\E\^11;41s\E\^11;49s\E\^11;57s\E\^11;65s\E\^11;73s\E\^11;81s\E\^11;89s:\
	:tc=vt100:
#z100 entry from Brad Brahms at TRW (Brahms@USC-ECLC)
#			   usenet: {decvax,ucbvax}!trwrb!trwspp!brahms
zc|z100|h100|z110|z-100|h-100|heath/zenith z-100 pc with color monitor:\
	:vs=\Ex4\Em71:ve=\Ey4\Em70:tc=z100bw:
z1|z100bw|h100bw|z110bw|z-100bw|h-100bw|heath/zenith z-100 pc:\
	:al=5*\EL:bs:cd=\EJ:ce=\EK:cl=5*\EE:cm=1*\EY%+ %+ :co#80:dc=1*\EN:\
	:dl=5*\EM:do=\EB:ei=\EO:ho=\EH:im=\E@:li#24:mi:nd=\EC:as=\EF:ae=\EG:\
	:ms:pt:sr=\EI:se=\Eq:so=\Ep:up=\EA:vs=\Ex4:ve=\Ey4:\
	:kb=^h:ku=\EA:kd=\EB:kl=\ED:kr=\EC:kh=\EH:kn#10:\
	:k0=\EJ:k1=\ES:k2=\ET:k3=\EU:k4=\EV:k5=\EW:\k6=\EP:k7=\EQ:\
	:k8=\ER:k9=\EOI:
# The tek4125 emulates a vt100 incorrectly - the scrolling region
# command is ignored. The following entry replaces the cs with the
# needed al, dl, and im; removes some cursor pad commands that the tek4125
# chokes on; and adds a lot of initialization for the tek dialog area.
# Note that this entry uses all 34 lines and sets the cursor color to green
# Steve Jacobson 8/85
tk|tek4125:\
	:ks=\E=:li#34:\
is=\EQD1\EUX03\E%\!0\EKA\ELBB2\ELCE0\ELI100\ELJ2\ELLB2\ELM0\ELS1\ELX00\ELV1\E%\!1\E>\E[?3l\E[?4l\E[?5l\E[?7h\E[?8h:dl=\E[1M:\
	:al=\E[1L:cs@:sc@:rc@:im=\E1:tc=vt100:
# The pcplot IBM-PC terminal emulation program is really messed up. It is
# supposed to emulate a vt-100, but emulates the wraparound bug incorrectly,
# doesn't support scrolling regions, ignores add line commands, and ignores
# delete line commands. Consequently, the resulting behavior looks like a
# crude adm3a-type terminal.
# Steve Jacobson 8/85
pp|pcplot:\
	:cs@:sc@:rc@:xn@:tc=vt100:
# contributed by a user on UNIX-S
#
lc|adm22|22|lsi adm22:\
	:is=\E%\014\014\014\016\003\000\003\002\003\002\000\000\000\000\000\000\000\000\000\000\000:\
	:al=\EE:am:bs:bt=\EI:cd=\Ey:ce=\Et:cl=\E+:cm=\000\E=%+ %+ :co#80:\
	:dc=\EW:dl=\ER:do=^J:em=:ho=^^:ic=\EQ:im=:\
	:k1=\001@\015:k2=\001A\015:k3=\001B\015:k4=\001C\015:\
	:k5=\001D\015:k6=\001E\015:k7=\001F\015:kn#7:\
	:ko=ho:l1=F1:l2=F2:l3=F3:l4=F4:l5=F5:l6=F6:l7=F7:\
	:kb=^H:kd=^J:kh=^^:kl=^H:kr=^L:ku=^K:li#24:\
	:ma=j^Jk^P^K^Pl ^R^L^L :nd=^L:se=\E(:so=\E):ta=\Ei:up=^K:


# z29 in ansi mode. Assumes that the cursor is in the correct state, and that
# the world is stable. `rs' causes the terminal to be reset to the state
# indicated by the name. kc -> key click, nkc -> no key click, uc -> underscore
# cursor, bc -> block cursor.
# from Mike Meyer
za|z29a|z29a-kc-bc|h29a-kc-bc|heath/zenith 29 in ansi mode:\
	:cr=^M:do=^J:nl=^J:bl=^G:co#80:li#24:cl=\E[2J:pt:ho=\E[H:\
	:le=^H:bs:cm=\E[%i%d;%dH:nd=\E[C:up=\E[A:mb=\E[5m:mr=\E7m:\
	:ce=\E[K:cd=\E[J:so=\E[7;2m:se=\E[m:us=\E[4m:ue=\E[m:mh=\E[2m:\
	:md=\E[2m:mr=\E[7m:mb=\E[5m:me=\E[m:\
	:rs=\E<\E[1;24r\E[24;1H\E[?7h\E[>4h\E[>1;2;3;5;6;7;8;9l\E[m\E[11m:\
	:ku=\EOA:kd=\EOB:kr=\EOC:kl=\EOD:kb=^H:\
	:k1=\EOS:k2=\EOT:k3=\EOU:k4=\EOV:k5=\EOW:k6=\EOP:k7=\EOQ:k8=\EOR:\
	:k9=\EOX:k0=\E[~:l0=help:kn#2:ko=ho,cd:if=/usr/lib/tabset/zenith29:\
	:es:hs:ts=\E[s\E[>5;1h\E[25;%i%dH\E[1K:fs=\E[u\E[>5l:ds=\E[>1l:\
	:cs=\E[%i%d;%dr:sr=\EM:sf=\ED:DO=\E[%dB:UP=\E[%dA:LE=\E[%dD:\
	:RI=\E[%dC:AL=\E[%dL:DL=\E[%dM:sc=\E[s:rc=\E[r:dc=\E[1P:DC=\E[%dP:\
	:kC=\E[J:ct=\E[3g:st=\EH:ti=\E[?7l:te=\E[?7h:ps=\E#7:
za|z29a|z29a-kc-uc|h29a-kc-uc|heath/zenith 29 in ansi mode:\
	:rs=\E<\E[1;24r\E[24;1H\E[?7h\E[>1;2;3;4;5;6;7;8;9l\E[m\E[11m:\
	:tc=z29a:
za|z29a|z29a-nkc-bc|h29a-nkc-bc|heath/zenith 29 in ansi mode:\
	:rs=\E<\E[1;24r\E[24;1H\E[?7h\E[>2;4h\E[>1;3;5;6;7;8;9l\E[m\E[11m:\
	:tc=z29a:
za|z29a|z29a-nkc-uc|h29a-nkc-uc|heath/zenith 29 in ansi mode:\
	:rs=\E<\E[1;24r\E[24;1H\E[?7h\E[>2h\E[>1;3;4;5;6;7;8;9l\E[m\E[11m:\
	:tc=z29a:
# funny terminal that the TANDEM uses.
65|653|t653x|Tandem 653x multipage terminal:\
	:li#24:co#80:ho=\EH:cm=\023%+ %+ :cl=\EI:cd=\EJ:ce=\EK:am:bs:\
	:if=/usr/lib/tabset/tandem653:sb=\ES:sr=\ET:da:db:so=\E6$:se=\E6 :\
	:us=\E60:ue=\E6 :sg#1:ug#1:up=\EA:do=\012:le=\010:nd=\EC:\
	:hs:ts=\Eo:fs=\r:ds=\Eo\r:ws#64:
Mn|f110-v|freedom110-v|freedom-v|freedom110 for 9600 vi or 1200 emacs:\
        :is=\Eg\Ef\r\Ed\EO:dc=\EO\EW:im=\EO\Eq:\
	:al=6.5*\EE:dl=11.5*\ER:\
	:vb=\Eb\200\200\200\200\200\200\200\200\200\200\200\200\200\200\200\Ed:\
	:tc=freedom100:
# rough draft of Amiga termcap by Mike Meyer
AA|amiga|Amiga ANSI:\
	:co#80:li#25:am:do=\E[B:nl=\E[B:bl=^G:ce=\E[K:cd=\E[J:\
	:cl=\E[H\E[J:ku=\E[A:kd=\E[B:kl=\E[C:kr=\E[D:kb=^H:\
	:al=\E[L:dl=\E[M:le=^H:cm=\E[%i%d;%dH:nd=\E[C:up=\E[A:\
	:ce=\E[K:ho=\E[H:dc=\E[P:ic=\E[@:\
	:so=\E[2m:se=\E[m:us=\E[4m:ue=\E[m:mr=\E[7m:mb=\E[7;2m:me=\E[m:
# qume102 lifted from CSRG's 4.3termcap 
Ar|q102|qume102|Qume 102:\
	:al=\EE:am:bs:bt=\EI:\
	:cd=\EY:ce=\ET:cl=^Z:cm=\E=%+ %+ :co#80:ct=\E3:\
	:dc=\EW:dl=\ER:do=^J:ei=:ho=^^:ic=\EQ:im=:\
	:k0=^A@\r:k1=^AA\r:k2=^AB\r:k3=^AC\r:kd=^J:kl=^H:kr=^L:ku=^K:\
	:le=^H:li#24:ma=^K^P^L :nd=^L:\
	:se=\EG0:sg#1:so=\EG4:st=\E1:\
	:ue=\EG0:ug#1:ul:up=^K:us=\EG8:
# by edmoy, added for all the new MvaxII and RS users
vs|xterms|xterm|vs100|xterm terminal emulator (X window system):\
	:cr=^M:do=^J:nl=^J:bl=^G:le=^H:ho=\E[H:\
	:co#80:li#24:cl=\E[H\E[2J:bs:am:xn:cm=\E[%i%d;%dH:nd=\E[C:up=\E[A:\
	:ce=\E[K:cd=\E[J:so=\E[7m:se=2\E[m:us=\E[4m:ue=\E[m:\
	:md=\E[1m:mr=\E[7m:me=2\E[m:\
	:ku=\EOA:kd=\EOB:kr=\EOC:kl=\EOD:kb=^H:\
	:k1=\EOP:k2=\EOQ:k3=\EOR:k4=\EOS:ta=^I:pt:sf=\n:sr=\EM:\
	:al=\E[L:dl=\E[M:ic=\E[@:dc=\E[P:\
	:MT:ks=\E[?1h\E=:ke=\E[?1l\E>:\
	:is=\E[r\E\E[m\E[2J\E[H\E[?7h\E[?1;3;4;6l:\
	:rs\E[r\E<\E[m\E[2J\E[H\E[?7h\E[?1;3;4;5;6l:

I8|ibmaed|IBM Experimental display:\
	:al=\EN:am:bs:cd=\EJ:ce=\EI:cl=\EH\EK:cm=\EY%+\40%+\40:co#80:\
	:cr=^M:dc=\EQ:dl=\EO:do=\EB:ei=:ho=\EH:ic=\EP:im=:li#52:\
	:nd=\EC:nl=^J:ms:so=\E0:se=\E0:us=:ue=:up=\EA:\
	:kb=^h:ku=\EA:kd=\EB:kl=\ED:kr=\EC:eo:vb=\EG:pt:
SHAR_EOF
if test -f sys/vms/termcap/termcap
then
	echo 'sys/vms/termcap/termcap exists'
else
if test -f sys/vms/termcap/termcap.A
then
cat sys/vms/termcap/termcap.A sys/vms/termcap/termcap.B >sys/vms/termcap/termcap
rm sys/vms/termcap/termcap.A sys/vms/termcap/termcap.B
else
	echo 'sys/vms/termcap/termcap.A does not exist'
fi
fi
fi # end of overwriting check
#	End of shell archive
exit 0