|
|
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.