tvi-970
ro...@ucbvax.berkeley.edu
__
In response to whoever requested the suite of termcap entries for the
Televideo 970.
A friend passed me the following and I only had to modify the function keys for
my uses. Note it uses "flash" instead of the audio warning and if you
use reverse video it will flip flop you.
There wasn't a credit line with this so I don't know who you should pass
your thanks to.
#
v7|tvi970|970|televideo970:\
:al=\E[1L:bs:bt=\E[1Z:cd=\E[J:ce=\E[K:\
:cm=\E[%i%2;%2H:cl=\E[;H\E[2J:co#80:dc=\E[1P:\
:dl=\E[1M:do=\E[B:da:db:ei=\E[4l:\
:im=\E[4h:kb=^H:kd=\E[B:kh=\E[H:kl=\E[D:kr=\E[C:\
:ku=\E[A:li#24:mi:ms:nd=\E[C:\
:so=\E[7m:se=\E[0m:up=\E[A:\
:us=\E[4m:ue=\E[0m:ul:\
:ch=\E[%2G:cv=\E[%2d:\
:cs=\E[%2;%2r:\
:md=\E[1m:me=\E[m:mr=\E[7m:\
:ho=\E[1;1H:ll=\E[24;1H:\
:vb=\E[?5h\E[?5l:ve=\E[?7h\E[1V:vs=\E[?7l\E[1U:
# The terminal should be set up with the following configuration
# for televideo 970's:
# under MAIN COMM: comm - cnv; duplx - fdx; send/rcv - no echo;
# parity -no;stop bit - 1; data bits- 8;
# rcv ctrl - xon/off; xmit ctrl - no;
# under EDIT: ins/rpl - rpl; ctrl rep - proc; matopg - single;
# autowrap - wrap; edit bound - pg; editing ext - ln;
# horz edit - rt; vert edit - dwn; autotab - move;
# under STATUS 1: guarded xfer - ungrd; multi-area xfer - all;
# xfer term - part; ln xfer - pg; xfer exec - immed;
# pg xfer - pg;
#
vn|tvi970-ns|970-ns|televideo970-ns:\
:al=\E[L:bs:cd=\E[J:ce=\E[K:cl=\E[;H\E[2J:cm=\E[%i%2;%2H:\
:co#80:li#24:cd=\E[P:dl=\E[M:do=\E[B:ei=\E[4l:ho=\E[H:\
:im=\E[4h:kb=^H:kd=\E[B:kl=\E[D:kr=\E[C:ku=\E[A:mi:\
:nd=\E[C:up=\E[A:so=\E[7m:se=\E[m:us=\E[4m:ue=\E[m:\
:ch=\E[%dG:dc=\E[P:pt:is=^O\E[m\E[?3l\E[?5l\E[?7h\E[?8h:
vi|tvi970r|970r|televideo970 reverse video:\
:al=\E[1L:bs:bt=\E[1Z:cd=\E[J:ce=\E[K:\
:cm=5\E[%i%2;%2H:cl=\E[;H\E[2J:co#80:dc=\E[1P:\
:dl=\E[1M:do=\E[B:da:db:ei=\E[4l:\
:im=\E[4h:kb=^H:kd=\E[B:kh=\E[H:kl=\E[D:kr=\E[C:\
:ku=\E[A:li#24:mi:ms:nd=\E[C:\
:so=\E[7m:se=\E[0m:up=\E[A:\
:us=\E[4m:ue=\E[0m:ul:\
:ch=\E[%2G:cv=\E[%2d:\
:cs=\E[%2;%2r:\
:md=\E[1m:me=\E[m:mr=\E[7m:\
:ho=\E[1;1H:ll=\E[24;1H:\
:vb=\E[?5l\E[?5h:ve=\E[?7h\E[1V:vs=\E[?7l\E[1U:
vw|tvi970rw|970rw|televideo970 reverse video 132 col:\
:al=\E[1L:bs:bt=\E[1Z:cd=\E[J:ce=\E[K:\
:cm=5\E[%i%2;%2H:cl=\E[;H\E[2J:co#132:dc=\E[1P:\
:dl=\E[1M:do=\E[B:da:db:ei=\E[4l:\
:im=\E[4h:kb=^H:kd=\E[B:kh=\E[H:kl=\E[D:kr=\E[C:\
:ku=\E[A:li#24:mi:ms:nd=\E[C:\
:so=\E[7m:se=\E[0m:up=\E[A:\
:us=\E[4m:ue=\E[0m:ul:\
:ch=\E[%2G:cv=\E[%2d:\
:cs=\E[%2;%2r:\
:md=\E[1m:me=\E[m:mr=\E[7m:\
:ho=\E[1;1H:ll=\E[24;1H:\
:vb=\E[?5l\E[?5h:ve=\E[?7h\E[1V:vs=\E[?7l\E[1U:
----
Pat Gallivan @ UUCP: ..!seismo!hao!nbires!isis!galon!fmg
Galon Exploration, Inc.
7122 S. Fillmore, (303) 770-6229
Littleton, CO 80122 Data: (303) 771-0258
"It is better to 'backup' then go forward."