home *** CD-ROM | disk | FTP | other *** search
/ Usenet 1994 January / usenetsourcesnewsgroupsinfomagicjanuary1994.iso / sources / unix / volume1 / pcurses / part10 < prev    next >
Encoding:
Internet Message Format  |  1986-11-30  |  49.2 KB
  1. Subject:  Terminfo/Curses Part 10 of 11
  2.  
  3. : Run this shell script with "sh" not "csh"
  4. PATH=:/bin:/usr/bin:/usr/ucb
  5. export PATH
  6. if test ! -d =data
  7. then
  8.     echo 'Making directory "=data"'
  9.     mkdir =data
  10. fi
  11. echo 'x - =data/Makefile'
  12. sed 's/^X//' <<'//go.sysin dd *' >=data/Makefile
  13. PARTS= header adds annarbor beehive cdc concept datamedia dec diablo general \
  14.     hazeltine heath homebrew hp ibm lsi microterm misc perkinelmer \
  15.     print special tektronix teleray teletype televideo ti visual trailer
  16.  
  17. compiled: source
  18.     time compile source
  19.  
  20. source: ${PARTS}
  21.     cat ${PARTS} > source
  22.     -rm -f /etc/terminfo
  23.     ln source /etc/terminfo
  24.  
  25. clean:
  26.     rm -r ? source
  27.  
  28. changes:
  29.     vi ${PARTS}
  30. //go.sysin dd *
  31. echo 'x - =data/adds'
  32. sed 's/^X//' <<'//go.sysin dd *' >=data/adds
  33. #  # --------------------------------
  34. #    @(#)adds    1.3    3/22/82
  35. #
  36. # adds: ADDS
  37. #
  38. # Regent: lowest common denominator, works on all regents.
  39. regent|adds regent series,
  40.     cr=^M, cud1=^J, ind=^J, bel=^G, am, cub1=^H, clear=^L,
  41.     cup=^K%p1%' '%+%c^P%p1%{10}%/%{16}%*%p1%{10}%m%+%c,
  42.     cols#80, home=^A, lines#24, ll=^A^Z, cuf1=^F, cuu1=^Z,
  43. # Regent 100 has a bug where if computer sends escape when user is holding
  44. # down shift key it gets confused, so we avoid escape.
  45. regent100|adds regent 100,
  46.     cup=^K%p1%' '%+%c^P%p1%{10}%/%{16}%*%p1%{10}%m%+%c,
  47.     kf1=^B1\r, kf2=^B2\r, kf3=^B3\r, kf4=^B4\r,
  48.     kf5=^B5\r, kf6=^B6\r, kf7=^B7\r, kf8=^B8\r,
  49.     khome=^A, kcub1=^U, kcuf1=^F, kcuu1=^Z, kcud1=^J, use=regent,
  50. # Regent 20, untested
  51. regent20|adds regent 20,
  52.     ed=\Ek, el=\EK, cup=\EY%p1%' '%+%c%p2%' '%+%c, use=regent,
  53. regent25|adds regent 25,
  54.     kf0=^B0\r, kf1=^B1\r, kf2=^B2\r, kf3=^B3\r, kf4=^B4\r,
  55.     kf5=^B5\r, kf6=^B6\r, kf7=^B7\r, kf8=^B8\r, kf9=^B9\r,
  56.     khome=^A, kcub1=^U, kcuf1=^F, kcuu1=^Z, kcud1=^J, use=regent20,
  57. # Regent 40: untested
  58. regent40|adds regent 40,
  59.     il1=\EM, dl1=\El, is2=\EB, rmso=\E0@, smso=\E0P,
  60.     rmul=\E0@, smul=\E0`, flash=\ED\Ed, use=regent25,
  61. # If you have standout problem with regent 200, try smso=\ER\EOP,rmso=\E0@\EV,
  62. regent60|regent200|adds Regent 60,
  63.     dch1=\EE, rmir=\EF, smir=\EF, is2=\EV\EB, use=regent40,
  64. regent60na|regent 60 w/no arrow keys,
  65.     kcub1@, kcuf1@, kcuu1@, kcud1@, use=regent60,
  66. # Note: if return acts weird on a980, check internal switch #2
  67. # on the top chip on the CONTROL pad board.
  68. a980|adds consul 980,
  69.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=\E^N$<13>, am, cub1=^H,
  70.     clear=^L$<1>^K@, cup=^K%p1%'@'%+%c\E^E%p1%2d, cols#80, dl1=\E^O$<13>,
  71.     kf0=\E0, kf1=\E1, kf2=\E2, kf3=\E3, kf4=\E4,
  72.     kf5=\E5, kf6=\E6, kf7=\E7, kf8=\E8, kf9=\E9,
  73.     lines#24, cuf1=\E^E01, smso=^Y^^^N, rmso=^O, cuu1=$<9>,
  74. # From Onyx:edward  Thu Jul  9 09:27:33 1981
  75. viewpoint|addsviewpoint|adds viewpoint,
  76.     cr=^M, cud1=^J, ind=^J, bel=^G, am, cub1=^H, lines#24, cols#80,
  77.     cup=\EY%p1%' '%+%c%p2%' '%+%c, ed=\Ek, el=\EK, cuf1=^F,
  78.     cuu1=^Z, clear=^L, ll=^A, kcub1=^U, kcuf1=^F, kcud1=^J, kcuu1=^Z, khome=^A,
  79.     smso=^N, rmso=^O, smul=^N, rmul=^O, is2=^O\E0`, cvvis=^O\E0P, cnorm=^O\E0`,
  80. //go.sysin dd *
  81. echo 'x - =data/annarbor'
  82. sed 's/^X//' <<'//go.sysin dd *' >=data/annarbor
  83. #  # --------------------------------
  84. #    @(#)annarbor    1.8    5/19/82
  85. #
  86. # annarbor: ANN ARBOR
  87. #
  88. aa|annarbor|4080|ann arbor 4080,
  89.     cr=^M, cud1=^J, ind=^J, bel=^G, tbc=^\^P^P, hts=^]^P1,
  90.     cup=^O%p2%{10}%/%{16}%*%p2%{10}%m%+%c%p1%?%p1%{19}%>%t%{12}%+%;%'@'%+%c,
  91.     cols#80, lines#40, cub1=^H, clear=^L$<2>, cuu1=^N, cuf1=^_,
  92.     home=^K, am, kbs=^^, kcud1=^J, kcuu1=^N, kcub1=^H, kcuf1=^_, khome=^K,
  93. # From cbosg!chico!randvax!day Aug 1981
  94. # alias aaa 'setenv TERM aaa-\!^; tset -e^H -Q; alias clr echo "^[\[2J^[\[H"'
  95. # Be sure to change ^[ to escape in above alias.  Needs function keys added.
  96. # The ann arbor ambassador entries are merged from Mike O'Brien@Rand
  97. # and Howard Katseff at Bell Labs, and are not thoroughly tested.
  98. # Highly modified 6/22 by Mike O'Brien.
  99. # split out into several for the various screen sizes by dave-yost@rand
  100. # Many changes by Mark Horton 3/82
  101. aaa-unk|ann arbor ambassador (internal - don't use this directly),
  102.     am, km, mir, xon, cols#80, it#8,
  103.     cr=^M, ht=^I, cbt=\E[Z, bel=^G, ind=^J, ri=\EM,
  104.     cuu1=\E[A, cuf1=\E[C, cud1=^J, cub1=^H,
  105.     cuu=\E[%p1%dA, cuf=\E[%p1%dC, cud=\E[%p1%dB, cub=\E[%p1%dD,
  106.     ed=\E[J, el=\E[K$<5>, clear=\E[H\E[J$<156>,
  107.     home=\E[H, cup=\E[%i%p1%d;%p2%dH,
  108.     hpa=\E[%p1%{1}%+%d`, vpa=\E[%p1%{1}%+%dd,
  109.     dl=\E[%p1%dM,  dl1=\E[M,  il=\E[%p1%dL$<3*>,  il1=\E[L$<3>,
  110.     dch=\E[%p1%dP, dch1=\E[P, .ich=\E[%p1%d@$<4*>, .ich1=\E[@$<4>,
  111.     smir=\E[>4h, rmir=\E[>4l,
  112.     smul=\E[4m, rmul=\E[m, smso=\E[1m, rmso=\E[m,
  113.     bold=\E[1m, rev=\E[7m, blink=\E[5m, invis=\E[8m, sgr0=\E[0m,
  114.     sgr=\E[%?%p1%t1;%;%?%p2%t4;%;%?%p3%t7;%;%?%p4%t5;%;%?%p6%t1;%;%?%p7%t8;%;m,
  115.     kcuu1=\E[A, kcud1=\E[B, kcub1=\E[D, kcuf1=\E[C, khome=\E[H, kbs=^H,
  116.     kich1=\E[@, krmir=\E6,  kil1=\E[L,  kclr=\E[J,  kdch1=\E[P, kdl1=\E[M,
  117.     kf1=\EOA, kf2=\EOB, kf3=\EOC, kf4=\EOD, kf5=\EOE,
  118.     kf6=\EOF, kf7=\EOG, kf8=\EOH, kf9=\EOI, kf10=\EOJ,
  119.     rep=%p1%c\E[%p2%{1}%-%db,  sc=\E7, rc=\E8,
  120.     flash=\E7\E[H\E[4m\E9$<20>\E[m\E9\E8,
  121.     is1=\E[m\E7\E[H\E9\E8, is3=\E[1Q\E[>20;30l,
  122.     smm=\E[>52h, rmm=\E[>52l,
  123.     .mc0=\E[0i, .mc5=\E[v, .mc4=^C,
  124. aaa-unk-stat|Ann Arbor Ambassadors with status lines,
  125.     tsl=\E[>51h\E[1;%p1%dH\E[2K, fsl=\E[>51l, hs, eslok,
  126.     .dsl=\E7\E[60;0;0;30p\E[60;1H\E[K\E[H\E8,
  127. aaa-unk-rv|Ann Arbor Ambassadors in reverse-video mode,
  128.     bold=\E[1;7m, rev=\E[m, blink=\E[5;7m, invis=\E[7;8m, sgr0=\E[7m,
  129.     rmul=\E[7m, smul=\E[4;7m, rmso=\E[7m, smso=\E[m, rs1=\E[H\E[7m\E[J,
  130.     sgr=\E[%?%p1%!%t7;%;%?%p2%t4;%;%?%p3%t7;%;%?%p4%t5;%;%?%p6%t1;%;%?%p7%t8;%;m,
  131.     flash=\E7\E[H\E[7;4m\E9$<20>\E[7m\E9\E8,
  132.     is1=\E[7m\E7\E[H\E9\E8,
  133. aaa-18|ann arbor ambassador/18 lines,
  134.     smcup=\E[18;0;0;18p, rmcup=\E[60;0;0;18p\E[60;1H\E[K,
  135.     is2=\E7\E[60;0;0;18p\E8, lines#18, use=aaa-unk,
  136. aaa-18-rv|ann arbor ambassador/18 lines+reverse video,
  137.      use=aaa-unk-rv, use=aaa-18,
  138. aaa-20|ann arbor ambassador/20 lines,
  139.     smcup=\E[20;0;0;20p, rmcup=\E[60;0;0;20p\E[60;1H\E[K,
  140.     is2=\E7\E[60;0;0;20p\E8, lines#20, use=aaa-unk,
  141. aaa-20-rv|ann arbor ambassador/20 lines+reverse video,
  142.     use=aaa-unk-rv, use=aaa-20,
  143. aaa-22|ann arbor ambassador/22 lines,
  144.     smcup=\E[22;0;0;22p, rmcup=\E[60;0;0;22p\E[60;1H\E[K,
  145.     is2=\E7\E[60;0;0;22p\E8, lines#22, use=aaa-unk,
  146. aaa-22-rv|ann arbor ambassador/22 lines+reverse video,
  147.     use=aaa-unk-rv, use=aaa-22,
  148. aaa-24|ann arbor ambassador/24 lines,
  149.     smcup=\E[24;0;0;24p, rmcup=\E[60;0;0;24p\E[60;1H\E[K,
  150.     is2=\E7\E[60;0;0;24p\E8, lines#24, use=aaa-unk,
  151. aaa-24-rv|ann arbor ambassador/24 lines+reverse video,
  152.     use=aaa-unk-rv, use=aaa-24,
  153. aaa-26|ann arbor ambassador/26 lines,
  154.     smcup=\E[26;0;0;26p, rmcup=\E[60;0;0;26p\E[60;1H\E[K,
  155.     is2=\E7\E[60;0;0;26p\E8, lines#26, use=aaa-unk,
  156. aaa-26-rv|ann arbor ambassador/26 lines+reverse video,
  157.     use=aaa-unk-rv, use=aaa-26,
  158. aaa-28|ann arbor ambassador/28 lines,
  159.     smcup=\E[28;0;0;28p, rmcup=\E[60;0;0;28p\E[60;1H\E[K,
  160.     is2=\E7\E[60;0;0;28p\E8, lines#28, use=aaa-unk,
  161. aaa-28-rv|ann arbor ambassador/28 lines+reverse video,
  162.     use=aaa-unk-rv, use=aaa-28,
  163. aaa-29|ann arbor ambassador/29 lines plus status line,
  164.     smcup=\E[30;1;0;30p,
  165.     rmcup=\E[60;1;0;30p\E[60;1H\E[K,
  166.     is2=\E7\E[H\E[K\E[60;1;0;30p\E8\E[>51h\E[H\E[>51l, lines#29,
  167.     use=aaa-unk-stat, use=aaa-unk,
  168. aaa-29-rv|ann arbor ambassador/29 lines+status line+reverse video,
  169.     use=aaa-unk-rv, use=aaa-29,
  170. aaa-30|ambassador|ann arbor ambassador/30 lines,
  171.     smcup=\E[30;0;0;30p, rmcup=\E[60;0;0;30p\E[60;1H\E[K,
  172.     is2=\E7\E[60;0;0;30p\E8, lines#30, use=aaa-unk,
  173. aaa-30-rv|ann arbor ambassador/30 lines in reverse video,
  174.     use=aaa-unk-rv, use=aaa-30,
  175. aaa-36|ann arbor ambassador/36 lines,
  176.     smcup=\E[36;0;0;36p, rmcup=\E[60;0;0;36p\E[60;1H\E[K,
  177.     is2=\E7\E[60;0;0;36p\E8, lines#36, use=aaa-unk,
  178. aaa-36-rv|ann arbor ambassador/36 lines+reverse video,
  179.     use=aaa-unk-rv, use=aaa-36,
  180. aaa-40|ann arbor ambassador/40 lines,
  181.     smcup=\E[40;0;0;40p, rmcup=\E[60;0;0;40p\E[60;1H\E[K,
  182.     is2=\E7\E[60;0;0;40p\E8, lines#40, use=aaa-unk,
  183. aaa-40-rv|ann arbor ambassador/40 lines+reverse video,
  184.     use=aaa-unk-rv, use=aaa-40,
  185. aaa-47|ann arbor ambassador/48 lines+status line,
  186.     smcup=\E[48;1;0;48p,
  187.     rmcup=\E[60;1;0;48p\E[60;1H\E[K,
  188.     is2=\E7\E[H\E[K\E[60;1;0;48p\E8\E[>51h\E[H\E[>51l, lines#47,
  189.     use=aaa-unk-stat, use=aaa-unk,
  190. aaa-47-rv|ann arbor ambassador/48 lines+status line+reverse video,
  191.     use=aaa-unk-rv, use=aaa-47,
  192. aaa|ambas|aaa-48|ann arbor ambassador/48 lines,
  193.     smcup=\E[48;0;0;48p, rmcup=\E[60;0;0;48p\E[60;1H\E[K,
  194.     is2=\E7\E[60;0;0;48p\E8, lines#48, use=aaa-unk,
  195. aaa-rv|aaa-48-rv|ann arbor ambassador/48 lines+reverse video,
  196.     use=aaa-unk-rv, use=aaa-48,
  197. aaa-59|ann arbor ambassador/59 lines plus status line,
  198.     is2=\E7\E[H\E[K\E[60;1;0;60p\E8\E[>51h\E[H\E[>51l, lines#59,
  199.     use=aaa-unk-stat, use=aaa-unk,
  200. aaa-59-rv|ann arbor ambassador/59 lines+status line+reverse video,
  201.     use=aaa-unk-rv, use=aaa-59,
  202. aaa-60|ann arbor ambassador/60 lines,
  203.     is2=\E7\E[60;0;0;60p\E[1Q\E[m\E[>20;30l\E8, lines#60, use=aaa-unk,
  204. aaa-60-rv|ann arbor ambassador/60 lines+reverse video,
  205.     use=aaa-unk-rv, use=aaa-60,
  206. aaa-db|aaa-30-db|ann arbor ambassador 30 lines/destructive backspace,
  207.     cub1=\E[D, is3=\E[1Q\E[m\E[>20l\E[>30h, use=aaa-30,
  208. //go.sysin dd *
  209. echo 'x - =data/beehive'
  210. sed 's/^X//' <<'//go.sysin dd *' >=data/beehive
  211. #  # --------------------------------
  212. #    @(#)beehive    1.5    5/20/82
  213. #
  214. # beehive: BEEHIVE
  215. #
  216. # Reports are that most of these Beehive entries (except superbee) have not been
  217. # tested and do not work right.  rmso is a trouble spot.  Be warned.
  218. # set tab is ^F, clear (one) tab is ^V, no way to clear all tabs.
  219. # Superbee - f1=escape, f2=^C.
  220. # Note: there are at least 3 kinds of superbees in the world.  The sb1
  221. # holds onto escapes and botches ^C's.  The sb2 is the best of the 3.
  222. # The sb3 puts garbage on the bottom of the screen when you scroll with
  223. # the switch in the back set to CRLF instead of AEP.  This description
  224. # is tested on the sb2 but should work on all with either switch setting.
  225. # The f1/f2 business is for the sb1 and the xsb can be taken out for
  226. # the other two if you want to try to hit that tiny escape key.
  227. # This description is tricky: being able to use cup depends on there being
  228. # 2048 bytes of memory and the hairy ind string.
  229. # Now that we have separate ind and cud1, I imagine this could be improved.
  230. sb1|superbee|superb|beehive super bee,
  231.     tbc=\E3, hts=\E1, is2=\EE, cud1=^J,
  232.     cr=^M$<10>, ind=\n$<3>\n$<3>\EA\EK$<3>\ET\ET, bel=^G,
  233.     am, cub1=^H, ed=\EJ$<3>, el=\EK$<3>,
  234.     clear=\EH\EJ$<3>, cols#80, cup=\EF%p2%3d%p1%3d, cr=\r$<1000>,
  235.     lm#25, da, db, xsb, dch1=\EP$<3>, dl1=\EM$<100>,
  236.     smso=\E_1, rmso=\E_0, lines#25,
  237.     cuf1=\EC, ht=^I, cuu1=\EA, home=\EH, cnorm=\n,
  238.     kf1=\Ep, kf2=\Eq, kf3=\Er, kf4=\Es, kf5=\Et, kf6=\Eu, kf7=\Ev, kf8=\Ew,
  239.     kcud1=\EB, khome=\EH, kcub1=\ED, kcuf1=\EC, kcuu1=\EA,
  240. # This loses on lines > 80 chars long, use at your own risk
  241. superbeeic|super bee with insert char,
  242.     ich1=, smir=\EQ, rmir=\ER, use=superbee,
  243. sb2|sb3|fixed superbee,
  244.     xsb@, use=superbee,
  245. # good grief - does this entry make xmc when it doesn't have to?
  246. # look at those spaces in rmso/smso.  Seems strange to me.
  247. # However, not having one to test changes on, I'll just leave it be...
  248. bh3m|beehiveIIIm,
  249.     if=/usr/lib/tabset/beehive,
  250.     cr=^M, cud1=^J, ind=^J, bel=^G,
  251.     il1=^S$<160>, am, cub1=^H, ed=^R, el=^P, clear=^E^R,
  252.     cols#80, dl1=^Q$<350>, home=^E, lines#20, ll=^E^K,
  253.     cuf1=^L, ht=^I, rmso= ^_, smso=^] , cuu1=^K,
  254. microb|microbee|micro bee series,
  255.     cr=^M, cud1=^J, ind=^J, bel=^G, am, cub1=^H,
  256.     ed=\EJ, el=\EK, clear=\EE, cols#80, cup=\EF%p1%' '%+%c%p2%' '%+%c,
  257.     kf1=\Ep, kf2=\Eq, kf3=\Er, kf4=\Es,
  258.     kf5=\Et, kf6=\Eu, kf7=\Ev, kf8=\Ew, kf9=\Ex,
  259.     kcud1=\EB, khome=\EH, kcub1=\ED, kcuf1=\EC, kcuu1=\EA,
  260.     lines#24, cuf1=\EC, ht=^I, cuu1=\EA,
  261.     rmso=\Ed@ , smso= \EdP, rmul=\Ed@, smul=\Ed`,
  262. //go.sysin dd *
  263. echo 'x - =data/cdc'
  264. sed 's/^X//' <<'//go.sysin dd *' >=data/cdc
  265. #  # --------------------------------
  266. #    @(#)cdc    1.3    3/22/82
  267. #
  268. # cdc: CONTROL DATA
  269. #
  270. cdc456|cdc,
  271.     cr=^M, cud1=^J, ind=^J, bel=^G, lines#24, cols#80, clear=^Y^X,
  272.     cuf1=^L, cuu1=^Z, cub1=^H, cup=\E1%p1%' '%+%c%p2%' '%+%c, home=^Y,
  273.     il1=\E\114, dl1=\E\112, el=^V, ed=^X, am,
  274. cdc456tst,
  275.     cr=^M, cud1=^J, ind=^J, bel=^G,
  276.     lines#24, cols#80, clear=^y^x, cub1=^H, cup=\E1%p1%' '%+%c%p2%' '%+%c, am,
  277. //go.sysin dd *
  278. echo 'x - =data/concept'
  279. sed 's/^X//' <<'//go.sysin dd *' >=data/concept
  280. #  # --------------------------------
  281. #    @(#)concept    1.6    5/20/82
  282. #
  283. # concept: (HUMAN DESIGNED SYSTEMS)
  284. #
  285. # From vax135!hpk  Sat Jun 27 07:41:20 1981
  286. # Extensive changes to c108 by arpavax:eric Feb 1982
  287. #
  288. # There seem to be a number of different versions of the C108 PROMS
  289. # (with bug fixes in its Z-80 program).
  290. # The first one that we had would lock out the keyboard of you
  291. # sent lots of short lines (like /usr/dict/words) at 9600 baud.
  292. # Try that on your C108 and see if it sends a ^S when you type it.
  293. # If so, you have an old version of the PROMs.
  294. # The old one also messed up running in with a 132-character line-length.
  295. # You should configure the C108 to send ^S/^Q before running this.
  296. # It is much faster (at 9600 baud) than the c100 because the delays
  297. # are not fixed.
  298. # Old cursor addressing that didn't understand > 95:
  299. #    cup=\Ea%p1%' '%+%c%p2%' '%+%c,
  300. c108|c108-8p|concept108-8p|concept 108 w/8 pages,
  301.     rmcup=\Ev  ^B p\Ep\r\n, use=c108-4p, 
  302. c108-4p|concept108-4p|concept 108 w/4 pages,
  303.     cr=^M, cud1=^J, ind=^J, bel=^G, 
  304.     is2=\EU\E F\Ef\E7\E5\E8\El\ENH\EK\E\200\Eo&\200\Eo\47\E\E!,
  305.     smcup=\EU\Ev  8p\Ep\r, rmcup=\Ev  ^A p\Ep\r\n,
  306.     il1=\E^R, cub1=^H, ed=\E^C, el=\E^S, clear=\E?\E^E, cols#80,
  307.     cup=\Ea%p1%?%p1%{95}%>%t^A%c%{96}%-%;%' '%+%c%p2%?%p2%{95}%>%t^A%c%{96}%-%;%' '%+%c,
  308.     dch1=\E^A, dl1=\E^B, rmir=\E\200, eo, smir=\E^P, lines#24, mir,
  309.     cuf1=\E=, kbs=^h, ul, cuu1=\E;, db, smul=\EG, rmul=\Eg,
  310.     cvvis=\EW, cnorm=\Ew, in, am, xenl, flash=\Ek$<50>\EK,
  311.     smkx=\EX, rmkx=\Ex, kcuu1=\E;,
  312.     kcud1=\E<, kcub1=\E>, kcuf1=\E=, khome=\E?,
  313.     kf1=\E5, kf2=\E6, kf3=\E7, kf4=\E8, kf5=\E9, kf6=\E:,
  314.     smso=\ED, rmso=\Ed, dim=\EE, bold=\ED, rev=\ED, sgr0=\Ee\Ed\Eg\Ec,
  315. c108-rv-8p|concept 108 w/8 pages in reverse video,
  316.     smcup=\EU\Ev  8p\Ep\r, rmcup=\Ev  ^B p\Ep\r\n, use=c108-rv-4p, 
  317. c108-rv-4p|concept 108 w/4 pages in reverse video,
  318.     flash=\EK\200\200\200\200\200\200\200\200\200\200\200\200\200\200\Ek,
  319.     is2=\EU\E F\Ef\E7\E5\E8\El\ENH\Ek\E\200\Eo&\200\Eo\47\E\E!,
  320.     use=c108-4p, 
  321. c108-na|c108-na-8p|concept 108 w/8 pages no arrows,
  322.     smkx@, rmkx@, kf7=\E;, kf8=\E<, kf9=\E=, use=c108-8p,
  323. c108-rv-na|c108-rv-na-8p|concept 108 w/8 pages no arrows in rev video,
  324.     smkx@, rmkx@, kf7=\E;, kf8=\E<, kf9=\E=, use=c108-rv-8p,
  325. # this needs new frotz in the cup capability for 2-char addrs when > 95....
  326. c108-w|c108-w-8p|concept 108 w/8 pages in wide mode,
  327.     is2=\EU\E F\Ef\E7\E5\E8\El\ENH\EK\E\200\Eo&\200\Eo\47\E\E",
  328.     smcup=\EU\Ev  8^AD\Ep\r, rmcup=\Ev  ^A0^AD\Ep\r\n,
  329.     cup=\Ea%p1%?%p1%{95}%>%t^A%c%{96}%-%;%' '%+%c%p2%?%p2%{95}%>%t^A%c%{96}%-%;%' '%+%c,
  330.     cols#132, use=c108-8p,
  331. # Concepts have only window relative cursor addressing, not screen relative.
  332. # To get it to work right here, smcup/rmcup (which were invented for the
  333. # concept) lock you into a one page window for screen style programs.
  334. # To get out of the one page window, we use a clever trick:
  335. # we set the window size to zero ("\Ev    " in rmcup) which the terminal
  336. # recognizes as an error and resets the window to all of memory.
  337. # This trick works on c100 but does not on c108, sigh.
  338. #
  339. # Some tty drivers use cr3 for concept, others use nl3, hence the delays on
  340. # cr and ind below.  This padding is only needed at 9600 baud.
  341. # One or the other is commented out depending on local conventions.
  342. # 2 nulls padding on rmcup isn't always enough.  6 works fine.  Maybe less
  343. # than 6 but more than 2 will work.
  344. concept100|c100|concept|c104|c100-4p|concept 100,
  345.     is2=\EU\Ef\E7\E5\E8\El\ENH\EK\E\200\Eo&\200\Eo\47\E,
  346.     cr=$<9>^M, ind=^J,
  347. #    cr=^M, ind=^J$<9>,
  348.     bel=^G, cud1=^J, smcup=\EU\Ev  8p\Ep\r, rmcup=\Ev    $<6>\Ep\r\n,
  349.     il1=\E^R$<3*>, am, cub1=^H, ed=\E^C$<16*>, el=\E^U$<16>, clear=^L$<2*>,
  350.     cup=\Ea%p1%' '%+%c%p2%' '%+%c, cols#80, dch1=\E^A$<16*>, dl1=\E^B$<3*>,
  351.     rmir=\E\200, eo, smir=\E^P, in, ip=$<16*>, lines#24, mir, cuf1=\E=,
  352.     ht=\t$<8>, kbs=^h, ul, cuu1=\E;, db, smul=\EG, rmul=\Eg,
  353.     xenl, cvvis=\EW, cnorm=\Ew, flash=\Ek$<20>\EK,
  354.     pb#9600, vt#8,
  355.     smul=\EG, rmul=\Eg, smso=\EE\ED, rmso=\Ed\Ee,
  356.     dim=\EE, rev=\ED, blink=\EC, prot=\EI, invis=\EH, sgr0=\EN\200,
  357.     rep=\Er%p1%c%p2%' '%+%c$<.2*>, smkx=\EX, rmkx=\Ex,
  358.     kcuu1=\E;, kcud1=\E<, kcub1=\E>, kcuf1=\E=, khome=\E?,
  359.     kf1=\E5, kf2=\E6, kf3=\E7,
  360. c100-rvpp|c100-rv4ppp|c100 with printer port,
  361.     is2=\EU\Ef\E7\E5\E8\El\ENH\Ek\E\200\Eo&\200\Eo!\200\EQ"\EY(^W\Eo\47\E,
  362.     use=c100-rv,
  363. c100-rvna|c100-rv4pna|c100 with no arrows,
  364.     smkx@, rmkx@, use=c100-rv,
  365. c100-rv|c100-rv4p|concept100-rv|c100 rev video,
  366.     is2=\EU\Ef\E7\E5\E8\El\ENH\Ek\E\200\Eo&\200\Eo\47\E,
  367.     flash=\EK$<20>\Ek, cvvis@, cnorm@, smso=\EE, rmso=\Ee, use=c100,
  368. //go.sysin dd *
  369. echo 'x - =data/datamedia'
  370. sed 's/^X//' <<'//go.sysin dd *' >=data/datamedia
  371. #  # --------------------------------
  372. #    @(#)datamedia    1.4    5/19/82
  373. #
  374. # datamedia: DATAMEDIA
  375. #
  376. dm1520|dm1521|1521|1520|datamedia 1520,
  377.     cr=^M, cud1=^J, ind=^J, bel=^G, am, cub1=^H, ed=^K, el=^], clear=^L,
  378.     cup=^^%p2%' '%+%c%p1%' '%+%c, cols#80, home=^Y,
  379.     kcuu1=^_, kcud1=^J, kcub1=^H, kcuf1=^\, khome=^Y,
  380.     lines#24, cuf1=^\, cuu1=^_, xenl, ht=^I, 
  381. dm2500|datamedia2500|2500|datamedia 2500,
  382.     cud1=^J, ind=^J, bel=^G, il1=^P\n^X^]^X^]$<15>, cub1=^H, el=^W,
  383.     clear=^^^^\177, cup=^L%p2%'`'%^%c%p1%'`'%^%c, cols#80,
  384.     dch1=^P\b^X^]$<10*>,
  385.     dl1=^P^Z^X^]$<10*>, smdc=^P, rmdc=^X^], rmir=\377\377^X^]$<10>, home=^B,
  386.     ich1=^P^\^X^]$<10*>, smir=^P, lines#24, cuf1=^\,
  387.     pad=\377, smso=^N, rmso=^X^], cuu1=^Z,
  388. dm3025|datamedia 3025a,
  389.     is2=\EQ\EU\EV, cr=^M, cud1=^J, ind=^J, bel=^G,
  390.     il1=\EP\n\EQ$<130>, cub1=^H, ed=\EJ$<2>, el=\EK, clear=\EM$<2>,
  391.     cup=\EY%p2%' '%+%c%p1%' '%+%c, cols#80, dch1=\b$<6>,
  392.     dl1=\EP\EA\EQ$<130>, smdc=\EP, rmdc=\EQ, rmir=\EQ, home=\EH,
  393.     smir=\EP, ip=, lines#24, cuf1=\EC, ht=^I, 
  394.     smso=\EOA, rmso=\EO@, cuu1=\EA,
  395. 3045|dm3045|datamedia 3045a,
  396.     is2=\EU\EV, cr=^M, cud1=^J, ind=^J, bel=^G, am, cub1=^H,
  397.     ed=\EJ$<2>, el=\EK, clear=\EM$<2>, cup=\EY%p2%' '%+%c%p1%' '%+%c,
  398.     cols#80, dch1=\EB$<6>, smdc=, rmdc=, rmir=\EP, home=\EH,
  399.     ich1=, smir=\EP, ip=$<6>,
  400.     kf0=\Ey\r, kf1=\Ep\r, kf2=\Eq\r, kf3=\Er\r, kf4=\Es\r,
  401.     kf5=\Et\r, kf6=\Eu\r, kf7=\Ev\r, kf8=\Ew\r, kf9=\Ex\r,
  402.     khome=\EH, kcuu1=\EA, kcuf1=\EC, lines#24, cuf1=\EC, pad=\177, ht=^I,
  403.     eo, ul, cuu1=\EA, xenl,
  404. # dt80/1 is2 a vt100 lookalike, but it doesn't seem to need any padding.
  405. dt80|dmdt80|dm80|datamedia dt80/1,
  406.     cr=^M, cud1=^J, ind=^J, bel=^G, ed=\E[J, el=\E[K, clear=\E[2J\E[H,
  407.     cup=\E[%i%p1%d;%p2%dH, home=\E[H, cuf1=\E[C, ri=\EM,
  408.     smso=\E[7m, rmso=\E[m, cuu1=\E[A, smul=\E[4m, rmul=\E[m, use=vt100,
  409. # except in 132 column mode, where it needs a little padding.
  410. # This is2 still less padding than the vt100, and you can always turn on
  411. # the ^S/^Q handshaking, smso you can use vt100 flavors for things like
  412. # reverse video.
  413. dt80-w|dmdt80-w|dm80-w|datamedia dt80/1 in 132 char mode,
  414.     cr=^M, cud1=^J, ind=^J, bel=^G, ed=\E[0J$<20>, cols#132, el=\E[0K$<20>,
  415.     cup=\E[%i%p1%d;%p2%dH$<5>, clear=\E[H\E[2J$<50>, cuu1=\E[A$<5>, use=dmdt80,
  416. //go.sysin dd *
  417. echo 'x - =data/dec'
  418. sed 's/^X//' <<'//go.sysin dd *' >=data/dec
  419. #  # --------------------------------
  420. #    @(#)dec    1.7    5/20/82
  421. #
  422. # dec: DEC (DIGITAL EQUIPMENT CORPORATION)
  423. #
  424. # Note that xenl glitch in vt100 is not quite the same as concept,
  425. # since the cursor is left in a different position while in the
  426. # weird state (concept at beginning of next line, vt100 at end
  427. # of this line) so all versions of vi before 3.7 don't handle
  428. # xenl right on vt100.
  429. # I assume you have smooth scroll off or are at a slow enough baud
  430. # rate that it doesn't matter (1200? or less).  Also this assumes
  431. # that you set auto-nl to "on", if you set it off use vt100-nam below.
  432. #
  433. # Since there are two things here called vt100, the installer can make
  434. # a local decision to make either one standard "vt100" by including
  435. # it in the list of terminals in reorder, since the first vt100 in
  436. # /etc/terminfo is the one that it will find.  The choice is between
  437. # nam (no automatic margins) and am (automatic margins), as determined
  438. # by the wrapline switch (group 3 #2).  I presonally recommend turning
  439. # on the bit and using vt100-am, since having stuff hammer on the right
  440. # margin is sort of hard to read.  However, the xenl glitch does not occur
  441. # if you turn the bit off.
  442. #
  443. # I am unsure about the padding requirements listed here.  I have heard
  444. # a claim that the vt100 needs no padding.  It's possible that it needs
  445. # padding only if the xon/xoff switch is off.  For UNIX, this switch
  446. # should probably be on.
  447. #
  448. # The vt100 uses rs2 and rf rather than is2/tbc/hts because the tab settings
  449. # are in non-volatile memory and don't need to be reset upon login.
  450. # Also setting the number of columns glitches the screen annoyingly.
  451. # You can type "reset" to get them set.
  452. vt100-mc|vt100 without advanced video option,
  453.     sgr@, smso=\E[7m , rmso=\E[m , xmc#1,
  454.     smul@, rmul@, bold@, rev@, blink@, sgr0@, use=vt100,
  455. vt100|vt100-am|dec vt100,
  456.     cr=^M, cud1=^J, ind=^J, bel=^G, cols#80, lines#24,
  457.     clear=\E[;H\E[2J$<50>, cub1=^H, am, cup=\E[%i%p1%d;%p2%dH$<5>,
  458.     cuf1=\E[C$<2>, cuu1=\E[A$<2>, el=\E[K$<3>, ed=\E[J$<50>,
  459.     smso=\E[7m$<2>, rmso=\E[m$<2>, smul=\E[4m$<2>, rmul=\E[m$<2>,
  460.     bold=\E[1m$<2>, rev=\E[7m$<2>, blink=\E[5m$<2>, sgr0=\E[m$<2>,
  461.     sgr=\E[%?%p1%t;7%;%?%p2%t;4%;%?%p3%t;7%;%?%p4%t;5%;%?%p6%t;1%;m,
  462.     rs2=\E>\E[?3l\E[?4l\E[?5l\E[?7h\E[?8h, smkx=\E[?1h\E=, rmkx=\E[?1l\E>,
  463.     rf=/usr/lib/tabset/vt100, home=\E[H,
  464.     kcuu1=\EOA, kcud1=\EOB, kcuf1=\EOC, kcub1=\EOD, kbs=^H,
  465.     kf1=\EOP, kf2=\EOQ, kf3=\EOR, kf4=\EOS, ht=^I, ri=\EM$<5>,
  466.     vt#3, xenl, xon, sc=\E7, rc=\E8, csr=\E[%i%p1%d;%p2%dr,
  467. vt100-nam|vt100 w/no am,
  468.     am@, xenl@, use=vt100-am,
  469. vt100-23|vt100 for use with sysline,
  470.     lines#23, is2=\E[1;23r\E[23;1H,
  471.     hs, eslok, tsl=\E7\E[24;%p1%dH\E[1K, fsl=\E8, use=vt100-am,
  472. gt42|dec gt42,
  473.     cr=^M, cud1=^J, bel=^G,
  474.     cub1=^H, cols#72, lines#40, os,
  475. vt132|vt132,
  476.     il1=\E[L$<99>, dl1=\E[M$<99>, ip=$<7>, dch1=\E[P$<7>, rmir=\E[4l,
  477.     smir=\E[4h, xenl, ind=^J$<30>, use=vt100,
  478. gt40|dec gt40,
  479.     cr=^M, cud1=^J, bel=^G,
  480.     cub1=^H, cols#72, lines#30, os,
  481. vt50|dec vt50,
  482.     cr=^M, cud1=^J, ind=^J, bel=^G, cub1=^H, ed=\EJ, el=\EK, clear=\EH\EJ,
  483.     cols#80, lines#12, cuf1=\EC, ht=^I, cuu1=\EA,
  484. dw1|decwriter I,
  485.     cr=^M, cud1=^J, ind=^J, bel=^G,
  486.     cub1=^H, cols#72, hc, os,
  487. vt50h|dec vt50h,
  488.     cr=^M, cud1=^J, ind=^J, bel=^G, cub1=^H, ed=\EJ, el=\EK,
  489.     clear=\EH\EJ, cup=\EY%p1%' '%+%c%p2%' '%+%c, cols#80, lines#12,
  490.     cuf1=\EC, ht=^I, ri=\EI, cuu1=\EA,
  491. vt100-s|dec vt100 132 cols 14 lines (w/o advanced video option),
  492.     lines#14, use=vt100-w,
  493. vt100-w|vt100-w-am|dec vt100 132 cols (w/advanced video),
  494.     cols#132, lines#24, rs2=\E>\E[?3h\E[?4l\E[?5l\E[?8h, use=vt100-am,
  495. vt100-w-nam|dec vt100 132 cols (w/advanced video),
  496.     cols#132, lines#24, rs2=\E>\E[?3h\E[?4l\E[?5l\E[?8h, vt@, use=vt100-nam,
  497. vt52|dec vt52,
  498.     cr=^M, cud1=^J, ind=^J, bel=^G, cub1=^H, ed=\EJ, el=\EK,
  499.     clear=\EH\EJ, cup=\EY%p1%' '%+%c%p2%' '%+%c, cols#80, lines#24,
  500.     cuf1=\EC, ht=^I, ri=\EI, cuu1=\EA,
  501.     kcuu1=\EA, kcud1=\EB, kcuf1=\EC, kcub1=\ED, kbs=^H,
  502. # The dw3 (and dw4?) supposedly have some fancy stuff, like settable tabs
  503. # and column addressing.  But I don't know the details, and nobody seems
  504. # to use them except for consoles so it has never really mattered.
  505. dw2|dw3|decwriter|dw|decwriter II,
  506.     cr=^M, cud1=^J, ind=^J, bel=^G,
  507.     kbs=^h, cub1=^H, cols#132, hc, os,
  508. # From cbosg!ucbvax!G:tut Thu Sep 24 22:10:46 1981
  509. dw4|decwriter IV,
  510.     cr=^M, cud1=^J, ind=^J, bel=^G, cub1=^H, cols#132, hc, os, am,
  511.     ht=^I, is2=\Ec, kf0=\EOP, kf1=\EOQ, kf2=\EOR, kf3=\EOS, kbs=^H,
  512. //go.sysin dd *
  513. echo 'x - =data/diablo'
  514. sed 's/^X//' <<'//go.sysin dd *' >=data/diablo
  515. #  # --------------------------------
  516. #    @(#)diablo    1.4    5/19/82
  517. #
  518. # diablo: DAISY WHEEL PRINTERS
  519. #
  520. # The A manufacturer represents Diablo, DTC, Xerox, Qume, and other Daisy
  521. # wheel terminals until such time as terminfo distinguishes between them
  522. # enough to justify separate codes.
  523. 1620|1640|450|diablo 1620,
  524.     cr=^M, cud1=^J, ind=^J, bel=^G, tbc=\E2, hts=\E1, hpa=\E\t%i%p1%c, kbs=^H,
  525.     cub1=^H, cols#132, ff=^L, hc, hu=\EU, hd=\ED, os, ht=^I, cuu1=\E\n,
  526. 1620-m8|1640-m8|diablo 1620 w/8 column left margin,
  527.     cr=^M, cud1=^J, ind=^J, bel=^G, cols#124, is2=\r        \E9, use=1620,
  528. # DTC 382 with VDU.  Has no ed so we fake it with el.  Standout works but
  529. # won't go away without dynamite.  The terminal has tabs, but I'm getting
  530. # tired of fighting the braindamage.  If no tab is set or the terminal's
  531. # in a bad mood, it glitches the screen around all of memory.  Note that
  532. # return puts a blank ("a return character") in the space the cursor was
  533. # at, so we use ^P return (and thus ^P newline for newline).  Note also
  534. # that if you turn off tabs and let Unix expand tabs, curses won't work
  535. # (current version) because it doesn't turn off this bit, and cursor
  536. # addressing sends a tab for row/column 9.  What a losing terminal!  I
  537. # have been unable to get tabs set in all 96 lines - it always leaves at
  538. # least one line with no tabs in it, and once you tab through that line,
  539. # it completely weirds out.
  540. dtc|mc0|dtc382|382,
  541.     .if=/usr/lib/tabset/dtcvdu,
  542.     bel=^G, cud1=^J, ind=^J, il1=^P^Z, am, cub1=^H,
  543.     cols#80, el=^P^U, clear=^P^]$<20>, cup=^P^Q%p2%c%p1%c, dch1=^X,
  544.     dl1=^P^S, rmir=^Pi, home=^P^R, smir=^PI, cnorm=^Pb, cvvis=^PB, pad=\177,
  545.     rmcup=^P^]$<20>, lines#24, cuf1=^PR, .rmso=^P \200, .smso=^P \002^PF,
  546.     smul=^P \020, rmul=^P \200, cuu1=^P^L, xhp, lm#96,
  547.     da, db, cr=^P^M, ed=^P^U^P^S^P^S,
  548. dtc300s|300|300s|dtc 300s,
  549.     tbc=\E3, hts=\E1, cr=^M, cud1=^J, ind=^J, bel=^G,
  550.     kbs=^h, cub1=^H, cols#132, ff=^L, hc, hu=\EH, hd=\Eh, os, ht=^I, cuu1=^Z,
  551. gsi,
  552.     cub1=^H, cols#132, hc, hd=\Eh, hu=\EH, os, ht=^I, cuu1=^Z,
  553.     cr=^M, cud1=^J, ind=^J, bel=^G,
  554. aj830|aj832|aj|anderson jacobson,
  555.     cr=^M, cud1=^J, ind=^J, bel=^G,
  556.     cub1=^H, hc, hd=\E9, hu=\E8, os, cuu1=\E7,
  557. # From cbosg!ucbvax!pur-ee!cincy!chris Thu Aug 20 09:09:18 1981
  558. # This is incomplete, but it's a start.
  559. 5520|nec|spinwriter|nec 5520|,
  560.     tbc=\E3, hts=\E1, cr=^M, cud1=^J, ind=^J, bel=^G,
  561.     kbs=^h, cub1=^H, cols#132, ff=^L, hc, hu=\E]s\E9\E]W, hd=\E]s\n\E]W,
  562.     os, ht=^I, cuu1=\E9,
  563. qume5|qume|Qume Sprint 5,
  564.     tbc=\E3, hts=\E1, cr=^M, cud1=^J, ind=^J, bel=^G,
  565.     kbs=^h, cub1=^H, cols#80, ff=^L, hc, hu=\EH, hd=\Eh, os, ht=^I, cuu1=^Z,
  566. # I suspect the xerox1720 is the same as the diablo 1620.
  567. x1720|x1700|1700|x1750|xerox 1720,
  568.     cols#132, cub1=^H, ff=^L, hc, os, ht=^I, 
  569.     cr=^M, cud1=^J, ind=^J, bel=^G,
  570.     tbc=\E2, hts=\E1,
  571. //go.sysin dd *
  572. echo 'x - =data/general'
  573. sed 's/^X//' <<'//go.sysin dd *' >=data/general
  574. #  # --------------------------------
  575. #    @(#)general    1.4    5/19/82
  576. #
  577. # general: GENERAL TERMINAL (formerly INFOTON)
  578. #
  579. # Infoton is now called General Terminal Corp.
  580. # gt100 sounds like something DEC would come out with.  Lets hope they don't.
  581. i100|gt100|gt100a|General Terminal 100A (formerly Infoton 100),
  582.     cr=^M, cud1=^J, ind=^J, bel=^G, clear=^L, ed=\EJ, el=\EK,
  583.     lines#24, cols#80, il1=\EL, dl1=\EM, cuu1=\EA, cuf1=\EC,
  584.     home=\EH, cup=\Ef%p2%' '%+%c%p1%' '%+%c,
  585.     flash=\Eb\Ea, am, cub1=^H, smso=\Eb, rmso=\Ea,
  586. # Looks like an ANSI terminal, but what a kludge for dch1!  I bet smdc/rmdc
  587. # could be used even if the terminal is really that braindamaged.
  588. # But you would think being ANSI they would do \E[P right.  Hmm.
  589. i400|400|infoton 400,
  590.     cr=^M, cud1=^J, ind=^J, bel=^G, if=/usr/lib/tabset/infoton_tabs,
  591.     il1=\E[L, am, cub1=^H, el=\E[N, clear=\E[2J, cup=\E[%i%p1%3d;%p2%3dH,
  592.     cols#80, dl1=\E[M, lines#25, cuf1=\E[C, cuu1=\E[A,
  593.     smir=\E[4h\E[2Q, rmir=\E[4l\E[0Q, dch1=\E[4h\E[2Q\E[P\E[4l\E[0Q,
  594. addrinfo,
  595.     cr=^M, cud1=^J, ind=^J, bel=^G,
  596.     lines#24, cols#80, clear=^L, home=^H, cuf1=^Y, ed=^K,
  597.     cuu1=^\, am, cub1=^Z, cup=\037%i%p1%{1}%-%c%p2%{1}%-%c, ll=^H^\,
  598. # No, I don't know what this is.  But KAS happens to be Kurt Shoens initials.
  599. infotonKAS,
  600.     cr=^M, cud1=^J, ind=^J, bel=^G, am, cub1=^Z,
  601.     ed=^K, clear=^L, cols#80, lines#24, cuf1=^Y, cuu1=^\, ll=^H^\,
  602. //go.sysin dd *
  603. echo 'x - =data/hazeltine'
  604. sed 's/^X//' <<'//go.sysin dd *' >=data/hazeltine
  605. #  # --------------------------------
  606. #    @(#)hazeltine    1.4    5/19/82
  607. #
  608. # hazeltine: HAZELTINE
  609. #
  610. # Since cuf1 is blank, when you want to erase something you
  611. # are out of luck.  You will have to do ^L's a lot to
  612. # redraw the screen.  h1000 is untested.  It doesn't work in
  613. # vi - this terminal is too dumb for even vi.  (The code is
  614. # there but it isn't debugged for this case.)
  615. h1000|hazeltine 1000,
  616.     cub1=^H, home=^K, clear=^L, cuf1= , cols#80, lines#12, cr=^M, cud1=^J, ind=^J, bel=^G,
  617. # Note: the h1552 appears to be the first Hazeltine terminal which
  618. # is not braindamaged.  It has tildes and backprimes and everything!
  619. # Be sure the auto lf/cr switch is set to cr.
  620. h1552|hazeltine 1552,
  621.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=\EE, dl1=\EO,
  622.     kf1=\EP, lf1=blue, kf2=\EQ, lf2=red, kf3=\ER, lf3=green, use=vt52,
  623. h1552rv|hazeltine 1552 reverse video,
  624.     cr=^M, cud1=^J, ind=^J, bel=^G,
  625.     smso=\ES, rmso=\ET, use=h1552,
  626. # From cbosg!ucbvax!pur-ee!cincy!chris Thu Aug 20 09:09:18 1981
  627. h1420|hazeltine 1420,
  628.     cr=^M, cud1=^J, ind=^J, bel=^G, cub1=^H, am, lines#24, cols#80,
  629.     il1=\E^Z, dl1=\E^S, ed=\E^X, clear=\E\034, cuu1=\E^L,
  630.     cuf1=^P, el=\E^O, ht=^N, cup=\E^Q%p2%c%p1%' '%+%c, smso=\E\037, rmso=\E^Y,
  631. h1500|hazeltine 1500,
  632.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=~^Z$<40>, am,
  633.     cub1=^H, ed=~^X$<10>, el=~^O, clear=~^\, cup=~^Q%p2%c%p1%c, cols#80,
  634.     dl1=~^S$<40>, cud1=~^K, lines#24, cuf1=^P, .rmso=~^_, .smso=~^Y, cuu1=~^L,
  635. # h1510 assumed to be in sane escape mode.  Else use h1500.
  636. h1510|hazeltine 1510,
  637.     cr=^M, cud1=^J, ind=^J, bel=^G,
  638.     il1=\E^Z, am, cub1=^H, ed=\E^X, el=\E^O, clear=\E^\, cup=\E^Q%p2%c%p1%c, cols#80,
  639.     dl1=\E^S, cud1=\E^K, lines#24, cuf1=^P, .rmso=\E^_, .smso=\E^Y, cuu1=\E^L,
  640. h1520|hazeltine 1520,
  641.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=~^Z, am, cub1=^H,
  642.     ed=~^X, el=~^O, clear=~\034, cup=~^Q%p2%c%p1%c$<1>, cols#80,
  643.     dl1=~^S, cud1=~^K, hz, lines#24, cuf1=^P, rmso=~^Y, smso=~\037, cuu1=~^L, home=~^R,
  644. # Note: h2000 won't work well because of a clash between upper case and ~'s.
  645. h2000|hazeltine 2000,
  646.     cud1=^J, ind=^J, bel=^G,
  647.     il1=~^z$<6>, am, cub1=^H, clear=~^\$<6>, cup=~^q%p2%c%p1%c, cols#74,
  648.     dl1=~^s$<6>, home=~^r, lines#27, pad=\177,
  649. //go.sysin dd *
  650. echo 'x - =data/header'
  651. sed 's/^X//' <<'//go.sysin dd *' >=data/header
  652. # ------------------------
  653. #
  654. #    Terminfo source file %W% (CBOSGD) %G%
  655. #    Mark Horton, U.C. Berkeley, Bell Telephone Laboratories
  656. #
  657. # This file describes capabilities of various terminals, as needed by
  658. # software such as screen editors.  It does not attempt to describe
  659. # printing terminals very well, nor graphics terminals.  Someday.
  660. # See terminfo(5) in the Unix Programmers Manual for documentation.
  661. #
  662. # Conventions: First entry is two chars, first char is manufacturer,
  663. # second char is canonical name for model or mode.
  664. # Third entry is the one the editor will print with "set" command.
  665. # Last entry is verbose description.
  666. # Others are mnemonic synonyms for the terminal.
  667. #
  668. # Terminal naming conventions:
  669. # Terminal names look like <manufacturer> <model> - <modes/options>
  670. # Certain abbreviations (e.g. c100 for concept100) are also allowed
  671. # for upward compatibility.  The part to the left of the dash, if a
  672. # dash is present, describes the particular hardware of the terminal.
  673. # The part to the right can be used for flags indicating special ROM's,
  674. # extra memory, particular terminal modes, or user preferences.
  675. # All names are always in lower case, for consistency in typing.
  676. # Because of file naming restrictions, terminal names should not contain
  677. # period or slash, in fact, entirely alphanumeric characters plus dash are
  678. # highly recommended.  These restrictions do not apply to the verbose name.
  679. #
  680. # The following are conventionally used flags:
  681. #    rv    Terminal in reverse video mode (black on white)
  682. #    2p    Has two pages of memory.  Likewise 4p, 8p, etc.
  683. #    w    Wide - in 132 column mode.
  684. #    pp    Has a printer port which is used.
  685. #    na    No arrow keys - terminfo ignores arrow keys which are
  686. #        actually there on the terminal, so the user can use
  687. #        the arrow keys locally.
  688. #  
  689. # There are some cases where the same name is used for two different
  690. # terminals, e.g. "teleray" or "2621" or "vt100".  In these cases,
  691. # if a site has one of these, they should choose a local default and
  692. # bring that terminal to the front in the reorder script.  This works
  693. # because tgetent picks the first match in /etc/terminfo.
  694. # The list of names intentionally duplicated is:
  695. # 2621, c108, dtc, hp2621, teleray, tvi, vt100.
  696. #
  697. # If you absolutely MUST check for a specific terminal (this is discouraged)
  698. # check for the 2nd entry (the canonical form) since all other codes are
  699. # subject to change.  The two letter codes are there for version 6 and are
  700. # EXTREMELY subject to change, or even to go away if version 6 becomes for
  701. # all practical purposes obsolete.  We would much rather put in special
  702. # capabilities to describe your terminal rather than having you key on the
  703. # name.
  704. #
  705. #  Special manufacturer codes:
  706. #    A: hardcopy daisy wheel terminals
  707. #    M: Misc. (with only a few terminals)
  708. #      q: Homemade
  709. #      s: special (dialup, etc.)
  710. #  
  711. # Comments in this file begin with # - they cannot appear in the middle
  712. # of a terminfo entry.  Individual entries are commented out by
  713. # placing a period between the colon and the capability name.
  714. #
  715. #  This file is to be installed with an editor script (reorder)
  716. #  that moves the most common terminals to the front of the file.
  717. #  If the source is not available, it can be constructed by sorting
  718. #  the above entries by the 2 char initial code.
  719. //go.sysin dd *
  720. echo 'x - =data/heath'
  721. sed 's/^X//' <<'//go.sysin dd *' >=data/heath
  722. #  # --------------------------------
  723. #    @(#)heath    1.4    5/19/82
  724. #
  725. # heath: HEATHKIT (ZENITH)
  726. #
  727. h19-a|heath-ansi|heathkit-a|heathkit h19 ansi mode,
  728.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=\E[1L$<1*>, am, cub1=^H, ed=\E[J,
  729.     el=\E[K, clear=\E[2J, cup=\E[%i%p1%2d;%p2%2dH, cols#80,
  730.     dch1=\E[1P, dl1=\E[1M$<1*>, cud1=\E[1B,
  731.     rmir=\E[4l, home=\E[H, smir=\E[4h, lines#24, mir,
  732.     cuf1=\E[1C, rmacs=\E[10m, smacs=\E[11m, msgr, ht=^I, 
  733.     rmso=\E[0m, smso=\E[7m, cuu1=\E[1A, cvvis=\E[>4h, cnorm=\E[>4l,
  734.     kbs=^h, kcuu1=\E[1A, kcud1=\E[1B, kcub1=\E[1D, kcuf1=\E[1C,
  735.     khome=\E[H,
  736.     kf1=\EOS, kf2=\EOT, kf3=\EOU, kf4=\EOV, kf5=\EOW, lf6=blue,
  737.     lf7=red, lf8=white, kf6=\EOP, kf7=\EOQ, kf8=\EOR,
  738.     ri=\EM, is2=\E<\E[>1;2;3;4;5;6;7;8;9l\E[0m\E[11m\E[?7h,
  739. h19-bs|heathkit w/keypad shifted,
  740.     smkx=\Et, rmkx=\Eu, use=h19-b,
  741. h19-smul|heathkit w/keypad shifted/underscore cursor,
  742.     smkx=\Et, rmkx=\Eu, use=h19-u,
  743. h19|heath|h19-b|heathkit|heath-19|z19|zenith|heathkit h19,
  744.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=\EL$<1*>, am, cub1=^H,
  745.     ed=\EJ, el=\EK, clear=\EE, cup=\EY%p1%' '%+%c%p2%' '%+%c, cols#80,
  746.     dch1=\EN, dl1=\EM$<1*>, cud1=\EB, rmir=\EO, home=\EH, smir=\E@,
  747.     lines#24, mir, cuf1=\EC, rmacs=\EF, smacs=\EG, msgr, ht=^I, 
  748.     ri=\EI, rmso=\Eq, smso=\Ep, cuu1=\EA, cvvis=\Ex4, cnorm=\Ey4,
  749.     kbs=^h, kcuu1=\EA, kcud1=\EB, kcub1=\ED, kcuf1=\EC, khome=\EH,
  750.     kf1=\ES, kf2=\ET, kf3=\EU, kf4=\EV, kf5=\EW,
  751.     lf6=blue, lf7=red, lf8=white, kf6=\EP, kf7=\EQ, kf8=\ER,
  752.     hs, eslok, tsl=\Ej\Ex5\EY8%p1%' '%+%c\Eo\Eo, fsl=\Ek\Ey5,
  753. h19-u|heathkit with underscore cursor,
  754.     cvvis@, cnorm@, use=h19-b,
  755. # This still doesn't work right - something funny is going on with return
  756. # and linefeed in the reach program.
  757. reach|h89|h89 running reach,
  758.     cr@, cud1=\EB, is2=\Ey3\Ev, use=h19-b,
  759. //go.sysin dd *
  760. echo 'x - =data/homebrew'
  761. sed 's/^X//' <<'//go.sysin dd *' >=data/homebrew
  762. #  # --------------------------------
  763. #    @(#)homebrew    1.4    5/19/82
  764. #
  765. # homebrew: HOME MADE TERMINALS
  766. #
  767. bc|bill croft homebrew,
  768.     cr=^M, cud1=^J, ind=^J, bel=^G, am, cub1=^H,
  769.     cup=\E=%p1%' '%+%c%p2%' '%+%c, clear=^Z, cols#96, home=^^, lines#72,
  770.     cuf1=^L, cuu1=^K, flash=,
  771. nucterm|rayterm|nuc|NUC homebrew,
  772.     cr=^M, cud1=^J, ind=^J, bel=^G, am, cub1=^H, clear=^L$<1>,
  773.     lines#24, cols#80, cuf1=^C, cuu1=^N, home=^B, ll=^K, el=^A, ed=^E,
  774. carlock|klc,
  775.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=^E, am, el=^U, clear=^Z$<100>,
  776.     cup=\E=%p1%' '%+%c%p2%' '%+%c, cols#80, dch1=\177, dl1=^D, ed=,
  777.     rmir=^T, home=^^, smir=^T, lines#24, cuf1=^L, rmso=^V, smso=^V,
  778.     cuu1=^K, flash=\EV\EV,
  779. ex3000,
  780.     cr=^M, cud1=^J, ind=^J, bel=^G, lines#24, cols#80, home=^Q,
  781. exidy|exidy2500|exidy sorcerer rmacs dm2500,
  782.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=^P^J^X, am, cub1=^H,
  783.     el=^W, clear=^^, cup=^L%p2%'`'%^%c%p1%'`'%^%c, cols#64,
  784.     dch1=\b, dl1=^P^Z^X, smdc=^P, ed=^X, rmir=^X, home=^B, ich1=^\,
  785.     smir=^P, lines#30, cuf1=^\, ht=^I, smso=^N, rmso=^X, cuu1=^Z,
  786. # This came from the comp ctr who got it from some user.  Smart indeed!
  787. sexidy|exidy smart,
  788.     cr=^M, cud1=^J, ind=^J, bel=^G, lines#24, cols#64, clear=^L, home=^Q,
  789.     cuf1=^S, cuu1=^W, cub1=^H, cub1=^A, kcud1=^S,
  790. # netx and xitex are almost identical, except for the padding
  791. # on clear screen.  Hmm.
  792. netx|netronics,
  793.     cr=^M, cud1=^J, ind=^J, bel=^G, cub1=^H, ed=^F^E$<2000>, el=^E$<1600>,
  794.     clear=^L$<466>, cup=\E=%p1%'@'%+%c%p2%'@'%+%c, cols#64, home=^D,
  795.     lines#16, cuf1=\E+@A, pad=\200, ri=\E=@@^K, cuu1=^K,
  796. xitex|xitex sct-100,
  797.     cr=^M, cud1=^J, ind=^J, bel=^G, cub1=^H, ed=^F^E$<2000>, el=^E$<1600>,
  798.     clear=^L$<400>, cup=\E=%p1%'@'%+%c%p2%'@'%+%c, cols#64, home=^D,
  799.     lines#16, cuf1=\E+@A, pad=\200, ri=\E=@@^K, cuu1=^K,
  800. ubell|ubellchar,
  801.     if=/usr/lib/tabset/ubell,
  802.     cr=^M, cud1=^J, ind=^J, bel=^G, am, cub1=^H, ht=^I, el=\Ed,
  803.     clear=^Z, cup=\E=%p1%' '%+%c%p2%' '%+%c, cols#80, lines#24, cuf1=^L,
  804.     cuu1=^K, home=^^,
  805. ttywilliams,
  806.     cr=^M, cud1=^J, ind=^J, bel=^G, cols#80, lines#12,
  807.     cub1=^Y, cud1=^K, cuu1=^Z, clear=^^, el=^_, am, home=^], cuf1=^X,
  808. //go.sysin dd *
  809. echo 'x - =data/hp'
  810. sed 's/^X//' <<'//go.sysin dd *' >=data/hp
  811. #  # --------------------------------
  812. #    @(#)hp    1.7    5/20/82
  813. #
  814. # hp: HEWLETT PACKARD
  815. #
  816. # Note: no "home" on HP's since that homes to top of memory, not screen.
  817. # Due to severe 2621 braindamage, the only way to get the arrow keys to
  818. # transmit anything at all is to turn on the function key labels
  819. # (f1-f8) with smkx, and even then the poor user has to hold down shift!
  820. # The default 2621 turns off the labels except when it has to to enable
  821. # the function keys.  If your installation prefers labels on all the time,
  822. # or off all the time (at the "expense" of the function keys) move the
  823. # 2621-nl or 2621-wl labels to the front using reorder.
  824. # Note: there are newer ROM's for 2621's that allow you to set strap A
  825. # so the regular arrow keys xmit \EA, etc, as with the 2645.  However,
  826. # even with this strap set, the terminal stops xmitting if you reset it,
  827. # until you unset and reset the strap!  Since there is no way to set/unset
  828. # the strap with an escape sequence, we don't use it in the default.
  829. # If you like, you can use 2621-ba (braindamaged arrow keys).
  830. hp2621-ba|2621-ba|2621 w/new rom and strap A set,
  831.     smkx@, rmkx@,
  832.     kcuu1=\EA, kcud1=\EB, kcub1=\ED, kcuf1=\EC, khome=\Eh, use=hp2621,
  833. # 2621 with labels on all the time - normal outside vi, function inside vi.
  834. hp2621-wl|2621-wl|hp 2621 w/labels,
  835.     is2=\E&jA\r, rmkx=\E&jA, use=hp2621-fl,
  836. # 2621 with function labels.  Most of the time they are off,
  837. # but inside vi, the function key labels appear.  You have to
  838. # hold down shift to get them to xmit.
  839. hp2621-fl|2621|hp2621|hp2621a|hp2621p|2621a|2621p|2621-fl|2621A|2621P|hp 2621,
  840.     is2=\E&j@\r, cbt=\Ei, cup=\E&a%p2%dc%p1%dY,
  841.     dch1=\EP$<2>, ip=$<2>, pb#19200,
  842.     smso=\E&dD, rmso=\E&d@, smul=\E&dD, rmul=\E&d@, sgr0=\E&d@, xhp@,
  843.     khome=\Ep\r, kcuu1=\Et\r, kcub1=\Eu\r, kcuf1=\Ev\r, kcud1=\Ew\r,
  844.     kf1=\Ep\r, kf2=\Eq\r, kf3=\Er\r, kf4=\Es\r, kf5=\Et\r, kf6=\Eu\r,
  845.     kf7=\Ev\r, kf8=\Ew\r, smkx=\E&jB, rmkx=\E&j@, ht=^I$<2>, xon, use=hp,
  846. # 2621k45: untested
  847. 2621k45|hp2621k45|k45|hp 2621 with 45 keyboard,
  848.     kbs=^H, kcuu1=\EA, kcud1=\EB, kcub1=\ED, kcuf1=\EC, khome=\Eh,
  849.     smkx=\E&s1A, rmkx=\E&s0A, use=2621,
  850. # This terminal should be used at 4800 baud or less.  It needs padding for
  851. # plain characters at 9600, I guessed at an appropriate cr delay.
  852. # It really wants ^E/^F handshaking, but that doesn't work well even if
  853. # you write software to support it.
  854. 2645|hp2645|hp45|hp 264x series,
  855.     dim=\E&dH, rev=\E&dB, smul=\E&dD, blink=\E&dA, sgr0=\E&d@,
  856.     sgr=\E&d%'@'%?%p1%t%'B'%|%;%?%p2%t%'D'%|%;%?%p3%t%'B'%|%;%?%p4%t%'A'%|%;%?%p5%t%'H'%|%;%?%p6%t%'B'%|%;%c,
  857.     kcuu1=\EA, kcud1=\EB, kcub1=\ED, kcuf1=\EC, khome=\Eh,
  858.     smkx=\E&s1A, rmkx=\E&s0A, knp=\EU, kpp=\EV, kri=\ET, kind=\ES,
  859.     kil1=\EL, kdl1=\EM, kich1=\EQ, kdch1=\EP,
  860.     kel=\EK, ked=\EJ, krmir=\ER, pb#9600, cr=^M$<20>, use=hp,
  861. hp|hewlett-packard,
  862.     tbc=\E3, hts=\E1, cr=^M, cud1=^J, ind=^J, bel=^G, il1=\EL, am, cub1=^H,
  863.     ed=\EJ, el=\EK, hpa=\E&a%p1%dC, clear=\EH\EJ,
  864.     cup=\E&a%p2%dc%p1%dY$<6>, cols#80, vpa=\E&a%p1%dY, lm#0, da, db,
  865.     dch1=\EP, dl1=\EM, rmir=\ER, smir=\EQ, kbs=^H, lines#24, mir,
  866.     cuf1=\EC, ht=^I, rmso=\E&d@, smso=\E&dJ,
  867.     smul=\E&dD, rmul=\E&d@, cuu1=\EA, xhp, vt#6,
  868. hp-0|hewlett-packard for testing of curses and the like,
  869.     cr=^M, cud1=^J, ind=^J, bel=^G, am, cuf1=\EC,
  870.     cub1=^H, clear=\EH\EJ, home=\E&a0c0Y, cols#80, lines#24,
  871. hp-1,
  872.     ht=^I, cuu1=\EA, use=hp-0,
  873. hp-2,
  874.     cup=\E&a%p2%dc%p1%dY$<6>, use=hp-1,
  875. hp-3,
  876.     ed=\EJ, el=\EK, use=hp-2,
  877. # This entry does not use any of the fancy windowing stuff of the 2626.
  878. # Indeed, terminfo does not yet handle such stuff.  Since changing any window
  879. # clears memory, it is probably not possible to use this for screen opt.
  880. # ed is incredibly slow most of the time - I am guessing at the exact padding.
  881. # Since the terminal uses xoff/xon this is intended only for cost computation,
  882. # so that the terminal will prefer el or even dl1 which is probably faster!
  883. hp2626|hp2626a|hp2626p|2626|2626a|2626p|2626A|2626P|hp 2626,
  884.     dch1=\EP$<2>, ip=$<2>, rmso=\E&d@, smso=\E&dB, ed=\EJ$<500>,
  885.     rev=\E&dB, smul=\E&dD, blink=\E&dA, invis=\E&dS, sgr0=\E&d@,
  886.     rmul=\E&d@,
  887.     sgr=\E&d%'@'%?%p1%t%'B'%|%;%?%p2%t%'D'%|%;%?%p3%t%'B'%|%;%?%p4%t%'A'%|%;%c,
  888.     khome=\Eh, kcuu1=\EA, kcub1=\ED, kcuf1=\EC, kcud1=\EB,
  889.     smkx=\E&s1A, rmkx=\E&s0A, knp=\EU, kpp=\EV, kri=\ET,
  890.     kind=\ES, kil1=\EL, kdl1=\EM, kich1=\EQ, kdch1=\EP,
  891.     kel=\EK, ked=\EJ, krmir=\ER,
  892.     ind=\ES, ht=^I$<2>, xhp, use=2621,
  893. # This entry is for sysline.  It allocates a 23 line window with a 115 line
  894. # workspace for regular use, and a 1 line window for the status line.
  895. # This assumes port 2 is being used.
  896. # Turn off horizontal line, Create ws #1 with 115 lines,
  897. # Create ws #2 with 1 line, Create window #1 lines 1-23,
  898. # Create window #2 lines 24-24, Attach cursor to workspace #1.
  899. # Note that this clears the tabs so it must be done by tset before
  900. # it sets the tabs.
  901. 2626-23|hp 2626 using only 23 lines,
  902.     tsl=\E&w7f2p2I\E&w4f2I\r\EK\E&a%p1%dC,
  903.     fsl=\E&d@\E&w7f2p1I\E&w4f1I, eslok, hs,
  904.     is1=\E&q3t0{0H \E&w0f115n1I \E&w0f1n2I
  905.     \E&w2f1i0d0u22l0S \E&w2f2i0d23u23l0S \E&w7f2p1I \r,
  906.     lines#23, use=2626,
  907. # Force terminal back to 24 lines after being 23.
  908. 2626-24|hp 2626 using all 24 lines,
  909.     is1=\E&q3t0{0H \E&w0f118n1I \E&w0f1n2I
  910.     \E&w2f1i0d0u23l0S \E&w3f2I \E&w7f2p1I \r,
  911.     use=2626,
  912. # Various entries useful for small windows on 2626.
  913. 2626-12,
  914.     lines#12, use=2626,
  915. 2626-12x40,
  916.     cols#40, lines#12, use=2626,
  917. 2626-x40,
  918.     cols#40, use=2626,
  919. 2626-11,
  920.     lines#11, use=2626-23,
  921. # cD is a pain - but it only screws up at 9600 baud.
  922. # You should use this terminal at 4800 baud or less.
  923. hp2648|hp2648a|2648a|2648A|2648|HP 2648a graphics terminal,
  924.     clear=\EH\EJ$<50>, cup=\E&a%p2%dc%p1%dY$<20>,
  925.     dch1=\EP$<7>, ip=$<5>, use=2645,
  926. # 2640a doesn't have the Y cursor addressing feature, and C is memory relative
  927. # instead of screen relative, as we need.
  928. 2640|hp2640a|2640a|hp 2640a,
  929.     cup@, smkx@, rmkx@, use=2645,
  930. 2640b|hp2640b|2644a|hp2644a|hp 264x series,
  931.     smkx@, rmkx@, use=2645,
  932. # 2621 using all 48 lines of memory, only 24 visible at any time.  Untested.
  933. 2621-48|48 line 2621,
  934.     lines#48, home=\EH, cup=\E&a%p2%dc%p1%dR, use=2621,
  935. # 2621 with no labels ever.  Also prevents vi delays on escape.
  936. hp2621-nl|2621-nl|hp 2621 with no labels,
  937.     smkx@, rmkx@, khome@, kcuu1@, kcub1@, kcuf1@, kcud1@, use=hp2621-fl,
  938. # Needed for UCB ARPAVAX console, since lsi-11 expands tabs (wrong).
  939. hp2621-nt|2621-nt|hp 2621 w/no tabs,
  940.     ht@, use=hp2621,
  941. //go.sysin dd *
  942. echo 'x - =data/ibm'
  943. sed 's/^X//' <<'//go.sysin dd *' >=data/ibm
  944. #  # --------------------------------
  945. #    @(#)ibm    1.4    5/19/82
  946. #
  947. # ibm: IBM, INTERACTIVE SYSTEMS, and INTECOLOR
  948. #
  949. # Some of these should go in the misc category, IBM, ISC, and intecolor can't
  950. # all have I.  I will wait to see who comes out with more terminals.
  951. # These compucolors appear similar, but they at least have different
  952. # sized screens.  I don't know what's going on here.
  953. # There is further confusion since intecolor seems to call themselves isc too.
  954. 8001|isc8001|compucolor|intecolor,
  955.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=\EU, am, cub1=^Z,
  956.     clear=^L$<3*>, cup=^C%p2%c%p1%c, cols#80, rmdc=\EQ, smdc=\EQ, ed=\EF,
  957.     dch1=\177, dl1=\EV, rmir=\EF, smir=\EQ, lines#40, cuf1=^Y$<1>,
  958.     ht=\t$<8>, cuu1=^\, home=^H$<1>,
  959. compucolor2|compucolorii,
  960.     cr=^M, cud1=^J, ind=^J, bel=^G,
  961.     ht=^I, am, cup=^C%p2%c%p1%c, cub1=^Z, lines#32, cols#64,
  962.     clear=^L, home=^H, cuf1=^Y, cuu1=^\,
  963. # From cithep!eric  Wed Sep 16 08:06:44 1981
  964. intext|Interactive Systems Corporation modified owl 1200,
  965.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=\020$<5.5*>, am, cub1=^_,
  966.     cub1=^H, cbt=^Y, ed=\026J$<5.5*>, el=^K\160^R,
  967.     clear=\014$<132>, cup=\017%p1%' '%+%c%p2%' '%+%c, cols#80,
  968.     dch1=\022$<5.5*>, dl1=\021$<5.5*>, rmir=\026\074,
  969.     smir=\026\073, ip=$<5.5*>, lines#24, cuf1=\036, ht=^I, 
  970.     cuu1=\034, rmso=^V# , xmc#1, smso=^V$\054,
  971.     kcub1=^_, kcud1=^J, kcuf1=^^, kcuu1=\034, kbs=^H, khome=^Z,
  972.     kf1=^VA\r, kf2=^VB\r, kf3=^VC\r, kf4=^VD\r, kf5=^VE\r,
  973.     kf6=^VF\r, kf7=^VG\r, kf8=^VH\r, kf9=^VI\r, kf0=^VJ\r,
  974. ibm|ibm3101|3101|i3101|IBM 3101-10,
  975.     .if=/usr/lib/tabset/3101,
  976.     cr=^M, cud1=^J, ind=^J, bel=^G, tbc=\EH, hts=\E0, am, cub1=^H,
  977.     clear=\EK, lines#24, cols#80, cuf1=\EC, cuu1=\EA, ed=\EJ, el=\EI,
  978.     kcud1=\EB, kcub1=\ED, kcuf1=\EC, kcuu1=\EA,
  979.     home=\EH, cup=\EY%p1%' '%+%c%p2%' '%+%c, ht=^I, 
  980. //go.sysin dd *
  981. echo 'x - =data/lsi'
  982. sed 's/^X//' <<'//go.sysin dd *' >=data/lsi
  983. #  # --------------------------------
  984. #    @(#)lsi    1.4    5/19/82
  985. #
  986. # lsi: LEAR SIEGLER (ADM)
  987. #
  988. # If the adm31 gives you trouble with standout mode, check the DIP switch
  989. # in position 6, bank @c11, 25% from back end of pad.  Should be OFF.
  990. # If there is no such switch, you have an old adm31 and must use oadm31
  991. adm31|31|lsi adm31,
  992.     is2=\Eu\E0, cr=^M, cud1=^J, ind=^J, bel=^G, il1=\EE, am, cub1=^H,
  993.     el=\ET, cup=\E=%p1%' '%+%c%p2%' '%+%c, clear=\E*, ed=\EY, cols#80,
  994.     dch1=\EW, dl1=\ER, rmir=\Er, home=^^, smir=\Eq,
  995.     kf0=^A0\r, kf1=^A1\r, kf2=^A2\r, kf3=^A3\r, kf4=^A4\r,
  996.     kf5=^A5\r, kf6=^A6\r, kf7=^A7\r, kf8=^A8\r, kf9=^A9\r,
  997.     kcud1=^J, kcub1=^H, kcuf1=^L, kcuu1=^K,
  998.     lines#24, mir, cuf1=^L,
  999.     rmso=\EG0, smso=\EG1, cuu1=^K, smul=\EG1, rmul=\EG0,
  1000. adm2|lsi adm2,
  1001.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=\EE, am, cub1=^H, ed=\EY, el=\ET,
  1002.     clear=\E;, cup=\E=%p1%' '%+%c%p2%' '%+%c, cols#80, dch1=\EW, dl1=\ER,
  1003.     home=^^, ich1=\EQ, kcud1=^J, khome=^^, kcub1=^H, kcuf1=^L, kcuu1=^K,
  1004.     lines#24, cuf1=^L, cuu1=^K,
  1005. adm3|lsi adm3,
  1006.     cr=^M, cud1=^J, ind=^J, bel=^G,
  1007.     am, cub1=^H, clear=^Z, lines#24, cols#80,
  1008. adm42|42|lsi adm42,
  1009.     cvvis=\EC\E3 \E3(, cr=^M, cud1=^J, ind=^J, bel=^G, il1=\EE$<270>,
  1010.     am, cub1=^H, ed=\EY, el=\ET, clear=\E;, cup=\E=%p1%' '%+%c%p2%' '%+%c,
  1011.     cols#80, dch1=\EW, dl1=\ER, rmir=\Er, smir=\Eq, ip=$<6*>, lines#24,
  1012.     cbt=\EI, cuf1=^L, rmso=\EG0, smso=\EG4, ht=\t, cuu1=^k,
  1013.     pad=\177,
  1014. adm5|lsi adm5,
  1015.     cr=^M, cud1=^J, ind=^J, bel=^G,
  1016.     ed=\EY, el=\ET, cud1=^J, kbs=^H, khome=^^,
  1017.     rmso=\EG, xmc#1, smso=\EG, use=adm3aplus,
  1018. adm3a|3a|lsi adm3a,
  1019.     cr=^M, cud1=^J, ind=^J, bel=^G, am, cub1=^H,
  1020.     cup=\E=%p1%' '%+%c%p2%' '%+%c, clear=^Z$<1>,
  1021.     cols#80, home=^^, lines#24, cuf1=^L, cuu1=^K,
  1022. adm3a+|3a+|adm3aplus|lsi adm3a+,
  1023.     kcub1=^H, kcud1=^J, kcuu1=^K, kcuf1=^L, use=adm3a,
  1024. oadm31|o31|old adm31,
  1025.     smso=\EG4, smul@, rmul@, use=adm31,
  1026. //go.sysin dd *
  1027. echo 'x - =data/microterm'
  1028. sed 's/^X//' <<'//go.sysin dd *' >=data/microterm
  1029. #  # --------------------------------
  1030. #    @(#)microterm    1.4    5/19/82
  1031. #
  1032. # microterm: MICROTERM
  1033. #
  1034. microterm|act4|microterm act iv,
  1035.     cr=^M, cud1=^J, ind=^J, bel=^G, am, cub1=^H, ed=^_, el=^^, clear=^L,
  1036.     cup=^T%p1%c%p2%c, cols#80, lines#24, cuf1=^X, cuu1=^Z, home=^],
  1037. # The padding on cuf1 for act5 and mime is a guess and not final.
  1038. # The act5 has hardware tabs, but in cols 8, 16, 24, 32, 41 (!), 49, ...
  1039. microterm5|act5|microterm act v,
  1040.     uc=\EA, ri=\EH$<3>, kcuu1=^Z, kcud1=^K, kcub1=^H, kcuf1=^X, use=act4,
  1041. # Act V in split screen mode.  act5s is not tested and said not to work.
  1042. # Could have been because of the funny tabs - it might work now.
  1043. act5s|skinny act5,
  1044.     smcup=\EP, rmcup=\EQ, lines#48, cols#39, use=act5,
  1045. # These mime1 entries refer to the Microterm Mime I or Mime II.
  1046. # The default mime is assumed to be in enhanced act iv mode.
  1047. # There is a ^Q in is2 to unwedge any lines that wedge on ^S.
  1048. mime|mime1|mime2|mimei|mimeii|microterm mime1,
  1049.     cup=^T%p1%{24}%+%c%p2%?%p2%{32}%>%t%{48}%+%;%{80}%+%c, cols#80,
  1050.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=^A$<80>, am, cub1=^H,
  1051.     ed=^_, el=^^, clear=\035^C, dl1=^W$<80>, ht=^I, lines#24,
  1052.     cuf1=^X, uc=^U, cuu1=^z, home=\035, cud1=^K, is2=\E^S^Q,
  1053.     kcuu1=^Z, kcud1=^K, kcub1=^H, kcuf1=^X, ri=^R$<3>, vt#9,
  1054. mime-3a|mime-adm3a|mime1 emulating adm3a,
  1055.     am@, kcuu1=^Z, kcud1=^K, kcub1=^H, kcuf1=^X, use=adm3a,
  1056. mime-3ax|mime-adm3ax|mime1 emulating enhanced adm3a,
  1057.     il1=^A$<80>, dl1=^W$<80>, ht=^I$<3>, el=^X, ed=^_, use=mime-3a,
  1058. # Mimes using brightness for standout.  Half bright is very dim unless
  1059. # you turn up the brightness so far that lines show up on the screen.
  1060. mime-fb|full bright mime1,
  1061.     smso=^Y, rmso=^S, is2=^S\E^Q, use=mime,
  1062. mime-hb|half bright mime1,
  1063.     smso=^S, rmso=^Y, is2=^Y\E, use=mime,
  1064. # These entries (for mime 2a) put the terminal in low intensity mode
  1065. # since high intensity mode is so obnoxious.
  1066. # This is the preferred mode (but ^X can't be used as a kill character (?))
  1067. mime2a|mime2a-v|microterm mime2a (emulating an enhanced vt52),
  1068.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=^A$<20*>, cub1=^H, ed=\EQ$<20*>,
  1069.     cols#80, el=\EP, clear=\EL, cup=\EY%p1%' '%+%c%p2%' '%+%c, is2=^Y,
  1070.     dch1=^N, dl1=^W$<20*>, ip=$<2>, rmir=^Z, home=\EH, smir=^O, cuu1=\EA,
  1071.     ri=\EA, kcud1=\EB, kcub1=\ED, kcuf1=\EC, kcuu1=\EA, lines#24,
  1072.     cuf1=\EC, ht=^I, rmso=\E9, smso=\E8, smul=\E4, rmul=\E5,
  1073. mime2a-s|microterm mime2a (emulating an enhanced soroc iq120),
  1074.     cr=^M, cud1=^J, ind=^J, bel=^G, il1=^A$<20*>, am, cub1=^H, ed=\EJ$<20*>,
  1075.     el=\EK, clear=\EL, cup=\E=%p1%' '%+%c%p2%' '%+%c, cols#80, dch1=\ED,
  1076.     dl1=^W$<20*>, kcub1=^H, kcuf1=^L, kcuu1=^K, kcud1=^J, home=^^, is2=\E),
  1077.     ri=\EI, smir=\EE, rmir=^Z, ip=$<2>, lines#24, cuf1=^L, cuu1=\EI,
  1078.     smso=\E:, rmso=\E;, smul=\E6, rmul=\E7,
  1079. //go.sysin dd *
  1080. exit
  1081.