TERMCAPS for DEC VT Terms
These work for Intergraph Work Stations. We use dec terminal codes. v1|vt100|vt-100|DEC vt100:\\ :bs:am:mi:ms:xn:xv:pt:cd=\\E[J:ce=2\\E[K:cl=45\\E[H\\E[J:\\ :cs=%i\\E[%d;%dr:cm=%i\\E[%d;%dH:co#80:li#24:\\ :Hi=\\E=:Hf=\\E>:HI=^|:Po=\\E1:Pe=\\E2:\\ :bc=\\E[D:do=\\E[B:nd=\\E[C:sr=\\EM:up=\\E[A:so=\\E[7m:se=\\E[m:\\ :ku=\\E[A:kd=\\E[B:kr=\\E[C:kl=\\E[D:kh=\\E[H:us=\\E[4m:ue=\\E[0m:\\ :k0=\\EOP:k1=\\EOQ:k2=\\EOR:k3=\\EOS:\\ :k5=\\EOn:k7=\\EOw:k8=\\EOx:k9=\\EOy:\\ :KA=\\EOu:KU=\\EOM:KB=\\EOv:KC=\\EOt:\\ :Ki=\\EOr:KT=\\EOl:KY=\\EOS:KZ=\\EOq:\\ :Kd=\\EOm:k6=\\EOs:\\ :sc=\\E7:rc=\\E8: \\ :gs=\\E(0:ge=\\E(B:gb=lmkjqx:\\ :ZG#0:ZA=\\E[0%?%p1%{0}%=%t;37%e%p1%{1}%=%t;33%e%p1%{2}%=%t;35\\ %e%p1%{3}%=%t;31%e%p1%{4}%=%t;36%e%p1%{5}%=%t;32%e%p1%{6}%=%t;34\\ %e%p1%{7}%=%t;30%;%?%p2%t;7%;%?%p3%t;5%;%?%p4%t;4%;m: # TERMCAP MODIFIED BY JERRY JUGOVICH TO ALLOW COLOR FOR InterPro 32 ### ############################################################################# #ZG#0:ZA=\\E[0%?%p1%{0}%>%p1%{4}%<%&%t;1%;%?%p2%t;7%;%?%p3%t;5%;%?%p4%t;4%;m # ZG#0: # no video attribute character required # ZA=\\E[0 # sgr escape sequence # %?%p1%{0}%> # if p1 > 0 and p1 < 4 then # %p1%{4}%<%&%t;1%; # push ";1" for bold # %?%p2%t;7%; # push ";7" for reverse video # %?%p3%t;5%; # push ";5" for blink # %?%p4%t;4%; # push ";4" for underscore # m # escape sequence terminator # following elimited from vt220 termcap # :AL=\\E[%dL:DC=\\E[%dP:DL=\\E[%dM:DO=\\E[%dB:LE=\\E[%dD:\\ # :RI=\\E[%dC:SR=\\E[%dA:UP=\\E[%dA:ae=^O:al=\\E[L:as=^N:\\ # :k1=\\E[17~:k2=\\E[18~:k3=\\E[19~ # v2|vt220|vt220-am|Intergraph VT220 series emulation:\\ :am:da:mi:ms:xn:xo:bs:pt:\\ :co#132:li#24:\\ :ae=^O:al=\\E[L:as=^N:\\ :cd=\\E[J:ce=\\E[K:cl=\\E[H\\E[J:cm=\\E[%i%d;%dH:\\ :cs=\\E[%i%d;%dr:ct=\\E[3g:dc=\\E[P:dl=\\E[M:ei=\\E[4l:\\ :ho=\\E[H:im=\\E[4h:Hi=\\E=:Hf=\\E>:HI=^|:Po=\\E5i:Pe=\\E4i:\\ :is=\\E[62;1"p\\E[20l\\E[12h\\E[?8h\\E[?7h\\E[?25h:\\ :k0=\\EOP:k1=\\EOQ:k2=\\EOR:k3=\\EOS:\\ :k4=\\E[20~:k5=\\E[21~:\\ :k6=\\E[23~:k7=\\E[24~:k8=\\E[25~:k9=\\E[26~:kb=\\b:\\ :kd=\\EOB:ke=\\E[?1l:kl=\\EOD:kr=\\EOC:ks=\\E[?1h:ku=\\EOA:\\ :nd=\\E[C:r2=\\E[62;1"p\\E[20l\\E[12h\\E[?8h\\E[?7h\\E[?25h:\\ :rc=\\E8:sc=\\E7:se=\\E[22;27m:so=\\E[1;7m:sr=\\EM:st=\\EH:\\ :ue=\\E[24m:up=\\EM:us=\\E[4m:\\ :vb=^G\\E[1;2;3;4q\\E[q\\E[1;2;3;4q\\E[q\\E[1;2;3;4q\\E[q\\E[1;2;3;4q\\E[q:\\ :ve=\\E[0:vi=\\E[1v:vs=\\E[0:\\ :gs=\\E(0:ge=\\E(B:gb=lmkjqx:\\ :ZG#0:ZA=\\E[0%?%p1%{0}%=%t;37%e%p1%{1}%=%t;33%e%p1%{2}%=%t;35\\ %e%p1%{3}%=%t;31%e%p1%{4}%=%t;36%e%p1%{5}%=%t;32%e%p1%{6}%=%t;34\\ %e%p1%{7}%=%t;30%;%?%p2%t;7%;%?%p3%t;5%;%?%p4%t;4%;m: # TERMCAP MODIFIED BY JERRY JUGOVICH TO ALLOW COLOR FOR InterPro 32 ### ############################################################################# #ZG#0:ZA=\\E[0%?%p1%{0}%>%p1%{4}%<%&%t;1%;%?%p2%t;7%;%?%p3%t;5%;%?%p4%t;4%;m # ZG#0: # no video attribute character required # ZA=\\E[0 # sgr escape sequence # %?%p1%{0}%> # if p1 > 0 and p1 < 4 then # %p1%{4}%<%&%t;1%; # push ";1" for bold # %?%p2%t;7%; # push ";7" for reverse video # %?%p3%t;5%; # push ";5" for blink # %?%p4%t;4%; # push ";4" for underscore # m # escape sequence terminator +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Mail Path: jerry@jerry.mendota.ingr.com Jerry Jugovich jmjugovi@ingr.com Phone: 612 681-4450 TIM Application Engineer Intergraph Corporation Mendota Heights Minnesota +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++