|
|
1.1 root 1: # --------------------------------
2: # @(#)televideo 1.4 5/19/82
3: #
4: # televideo: TELEVIDEO
5: #
6: # There are some tvi's that require incredible amounts of padding and
7: # some that don't. I'm assuming 912 and 920 are the old slow ones,
8: # and 912b, 912c, 920b, 920c are the new ones that don't need padding.
9: tvi912|912|920|tvi920|old televideo,
10: tbc=\E3, hts=\E1, cr=^M, cud1=^J, ind=^J, bel=^G, il1=\EE$<33*>, am,
11: cub1=^H, el=\ET, cup=\E=%p1%' '%+%c%p2%' '%+%c, clear=^Z,
12: cols#80, dch1=\EW, dl1=\ER$<33*>,
13: kbs=^h, kcuu1=^K, kcud1=^J, kcub1=^H, kcuf1=^L,
14: kf0=^A@\r, kf1=^AA\r, kf2=^AB\r, kf3=^AC\r, kf4=^AD\r,
15: kf5=^AE\r, kf6=^AF\r, kf7=^AG\r, kf8=^AH\r, kf9=^AI\r,
16: home=^^, ich1=\EQ, lines#24, cuf1=^L, ht=^I,
17: rmso=\Ek, smso=\Ej, cuu1=^K, smul=\El, rmul=\Em, xmc#1,
18: # the 912 has a <funct> key that's like shift: <funct>8 xmits "^A8\r".
19: # The 920 has this plus real function keys that xmit different things.
20: # Terminfo makes you use the funct key on the 912 but the real keys on the 920.
21: 912b|912c|tvi912b|tvi912c|tvi|new televideo 912,
22: il1=\EE$<5*>, dl1=\ER$<5*>, use=tvi912,
23: 920b|920c|tvi920b|tvi920c|new televideo 920,
24: kf0=^A@\r, kf1=^AA\r, kf2=^AB\r, kf3=^AC\r, kf4=^AD\r, kf5=^AE\r,
25: kf6=^AF\r, kf7=^AG\r, kf8=^AH\r, kf9=^AI\r, use=tvi912b,
26: # Two page TVI 912/920.
27: # set to page 1 when entering ex (\E-17 )
28: # reset to page 0 when exiting ex (\E-07 )
29: tvi912-2p|tvi920-2p|912-2p|920-2p|tvi-2p|televideo w/2 pages,
30: smcup=\E-17 , rmcup=\E-07 , use=tvi912,
31: tvi950-ap|tvi 950 w/alt pages,
32: is2=\E\\1, smcup=\E-06 , rmcup=\E-16 , use=tvi950,
33: tvi950-b|bare tvi950 no is2,
34: is2@, smkx=\El, rmkx=\Ek, use=tvi950,
35: tvi950-ns|tvi950 w/no standout,
36: smso@, rmso@, smul@, rmul@, use=tvi950,
37: # The following tvi descriptions from B:pjphar
38: # Now that we have is1, is2, and is3, these should be factored.
39: #
40: # is2 for all 950's. It sets the following attributes:
41: # full duplex (\EDF) write protect off (\E()
42: # conversation mode (\EC) graphics mode off (\E%)
43: # white on black (\Ed) auto page flip off (\Ew)
44: # turn off status line (\Eg) clear status line (\Ef\r)
45: # normal video (\E0) monitor mode off (\EX or \Eu)
46: # edit mode (\Er) load blank char to space (\Ee\040)
47: # line edit mode (\EO) enable buffer control (^O)
48: # protect mode off (\E\047) local edit keys (\Ek)
49: # program unshifted send key to send line all (\E016)
50: # program shifted send key to send line unprotected (\E004)
51: # set the following to nulls:
52: # field delimiter (\Ex0\0\0)
53: # line delimiter (\Ex1\0\0)
54: # start-protected field delimiter (\Ex2\0\0)
55: # end-protected field delimiter (\Ex3\0\0)
56: # set end of text delimiter to carriage return/null (\Ex4\r\0)
57: #
58: # tvi950 sets duplex (send) edit keys (\El) when entering vi
59: # sets local (no send) edit keys (\Ek) when exiting vi
60: #
61: tvi950|950|televideo950,
62: tbc=\E3, hts=\E1, cr=^M, cud1=^J, ind=^J, bel=^G,
63: is2=\EDF\EC\Ed\EG0\Eg\Er\EO\E\047\E(\E%\Ew\EX\Ee ^O
64: \Ek\E016\E004\Ex0\0\0\Ex1\0\0\Ex2\0\0
65: \Ex3\0\0\Ex4\r\0\Ef\r\El,
66: il1=\EE, am, cub1=^H, cbt=\EI, ed=\Ey, el=\Et, clear=\E*,
67: cup=\E=%p1%' '%+%c%p2%' '%+%c, cols#80, dch1=\EW, dl1=\ER,
68: cud1=^V, rmir=\Er, home=^^, smir=\Eq, kf0=^A0\r,
69: kf1=^A@\r, kf2=^AA\r, kf3=^AB\r, kf4=^AC\r, kf5=^AD\r, kf6=^AE\r,
70: kf7=^AF\r, kf8=^AG\r, kf9=^AH\r, kbs=^H, kcud1=^V, khome=^^, kcub1=^H,
71: kcuf1=^L, kcuu1=^K, lines#24, mir, msgr, cuf1=^L,
72: ht=^I, rmso=\EG0, xmc#1, smso=\EG4, ri=\Ej,
73: rmul=\EG0, cuu1=^K, smul=\EG8,
74: flash=\Eb$<20>\Ed, cnorm=\Ek, cvvis=\El, xenl,
75: hs, tsl=\Eg\Ef, fsl=\r,
76: #
77: # is2 for 950 with two pages adds the following:
78: # set 48 line page (\E\\2)
79: # place cursor at page 0, line 24, column 1 (\E-07 )
80: #
81: # two page 950 adds the following:
82: # when entering ex, set 24 line page (\E\\1)
83: # when exiting ex, reset 48 line page (\E\\2)
84: # place cursor at 0,24,1 (\E-07 )
85: #
86: tvi950-2p|950-2p|televideo950 w/2 pages,
87: is2=\EDF\EC\Ed\EG0\Eg\Er\EO\E\047\E(\E%\Ew\EX\Ee ^O
88: \Ek\E016\E004\Ex0\0\0\Ex1\0\0\Ex2\0\0
89: \Ex3\0\0\Ex4\r\0\E\\2\E-07
90: rmcup=\E\\2\E-07 , smcup=\E\\1\E-07 , use=tvi950,
91: #
92: # is2 for 950 with four pages adds the following:
93: # set 96 line page (\E\\3)
94: # place cursor at page 0, line 24, column 1 (\E-07 )
95: #
96: # four page 950 adds the following:
97: # when entering ex, set 24 line page (\E\\1)
98: # when exiting ex, reset 96 line page (\E\\3)
99: # place cursor at 0,24,1 (\E-07 )
100: #
101: tvi950-4p|950-4p|televideo950 w/4 pages,
102: is2=\EDF\EC\Ed\EG0\Eg\Er\EO\E\047\E(\E%\Ew\EX\Ee ^O
103: \Ek\E016\E004\Ex0\0\0\Ex1\0\0\Ex2\0\0
104: \Ex3\0\0\Ex4\r\0\E\\3\E-07
105: rmcup=\E\\3\E-07 , smcup=\E\\1\E-07 , use=tvi950,
106: #
107: # is2 for reverse video 950 changes the following:
108: # set reverse video (\Ed)
109: #
110: # set flash accordingly (\Eb ...nulls... \Ed)
111: #
112: tvi950-rv|950-rv|televideo950 rev video,
113: tbc=\E3, hts=\E1,
114: is2=\EDF\EC\Eb\EG0\Eg\Er\EO\E\047\E(\E%\Ew\EX\Ee ^O
115: \Ek\E016\E004\Ex0\0\0\Ex1\0\0\Ex2\0\0
116: \Ex3\0\0\Ex4\r\0, flash=\Ed$<20>\Eb, use=tvi950,
117: #
118: # uses the appropriate entries from 9502p and 950rv
119: #
120: tvi950-rv2p|950-rv2p|televideo950 rev video w/2 pages,
121: is2=\EDF\EC\Eb\EG0\Eg\Er\EO\E\047\E(\E%\Ew\EX\Ee ^O
122: \Ek\E016\E004\Ex0\0\0\Ex1\0\0\Ex2\0\0
123: \Ex3\0\0\Ex4\r\0\E\\2\E-07
124: rmcup=\E\\2\E-07 , smcup=\E\\1\E-07 , use=tvi950rv,
125: #
126: # uses the appropriate entries from 9504p and 950rv
127: #
128: tvi950-rv4p|950-rv4p|televideo950 rev video w/4 pages,
129: is2=\EDF\EC\Eb\EG0\Er\EO\E\047\E(\E%\Ew\EX\Ee ^O
130: \Ek\E016\E004\Ex0\0\0\Ex1\0\0\Ex2\0\0
131: \Ex3\0\0\Ex4\r\0\E\\3\E-07
132: rmcup=\E\\3\E-07 , smcup=\E\\1\E-07 , use=tvi950rv,
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.