root@ucbvax.Berkeley.EDU (10/24/85)
From: nbires!isis!galon!root@ucbvax.Berkeley.EDU (Sys Op) __ 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."