xref: /onnv-gate/usr/src/cmd/terminfo/tektronix.ti (revision 0:68f95e015346)
1*0Sstevel@tonic-gate#
2*0Sstevel@tonic-gate# CDDL HEADER START
3*0Sstevel@tonic-gate#
4*0Sstevel@tonic-gate# The contents of this file are subject to the terms of the
5*0Sstevel@tonic-gate# Common Development and Distribution License, Version 1.0 only
6*0Sstevel@tonic-gate# (the "License").  You may not use this file except in compliance
7*0Sstevel@tonic-gate# with the License.
8*0Sstevel@tonic-gate#
9*0Sstevel@tonic-gate# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*0Sstevel@tonic-gate# or http://www.opensolaris.org/os/licensing.
11*0Sstevel@tonic-gate# See the License for the specific language governing permissions
12*0Sstevel@tonic-gate# and limitations under the License.
13*0Sstevel@tonic-gate#
14*0Sstevel@tonic-gate# When distributing Covered Code, include this CDDL HEADER in each
15*0Sstevel@tonic-gate# file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*0Sstevel@tonic-gate# If applicable, add the following below this CDDL HEADER, with the
17*0Sstevel@tonic-gate# fields enclosed by brackets "[]" replaced with your own identifying
18*0Sstevel@tonic-gate# information: Portions Copyright [yyyy] [name of copyright owner]
19*0Sstevel@tonic-gate#
20*0Sstevel@tonic-gate# CDDL HEADER END
21*0Sstevel@tonic-gate#
22*0Sstevel@tonic-gate#	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T
23*0Sstevel@tonic-gate#	  All Rights Reserved
24*0Sstevel@tonic-gate
25*0Sstevel@tonic-gate
26*0Sstevel@tonic-gate#ident	"%Z%%M%	%I%	%E% SMI"	/* SVr4.0 1.16	*/
27*0Sstevel@tonic-gate# # --------------------------------
28*0Sstevel@tonic-gate#
29*0Sstevel@tonic-gate# tektronix: TEKTRONIX
30*0Sstevel@tonic-gate#
31*0Sstevel@tonic-gate# Manufacturer:	TEKTRONIX
32*0Sstevel@tonic-gate# Class:	III
33*0Sstevel@tonic-gatetek4107|tek4109|4107|4109|tektronix terminals 4107 4109,
34*0Sstevel@tonic-gate	am, mir, msgr, ul, xenl, xt,
35*0Sstevel@tonic-gate	cvvis=\E%!3,
36*0Sstevel@tonic-gate	cnorm=\E%!0,
37*0Sstevel@tonic-gate	cr=^M, cud1=^J, ind=^J, bel=^G, cub1=^H, ed=\EJ, el=\EK,
38*0Sstevel@tonic-gate	clear=\ELZ, cup=\EY%p1%' '%+%c%p2%' '%+%c, cols#79, lines#29,
39*0Sstevel@tonic-gate	cuf1=\EC, ht=^I, it#8, ri=\EI, cuu1=\EA,
40*0Sstevel@tonic-gate	kcuu1=\EA, kcud1=\EB, kcuf1=\EC, kcub1=\ED, kbs=^H,
41*0Sstevel@tonic-gate	smso=\E%!1\E[7;5m$<2>\E%!0,
42*0Sstevel@tonic-gate	rmso=\E%!1\E[m$<2>\E%!0,
43*0Sstevel@tonic-gate	smul=\E%!1\E[4m$<2>\E%!0,
44*0Sstevel@tonic-gate	rmul=\E%!1\E[m$<2>\E%!0,
45*0Sstevel@tonic-gate	bold=\E%!1\E[1m$<2>\E%!0,
46*0Sstevel@tonic-gate	rev=\E%!1\E[7m$<2>\E%0,
47*0Sstevel@tonic-gate	blink=\E%!1\E[5m$<2>\E%!0,
48*0Sstevel@tonic-gate	dim=\E%!1\E[<0m$<2>\E%!0,
49*0Sstevel@tonic-gate	sgr0=\E%!1\E[m$<2>\E%!0,
50*0Sstevel@tonic-gate	sgr=\E%%!1\E[%?%p1%t;7%;%?%p2%t;4%;%?%p3%t;7%;%?%p4%t;5%;%?%p6%t;1%;m\E%%!0,
51*0Sstevel@tonic-gatetek4105|4105|tektronix 4105,
52*0Sstevel@tonic-gate	am, il1=\E[1L, ed=\E[J, el=\E[K, clear=\E[2J\E[H,
53*0Sstevel@tonic-gate	cup=\E[%i%p1%2d;%p2%2dH,
54*0Sstevel@tonic-gate	cols#79, lines#29,
55*0Sstevel@tonic-gate	dch1=\E[1P, dl1=\E[1M,
56*0Sstevel@tonic-gate	home=\E[H, smir=\E[4h, rmir=\E[4l, mir,
57*0Sstevel@tonic-gate	cuf1=\E[1C, cud1=\E[1B, cuu1=\E[1A,
58*0Sstevel@tonic-gate	smacs=\E[1m, rmacs=\E[0m, msgr,
59*0Sstevel@tonic-gate	rmso=\E[=0;<1m, smso=\E[=2;<3m,
60*0Sstevel@tonic-gate	ul, smul=\E[=5;<2m, rmul=\E[=0;<1m,
61*0Sstevel@tonic-gate	is1=\E%!1\E[0m,
62*0Sstevel@tonic-gate	rev=\E[=1;<3m, bold=\E[=7;<4m, invis=\E[=6;<5, dim=\E[=1;<6m,
63*0Sstevel@tonic-gate	blink=\E[=3;<7m, sgr0=\E[=0;<1m,
64*0Sstevel@tonic-gate	smcup=\E%!1\E[?6l\E[2J, xenl, xt,
65*0Sstevel@tonic-gate	msgr, mir, kbs=^h, kcuu1=\E[1A, kcud1=\E[1B,
66*0Sstevel@tonic-gate	kcub1=\E[1D, kcuf1=\E[1C,
67*0Sstevel@tonic-gate	is2=\E%!1\E[?6141\E[0m,
68*0Sstevel@tonic-gate	cbt=\E[Z, cr=^M, ri=\E[T, ind=\E[S, it#8,
69*0Sstevel@tonic-gate	tbc=\E[1g, ht=^I, bel=^G,
70*0Sstevel@tonic-gate
71*0Sstevel@tonic-gatetek|tek4012|4012|tektronix 4012,
72*0Sstevel@tonic-gate	cr=^M, cud1=^J, bel=^G, ff=^L$<1000>,
73*0Sstevel@tonic-gate	is2=\E^O, cub1=^H, clear=\E^L$<1000>, cols#75, lines#35, os,
74*0Sstevel@tonic-gatetek4013|4013|tektronix 4013,
75*0Sstevel@tonic-gate	smacs=\E^N, rmacs=\E^O, use=4012,
76*0Sstevel@tonic-gatetek4014|4014|tektronix 4014,
77*0Sstevel@tonic-gate	is2=\E^O\E9, cols#81, lines#38, use=tek4012,
78*0Sstevel@tonic-gatetek4015|4015|tektronix 4015,
79*0Sstevel@tonic-gate	smacs=\E^N, rmacs=\E^O, use=4014,
80*0Sstevel@tonic-gatetek4014-sm|4014-sm|tektronix 4014 in small font,
81*0Sstevel@tonic-gate	is2=\E^O\E\072, cols#121, lines#58, use=tek4014,
82*0Sstevel@tonic-gatetek4015-sm|4015-sm|tektronix 4015 in small font,
83*0Sstevel@tonic-gate	smacs=\E^N, rmacs=\E^O, use=4014-sm,
84*0Sstevel@tonic-gatetek4023|4023|tex|tektronix 4023,
85*0Sstevel@tonic-gate	cr=^M, cud1=^J, ind=^J, bel=^G, smso=^_P, rmso=^_@,
86*0Sstevel@tonic-gate	cup=\034%p2%' '%+%c%p1%' '%+%c, cuf1=\t, cub1=^H,
87*0Sstevel@tonic-gate	clear=\E^L$<4>, cols#80, lines#24, am, vt#4,
88*0Sstevel@tonic-gate# Info:
89*0Sstevel@tonic-gate#	It is recommended that you run the 4025 at 4800 baud or less;
90*0Sstevel@tonic-gate#	various bugs in the terminal appear at 9600.  It wedges at the
91*0Sstevel@tonic-gate#	bottom of memory (try "cat /usr/dict/words"); ^S and ^Q typed
92*0Sstevel@tonic-gate#	on keyboard don't work.  You have to hit BREAK twice to get
93*0Sstevel@tonic-gate#	one break at any speed - this is a documented feature.
94*0Sstevel@tonic-gate#	Can't use cursor motion because it's memory relative, and
95*0Sstevel@tonic-gate#	because it only works in the workspace, not the monitor.
96*0Sstevel@tonic-gate#	Same for home. Likewise, standout only works in the workspace.
97*0Sstevel@tonic-gate#
98*0Sstevel@tonic-gate#	el was commented out since vi and rogue seem to work better
99*0Sstevel@tonic-gate#	simulating it with lots of spaces!
100*0Sstevel@tonic-gate#
101*0Sstevel@tonic-gate#	il1 and il had 145ms of padding, but that slowed down vi's ^U
102*0Sstevel@tonic-gate#	and didn't seem necessary.
103*0Sstevel@tonic-gate#
104*0Sstevel@tonic-gate4025|4027|4024|tek4025|tek4027|tek4024|4025cu|4027cu|tektronix 4024/4025/4027,
105*0Sstevel@tonic-gate	cr=^M, ind=^F^J, cud1=^F^J, bel=^G, am, da, db, ht=^I, it#8,
106*0Sstevel@tonic-gate	cub1=^H, lm#0, lines#34, cols#80, clear=^_era\r\n\n,
107*0Sstevel@tonic-gate	is2=\41com 31\r\n^_sto 9 17 25 33 41 49 57 65 73\r,
108*0Sstevel@tonic-gate	smkx=^_lea p4 /h/\r^_lea p8 /k/\r^_lea p6 / /\r^_lea p2 /j/\r^_lea f5 /H/\r,
109*0Sstevel@tonic-gate	rmkx=^_lea p2\r^_lea p4\r^_lea p6\r^_lea p8\r^_lea f5\r,
110*0Sstevel@tonic-gate	cuu1=^K, cuf1=^_rig\r,
111*0Sstevel@tonic-gate	ed=^_dli 50\r, cmdch=^_,
112*0Sstevel@tonic-gate	dch1=^_dch\r, ich1=^_ich\r ^H,
113*0Sstevel@tonic-gate	il1=^_up\r^_ili\r, dl1=^_dli\r^F,
114*0Sstevel@tonic-gate	il=^_up\r^_ili %p1%d\r, dl=^_dli %p1%d\r^F,
115*0Sstevel@tonic-gate	cuu=^_up %p1%d\r, cud=^_dow %p1%d\r,
116*0Sstevel@tonic-gate	cub=^_lef %p1%d\r, cuf=^_rig %p1%d\r,
117*0Sstevel@tonic-gatetek4025-17|4025-17|4027-17|tek 4025 17 line window,
118*0Sstevel@tonic-gate	lines#17, use=4025,
119*0Sstevel@tonic-gatetek4025-17-ws|4025-17-ws|4025-17ws|4027-17-ws|tek 4025 17 line window in workspace,
120*0Sstevel@tonic-gate	is2=\41com 31\r\n^_sto 9 17 25 33 41 49 57 65 73\r^_wor 17\r^_mon 17\r,
121*0Sstevel@tonic-gate	smcup=^_wor h\r, rmcup=^_mon h\r, smso=^_att e\r, rmso=^_att s\r, use=4025-17,
122*0Sstevel@tonic-gatetek4025-ex|4025-ex|4025ex|4027-ex|tek 4025 w/!,
123*0Sstevel@tonic-gate	smcup=\41com 31\r, rmcup=^_com 33\r,
124*0Sstevel@tonic-gate	is2=^_com 33\r\n\41sto 9 17 25 33 41 49 57 65 73\r, use=4025,
125*0Sstevel@tonic-gatetek4105-30|4105-30|4015 emulating 30 line vt100,
126*0Sstevel@tonic-gate	am, mir, msgr, xenl, xon,
127*0Sstevel@tonic-gate	cols#80, it#8, lines#30, vt#3,
128*0Sstevel@tonic-gate	acsc=``aaffggjjkkllmmnnooppqqrrssttuuvvwwxxyyzz{{||}}~~,
129*0Sstevel@tonic-gate	bel=^G, blink=\E[5m$<2>, bold=\E[1m$<2>,
130*0Sstevel@tonic-gate	clear=\E[H\E[J$<50>, cr=\r, csr=\E[%i%p1%d;%p2%dr,
131*0Sstevel@tonic-gate	cub=\E[%p1%dD, cub1=\b, cud=\E[%p1%dB, cud1=\n,
132*0Sstevel@tonic-gate	cuf=\E[%p1%dC, cuf1=\E[C$<2>,
133*0Sstevel@tonic-gate	cup=\E[%i%p1%d;%p2%dH$<5>, cuu=\E[%p1%dA,
134*0Sstevel@tonic-gate	cuu1=\E[A$<2>, ed=\E[J$<50>, el=\E[K$<3>,
135*0Sstevel@tonic-gate	el1=\E[1K$<3>, enacs=\E(B\E)0, home=\E[H, ht=\t,
136*0Sstevel@tonic-gate	hts=\EH, ind=\n, ka1=\EOq, ka3=\EOs, kb2=\EOr, kbs=\b,
137*0Sstevel@tonic-gate	kc1=\EOp, kc3=\EOn, kcub1=\EOD, kcud1=\EOB,
138*0Sstevel@tonic-gate	kcuf1=\EOC, kcuu1=\EOA, kent=\EOM, kf0=\EOy, kf1=\EOP,
139*0Sstevel@tonic-gate	kf10=\EOx, kf2=\EOQ, kf3=\EOR, kf4=\EOS, kf5=\EOt,
140*0Sstevel@tonic-gate	kf6=\EOu, kf7=\EOv, kf8=\EOl, kf9=\EOw, rc=\E8,
141*0Sstevel@tonic-gate	rev=\E[7m$<2>, ri=\EM$<5>, rmacs=^O, rmkx=\E[?1l\E>,
142*0Sstevel@tonic-gate	rmso=\E[m$<2>, rmul=\E[m$<2>,
143*0Sstevel@tonic-gate	rs2=\E>\E[?3l\E[?4l\E[?5l\E[?7h\E[?8h, sc=\E7,
144*0Sstevel@tonic-gate	sgr=\E[0%?%p1%p6%|%t;1%;%?%p2%t;4%;%?%p1%p3%|%t;7%;%?%p4%t;5%;m%?%p9%t^N%e^O%;,
145*0Sstevel@tonic-gate	sgr0=\E[m^O$<2>, smacs=^N, smkx=\E[?1h\E=,
146*0Sstevel@tonic-gate	smso=\E[1;7m$<2>, smul=\E[4m$<2>, tbc=\E[3g,
147*0Sstevel@tonic-gate# Info:
148*0Sstevel@tonic-gate#	The 4110 series may be a wonderful graphics series, but they
149*0Sstevel@tonic-gate#	make the 4025 look good for screen editing.
150*0Sstevel@tonic-gate#
151*0Sstevel@tonic-gate#	In the dialog area, you can't move the cursor off the bottom
152*0Sstevel@tonic-gate#	line.
153*0Sstevel@tonic-gate#
154*0Sstevel@tonic-gate#	Out of the dialog area, ^K moves it up, but there is no way
155*0Sstevel@tonic-gate#	to scroll.
156*0Sstevel@tonic-gate#
157*0Sstevel@tonic-gate#	Note that there is a floppy for free from Tek that makes the
158*0Sstevel@tonic-gate#	4112 emulate the vt52 (use the vt52 termcap). There is also
159*0Sstevel@tonic-gate#	an expected enhancement that will use ANSI standard sequences.
160*0Sstevel@tonic-gate#
161*0Sstevel@tonic-gate#	4112 in non-dialog area pretending to scroll. It really wraps
162*0Sstevel@tonic-gate#	but vi is said to work (more or less) in this mode.
163*0Sstevel@tonic-gate#
164*0Sstevel@tonic-gate#	'vi' works reasonably well with this entry.
165*0Sstevel@tonic-gate#
166*0Sstevel@tonic-gate4112|4112-nd|4113|4114|tek4112|tektronix 4110 series,
167*0Sstevel@tonic-gate	cr=^M, cud1=^J, ind=^J, bel=^G, cuu1=^K, cub1=^H,
168*0Sstevel@tonic-gate	am, clear=\E^L, lines#34, cols#80,
169*0Sstevel@tonic-gate	smcup=\EKA0\ELV0\EMG0, rmcup=\EKA1\ELV1,
170*0Sstevel@tonic-gatetek4112-d|4112-d|tek 4112 in dialog area,
171*0Sstevel@tonic-gate	am, clear=\ELZ, lines#34, cols#80, cuu1=^K,
172*0Sstevel@tonic-gatetek4112-5|4112-5|4112 in 5 line dialog area,
173*0Sstevel@tonic-gate	lines#5, use=4112,
174*0Sstevel@tonic-gatetek4115|4115|tektronix 4115,
175*0Sstevel@tonic-gate	am, xon,
176*0Sstevel@tonic-gate	cols#80, lines#34,
177*0Sstevel@tonic-gate	bel=^G, blink=\E[5m, bold=\E[1m, cbt=\E[Z,
178*0Sstevel@tonic-gate	clear=\E[H\E[J, cr=\r, cub=\E[%p1%dD, cub1=\b,
179*0Sstevel@tonic-gate	cud=\E[%p1%dB, cud1=\n, cuf=\E[%p1%dC, cuf1=\E[C,
180*0Sstevel@tonic-gate	cup=\E[%i%p1%d;%p2%dH, cuu=\E[%p1%dA, cuu1=\E[A,
181*0Sstevel@tonic-gate	dch1=\E[P, dl=\E[%p1%dM, dl1=\E[M, ed=\E[J, el=\E[K,
182*0Sstevel@tonic-gate	home=\E[H, hpa=\E[%p1%{1}%+%dG, ht=\t, hts=\EH,
183*0Sstevel@tonic-gate	ich=\E[%p1%d@, ich1=\E[@, il=\E[%p1%dL, il1=\E[L,
184*0Sstevel@tonic-gate	ind=\n, invis=\E[8m, kbs=\b, kcub1=\E[D, kcud1=\E[B,
185*0Sstevel@tonic-gate	kcuf1=\E[C, kcuu1=\E[A, khome=\E[H,
186*0Sstevel@tonic-gate	rep=%p1%c\E[%p2%{1}%-%db, rev=\E[7m, rmso=\E[m,
187*0Sstevel@tonic-gate	rmul=\E[m,
188*0Sstevel@tonic-gate	sgr=\E[%?%p1%t7;%;%?%p2%t4;%;%?%p3%t7;%;%?%p4%t5;%;%?%p6%t1;%;m,
189*0Sstevel@tonic-gate	sgr0=\E[0m, smso=\E[7m, smul=\E[4m, tbc=\E[2g,
190*0Sstevel@tonic-gate	vpa=\E[%p1%{1}%+%dd,
191*0Sstevel@tonic-gate# Info:
192*0Sstevel@tonic-gate#	t500 is a local entry for the oddball Tek 500 owned by Fluke
193*0Sstevel@tonic-gate#	Labs
194*0Sstevel@tonic-gate#
195*0Sstevel@tonic-gatet500|Tek series 500,
196*0Sstevel@tonic-gate	cr=^M, ind=^J, cud1=^J, bel=^G,
197*0Sstevel@tonic-gate	lines#25, cols#80, cub1=^H, cup=\E=%p1%p1%' '%+%c%p2%' '%+%c,
198*0Sstevel@tonic-gate	clear=^E$<20>, home=^T, bw, am,
199*0Sstevel@tonic-gate# Info:
200*0Sstevel@tonic-gate#	I added the is string - straight Unix has ESC ; in the login
201*0Sstevel@tonic-gate#	string which sets a ct8500 into monitor mode (aka 4025 snoopy
202*0Sstevel@tonic-gate#	mode). The is string here cleans up a few things (but not
203*0Sstevel@tonic-gate#	everything).
204*0Sstevel@tonic-gate#
205*0Sstevel@tonic-gatect8500|tektronix ct8500,
206*0Sstevel@tonic-gate	cr=^M, cud1=^J, ind=^J, bel=^G, cr=^M, cud1=^J, ind=^J, bel=^G,
207*0Sstevel@tonic-gate	il1=\E^L, am, cub1=^H, cbt=\E^I, bw, ed=\E^U, el=\E^T,
208*0Sstevel@tonic-gate	clear=\E^E, cup=\E|%p1%' '%+%c%p2%' '%+%c, cols#80,
209*0Sstevel@tonic-gate	da, db, dch1=\E^],
210*0Sstevel@tonic-gate	dl1=\E^M, ich1=\E^\, lines#25, cuf1=\ES, ht=^I, ri=\E^A, rmso=\E ,
211*0Sstevel@tonic-gate	smso=\E$, rmul=\E , cuu1=\ER, smul=\E\041, is2=^_\EZ\Ek,
212*0Sstevel@tonic-gate	sgr0=\E\s,
213*0Sstevel@tonic-gate
214*0Sstevel@tonic-gate#
215*0Sstevel@tonic-gate#	Tektronix 4205 terminal.  This entry contains information required
216*0Sstevel@tonic-gate#	by color curses
217*0Sstevel@tonic-gate#
218*0Sstevel@tonic-gate
219*0Sstevel@tonic-gatetek4205|4205|tektronix 4205,
220*0Sstevel@tonic-gate
221*0Sstevel@tonic-gate#	am is not defined because the wrap around occurs not when the char.
222*0Sstevel@tonic-gate#	is placed in the 80'th column, but when we are attempting to type
223*0Sstevel@tonic-gate#	the 81'st character on the line.
224*0Sstevel@tonic-gate
225*0Sstevel@tonic-gate# 	bold, dim, and standout are simulated by colors and thus not allowed
226*0Sstevel@tonic-gate#	with colors
227*0Sstevel@tonic-gate
228*0Sstevel@tonic-gate	am, xenl, msgr, mir, ccc,
229*0Sstevel@tonic-gate	cols#80, lines#30, it#8, colors#8, pairs#64, ncv#49,
230*0Sstevel@tonic-gate	acsc=``aaffggjjkkllmmnnooppqqrrssttuuvvwwxxyyzz{{||}}~~,
231*0Sstevel@tonic-gate        il1=\E[1L, ed=\E[J, el=\E[K, clear=\E[2J\E[H,
232*0Sstevel@tonic-gate	il=\E[%p1%dL,
233*0Sstevel@tonic-gate	cup=\E[%i%p1%d;%p2%dH,
234*0Sstevel@tonic-gate	dch1=\E[1P, dl1=\E[1M,
235*0Sstevel@tonic-gate	home=\E[H, smir=\E[4h, rmir=\E[4l,
236*0Sstevel@tonic-gate	cuf1=\E[C, cud1=\E[B, cuu1=\E[A, cub1=\E[D,
237*0Sstevel@tonic-gate	cuf=\E[%p1%dC, cud=\E[%p1%dB, cuu=\E[%p1%dA, cub=\E[%p1%dD,
238*0Sstevel@tonic-gate	ech=\E%p1%dX, el1=\E[1K, ich=\E[%p1%d@,
239*0Sstevel@tonic-gate	smacs=, rmacs=, enacs=\E)0,
240*0Sstevel@tonic-gate	rmso=\E[=0;<1m, smso=\E[=2;<3m,
241*0Sstevel@tonic-gate	smul=\E[4m, rmul=\E[24m,
242*0Sstevel@tonic-gate	is1=\E%!0\ETM1\E%!1\E[0m,
243*0Sstevel@tonic-gate	rev=\E[7m, bold=\E[=7;<4m, invis=\E[=6;<5, dim=\E[=1;<6m,
244*0Sstevel@tonic-gate	blink=\E[5m, sgr0=\E[=0;<1m\E[24;25;27m,
245*0Sstevel@tonic-gate	smcup=\E%%!1\E[?6l\E[2J,
246*0Sstevel@tonic-gate	kbs=^h, kcuu1=\E[A, kcud1=\E[B,
247*0Sstevel@tonic-gate	kcub1=\E[D, kcuf1=\E[C,
248*0Sstevel@tonic-gate	.is2=\E%%!1\E[?6141\E[0m,
249*0Sstevel@tonic-gate	cbt=\E[Z, cr=^M, ind=\ED, ri=\EM,
250*0Sstevel@tonic-gate	tbc=\E[1g, ht=^I, bel=^G,
251*0Sstevel@tonic-gate
252*0Sstevel@tonic-gate#	tektroinix color table is mapped into the RGB color table
253*0Sstevel@tonic-gate
254*0Sstevel@tonic-gate	setab=\E[4%p1%dm, setaf=\E[3%p1%dm,
255*0Sstevel@tonic-gate	setb=\E[4%?%p1%{1}%=%t4
256*0Sstevel@tonic-gate		 %e%p1%{3}%=%t6
257*0Sstevel@tonic-gate		 %e%p1%{4}%=%t1
258*0Sstevel@tonic-gate		 %e%p1%{6}%=%t3
259*0Sstevel@tonic-gate		 %e%p1%d%;m,
260*0Sstevel@tonic-gate	setf=\E[3%?%p1%{1}%=%t4
261*0Sstevel@tonic-gate		 %e%p1%{3}%=%t6
262*0Sstevel@tonic-gate		 %e%p1%{4}%=%t1
263*0Sstevel@tonic-gate		 %e%p1%{6}%=%t3
264*0Sstevel@tonic-gate		 %e%p1%d%;m,
265*0Sstevel@tonic-gate#	All colors are reset to factory specifications
266*0Sstevel@tonic-gate
267*0Sstevel@tonic-gate	oc=\E%!0
268*0Sstevel@tonic-gate	      \ETFB0
269*0Sstevel@tonic-gate		0000
270*0Sstevel@tonic-gate		1F4F4F4
271*0Sstevel@tonic-gate		2F400
272*0Sstevel@tonic-gate		30F40
273*0Sstevel@tonic-gate		4A4C<F4
274*0Sstevel@tonic-gate		50F4F4
275*0Sstevel@tonic-gate		6F40F4
276*0Sstevel@tonic-gate		7F4F40
277*0Sstevel@tonic-gate	    \E%!1,
278*0Sstevel@tonic-gate	op=\E[39;40m,
279*0Sstevel@tonic-gate
280*0Sstevel@tonic-gate#	using RGB notation to define colors.  for arguments 1-3 the interval
281*0Sstevel@tonic-gate#	(0-1000) is broken into 8 smaller sub-intervals (125).  Each sub-
282*0Sstevel@tonic-gate#	interval then maps into pre-defined value.
283*0Sstevel@tonic-gate
284*0Sstevel@tonic-gate	initc=\E%%!0
285*0Sstevel@tonic-gate	      \ETF4
286*0Sstevel@tonic-gate	         %?%p1%{0}%=%t0
287*0Sstevel@tonic-gate		 %e%p1%{1}%=%t4
288*0Sstevel@tonic-gate		 %e%p1%{2}%=%t3
289*0Sstevel@tonic-gate		 %e%p1%{3}%=%t5
290*0Sstevel@tonic-gate		 %e%p1%{4}%=%t2
291*0Sstevel@tonic-gate		 %e%p1%{5}%=%t6
292*0Sstevel@tonic-gate		 %e%p1%{6}%=%t7
293*0Sstevel@tonic-gate		 %e1%;
294*0Sstevel@tonic-gate		  %?%p2%{125}%<%t0
295*0Sstevel@tonic-gate		  %e%p2%{250}%<%tA2
296*0Sstevel@tonic-gate		  %e%p2%{375}%<%tA?
297*0Sstevel@tonic-gate		  %e%p2%{500}%<%tC8
298*0Sstevel@tonic-gate		  %e%p2%{625}%<%tD4
299*0Sstevel@tonic-gate		  %e%p2%{750}%<%tE1
300*0Sstevel@tonic-gate		  %e%p2%{875}%<%tE:
301*0Sstevel@tonic-gate		  %eF4%;
302*0Sstevel@tonic-gate		  %?%p3%{125}%<%t0
303*0Sstevel@tonic-gate		  %e%p3%{250}%<%tA2
304*0Sstevel@tonic-gate		  %e%p3%{375}%<%tA?
305*0Sstevel@tonic-gate		  %e%p3%{500}%<%tC8
306*0Sstevel@tonic-gate		  %e%p3%{625}%<%tD4
307*0Sstevel@tonic-gate		  %e%p3%{750}%<%tE1
308*0Sstevel@tonic-gate		  %e%p3%{875}%<%tE:
309*0Sstevel@tonic-gate		  %eF4%;
310*0Sstevel@tonic-gate		  %?%p4%{125}%<%t0
311*0Sstevel@tonic-gate		  %e%p4%{250}%<%tA2
312*0Sstevel@tonic-gate		  %e%p4%{375}%<%tA?
313*0Sstevel@tonic-gate		  %e%p4%{500}%<%tC8
314*0Sstevel@tonic-gate		  %e%p4%{625}%<%tD4
315*0Sstevel@tonic-gate		  %e%p4%{750}%<%tE1
316*0Sstevel@tonic-gate		  %e%p4%{875}%<%tE:
317*0Sstevel@tonic-gate		  %eF4%;
318*0Sstevel@tonic-gate	      \E%%!1,
319*0Sstevel@tonic-gate	kf0=\EOA, kf1=\EOB, kf2=\EOC, kf3=\EOD,
320*0Sstevel@tonic-gate	kf4=\EP, kf5=\EQ, kf6=\ER, kf7=\ES,
321