https://invisible-island.net/personal/
  Copyright © 2018,2019 by Thomas E. Dickey
# Intel AT/386 for color card with monochrome display
  #
  AT386-M|at386-m|386AT-M|386at-m|at/386 console,
          am, bw, eo, xon, xt,
          cols#80, lines#25,
          acsc=``a1fxgqh0jYk?lZm@nEooppqDrrsstCu4vAwBx3yyzz{{||}}~~,
          bel=^G, blink=\E[5m, bold=\E[1m, clear=\E[2J\E[H,
          cr=\r, cub=\E[%p1%dD, cub1=\E[D, cud=\E[%p1%dB,
          cud1=\E[B, cuf=\E[%p1%dC, cuf1=\E[C,
          cup=\E[%i%p1%02d;%p2%02dH, cuu=\E[%p1%dA, cuu1=\E[A,
          dch=\E[%p1%dP, dch1=\E[P, dl=\E[%p1%dM, dl1=\E[1M,
          ed=\E[J, el=\E[K, flash=^G, home=\E[H, ht=\t, 
          ich=\E[%p1%d@, ich1=\E[1@, il=\E[%p1%dL, il1=\E[1L,
          ind=\E[S, indn=\E[%P1%dS, invis=\E[9m, is2=\E[0;10;38m,
          kbs=\b, kcbt=^], kclr=\E[2J, kcub1=\E[D, kcud1=\E[B,
          kcuf1=\E[C, kcuu1=\E[A, kdch1=\E[P, kend=\E[Y,
          kf1=\EOP, kf10=\EOY, kf11=\EOZ, kf12=\EOA, kf2=\EOQ, 
          kf3=\EOR, kf4=\EOS, kf5=\EOT, kf6=\EOU, kf7=\EOV, 
          kf8=\EOW, kf9=\EOX, khome=\E[H, kich1=\E[@, knp=\E[U, 
          kpp=\E[V, krmir=\E0, rev=\E[7m, rin=\E[S, 
          rmacs=\E[10m, rmso=\E[m, rmul=\E[m,
          sgr=\E[10m\E[0%?%p1%p3%|%t;7%;%?%p2%t;4%;%?%p4%t;5%;%?%p6%t;1%;%?%p9%t;12%;%?%p7%t;9%;m,
          sgr0=\E[0;10m, smacs=\E[12m, smso=\E[7m, smul=\E[4m,
  #
  # AT&T 386 color console 
  #
  AT386|at386|386AT|386at|at/386 console,
          colors#8, ncv#3, pairs#64,
          is2=\E[0;10;39m,
          op=\E[0m, 
          setb=\E[%?%p1%{0}%=%t40m
                  %e%p1%{1}%=%t44m
                  %e%p1%{2}%=%t42m
                  %e%p1%{3}%=%t46m
                  %e%p1%{4}%=%t41m
                  %e%p1%{5}%=%t45m
                  %e%p1%{6}%=%t43m
                  %e%p1%{7}%=%t47m%;,
          setf=\E[%?%p1%{0}%=%t30m
                  %e%p1%{1}%=%t34m
                  %e%p1%{2}%=%t32m
                  %e%p1%{3}%=%t36m
                  %e%p1%{4}%=%t31m
                  %e%p1%{5}%=%t35m
                  %e%p1%{6}%=%t33m
                  %e%p1%{6}%=%t33m
                  %e%p1%{7}%=%t37m%;,
          use=at386-m,
   
  hp+color|hp with colors,
          ccc,
          pairs#7, colors#16, ncv#17,
          scp=\E&v%p1%dS,
          initp=\E&v%?%p2%{1000}%=%t1%e.%p2%d%;a
                    %?%p3%{1000}%=%t1%e.%p3%d%;b
                    %?%p4%{1000}%=%t1%e.%p4%d%;c
                    %?%p5%{1000}%=%t1%e.%p5%d%;x
                    %?%p6%{1000}%=%t1%e.%p6%d%;y
                    %?%p7%{1000}%=%t1%e.%p7%d%;z
                    %p1%dI,
          oc=\E&v0m1a1b1c0I\E&v1a1I\E&v1b2I\E&v1a1b3I\E&v1c4I\E&v1a1c5I\E&v1b1c6I\E&v1x1y7I,
          op=\E&v0S,
   
  tek4205|4205|tektronix 4205,
   
  #       am is not defined because the wrap around occurs not when the char.
  #       is placed in the 80'th column, but when we are attempting to type
  #       the 81'st character on the line.
   
  #       bold, dim, and standout are simulated by colors and thus not allowed
  #       with colors
   
          .am, msgr, mir, ccc,
          cols#80, lines#30, it#8, colors#8, pairs#63, ncv#49,
          acsc=``aaffggjjkkllmmnnooppqqrrssttuuvvwwxxyyzz{{||}}~~,
          il1=\E[1L, ed=\E[J, el=\E[K, clear=\E[2J\E[H, 
          il=\E[%p1%dL,
          cup=\E[%i%p1%d;%p2%dH,
          dch1=\E[1P, dl1=\E[1M,
          home=\E[H, smir=\E[4h, rmir=\E[4l, 
          cuf1=\E[C, cud1=\E[B, cuu1=\E[A, cub1=\E[D,
          cuf=\E[%p1%dC, cud=\E[%p1%dB, cuu=\E[%p1%dA, cub=\E[%p1%dD,
          ech=\E%p1%dX, el1=\E[1K, ich=\E[%p1%d@, 
          smacs=^N, rmacs=^O, enacs=\E)0,
          rmso=\E[=0;<1m, smso=\E[=2;<3m,
          smul=\E[4m, rmul=\E[24m,
          is1=\E%!0\ETM1\E%!1\E[0m,
          rev=\E[7m, bold=\E[=7;<4m, invis=\E[=6;<5, dim=\E[=1;<6m,
          blink=\E[5m, sgr0=\E[=0;<1m\E[24;25;27m^O,
          smcup=\E%%!1\E[?6l\E[2J, 
          kbs=^h, kcuu1=\E[A, kcud1=\E[B,
          kcub1=\E[D, kcuf1=\E[C,
          .is2=\E%%!1\E[?6141\E[0m,
          cbt=\E[Z, cr=^M, ind=\ED, ri=\EM,
          tbc=\E[1g, ht=^I, bel=^G,
   
  #       tektroinix color table is mapped into the RGB color table
   
          setf=\E[<%?%p1%{0}%=%t0m
                   %e%p1%{1}%=%t4m
                   %e%p1%{2}%=%t3m
                   %e%p1%{3}%=%t5m
                   %e%p1%{4}%=%t2m
                   %e%p1%{5}%=%t6m
                   %e%p1%{6}%=%t7m
                   %e1m%;,
          setb=\E[=%?%p1%{0}%=%t0m
                   %e%p1%{1}%=%t4m
                   %e%p1%{2}%=%t3m
                   %e%p1%{3}%=%t5m
                   %e%p1%{4}%=%t2m
                   %e%p1%{5}%=%t6m
                   %e%p1%{6}%=%t7m
                   %e1m%;,
  #       All colors are reset to factory specifications
   
          oc=\E%!0
                \ETFB0
                  0000
                  1F4F4F4
                  2F400
                  30F40
                  4A4C<F4
                  50F4F4
                  6F40F4
                  7F4F40
              \E%!1,
          op=\E[39;40m,
   
  #       using RGB notation to define colors.  for arguments 1-3 the interval
  #       (0-1000) is broken into 8 smaller sub-intervals (125).  Each sub-
  #       interval then maps into pre-defined value.
   
          initc=\E%%!0
                \ETF4
                   %?%p1%{0}%=%t0
                   %e%p1%{1}%=%t4
                   %e%p1%{2}%=%t3
                   %e%p1%{3}%=%t5
                   %e%p1%{4}%=%t2
                   %e%p1%{5}%=%t6
                   %e%p1%{6}%=%t7
                   %e1%;
                    %?%p2%{125}%<%t0
                    %e%p2%{250}%<%tA2
                    %e%p2%{375}%<%tA?
                    %e%p2%{500}%<%tC8
                    %e%p2%{625}%<%tD4
                    %e%p2%{750}%<%tE1
                    %e%p2%{875}%<%tE:
                    %eF4%;
                    %?%p3%{125}%<%t0
                    %e%p3%{250}%<%tA2
                    %e%p3%{375}%<%tA?
                    %e%p3%{500}%<%tC8
                    %e%p3%{625}%<%tD4
                    %e%p3%{750}%<%tE1
                    %e%p3%{875}%<%tE:
                    %eF4%;
                    %?%p4%{125}%<%t0
                    %e%p4%{250}%<%tA2
                    %e%p4%{375}%<%tA?
                    %e%p4%{500}%<%tC8
                    %e%p4%{625}%<%tD4
                    %e%p4%{750}%<%tE1
                    %e%p4%{875}%<%tE:
                    %eF4%;
                \E%%!1,
          kf0=\EOA, kf1=\EOB, kf2=\EOC, kf3=\EOD,
          kf4=\EP, kf5=\EQ, kf6=\ER, kf7=\ES,
   
  wy370|wyse370|Wyse 370 ,
   
  # misc booleans
          xenl, xon, mir, msgr, hs,
   
  # misc numerics
          vt#3, cols#80, lines#24, it#8,
   
  # color - setf and setb mimic ISO colors
          colors#64,
          pairs#4096,
          op=\E[61;63w\E[62;0w,
          setf=\E[61;
                  %p1%{1}%=%t49%e
                  %p1%{2}%=%t12%e
                  %p1%{3}%=%t60%e
                  %p1%{4}%=%t3%e
                  %p1%{5}%=%t51%e
                  %p1%{6}%=%t15%e
                  %p1%{7}%=%t63%e
                  %p1%d%;w,
          setb=\E[62;
                  %p1%{1}%=%t49%e
                  %p1%{2}%=%t12%e
                  %p1%{3}%=%t60%e
                  %p1%{4}%=%t3%e
                  %p1%{5}%=%t51%e
                  %p1%{6}%=%t15%e
                  %p1%{7}%=%t63%e
                  %p1%d%;w,
   
  # bell capabilities
          bel=^G,
  #       flash=\E[30h\E\,\E[30l$<300>,
   
  # status line
          tsl=\E[2$~\E[31h\E[1$}\E[H\E[61;63w\E[62;0w,
          fsl=\E[0$}, dsl=\E[1$}\E[H\E[61;63w\E[62;0w\E[2J\E[0$},
          wsl#80,
   
  # cursor
          cnorm=\E[?25h,
          civis=\E[?25l,
          cvvis=\E[?25h\E[34l\E[52;57w,
   
  # misc
          dl1=\E[M,
          il1=\E[L,
          dch1=\E[P,
          ich1=\E[@,
          ind=^J, ri=\EM,
          clear=\E[H\E[2J,
          cup=\E[%i%p1%d;%p2%dH,
          cub1=^H, cud1=\E[B, cuf1=\E[C, cuu1=\E[A, 
          cub=\E[%p1%dD, cud=\E[%p1%dB, cuu=\E[%p1%dA, cuf=\E[%p1%dC, 
          el=\E[K, el1=\E[1K, ed=\E[J,
          smso=\E[1;7m, rmso=\E[m, smul=\E[4m, rmul=\E[m,
          dim=\E[2m, bold=\E[1m, rev=\E[7m, blink=\E[5m,
          sgr0=\E[m^O,
          sgr=\E[0
                  %?%p2%t;4%;
                  %?%p3%p1%|%t;7%;
                  %?%p4%t;5%;
                  %?%p5%t;2%;
                  %?%p6%t;1%;
                  %?%p7%t;8%;m
                  %?%p9%t^N%e^O%;,
          rs2=\E>\E[?3l\E[?4l\E[?5l\E[?7l\E[?8h,
          enacs=\E(B\E)0, smacs=^N, rmacs=^O,
          acsc=``aaffggjjkkllmmnnooppqqrrssttuuvvwwxxyyzz{{||}}~~,
          tbc=\E[3g, hts=\EH, home=\E[H, ht=^I, cr=^M,
          kf1=\EOP, kf2=\EOQ, kf3=\EOR, kf4=\EOS,
          kf5=\E[M, kf6=\E[17~, kf7=\E[18~, kf8=\E[19~,
          kf9=\E[20~, kf10=\E[21~, kf11=\E[23~, kf12=\E[24~,
          kcub1=\E[D, kcud1=\E[B, kcuf1=\E[C, kcuu1=\E[A,
          kbs=^H, khome=\E[H, kend=\E[1~, kpp=\E[V, knp=\E[U,
          krfr=^R, kent=^M, kdch1=\177, kich1=\E[2~,
          sc=\E7, rc=\E8,
          csr=\E[%i%p1%d;%p2%dr,