1 /*	tabnec25-t.c	4.2	88/07/22	*/
2 #define INCH 240
3 /*
4 NEC Spinwriter 7725 and 5525 (Diablo replacements)
5 with Technical Math/Times Roman thimble
6 12 chars/inch, 6 lines/inch
7 nroff driving tables
8 width and code tables
9 */
10 
11 struct {
12 	int bset;
13 	int breset;
14 	int Hor;
15 	int Vert;
16 	int Newline;
17 	int Char;
18 	int Em;
19 	int Halfline;
20 	int Adj;
21 	char *twinit;
22 	char *twrest;
23 	char *twnl;
24 	char *hlr;
25 	char *hlf;
26 	char *flr;
27 	char *bdon;
28 	char *bdoff;
29 	char *ploton;
30 	char *plotoff;
31 	char *up;
32 	char *down;
33 	char *right;
34 	char *left;
35 	char *codetab[256-32];
36 	int zzz;
37 	} t = {
38 /*bset*/	0,
39 /*breset*/	0177420,
40 /*Hor*/		INCH/60,
41 /*Vert*/	INCH/48,
42 /*Newline*/	INCH/6,
43 /*Char*/	INCH/12,
44 /*Em*/		INCH/12,
45 /*Halfline*/	INCH/12,
46 /*Adj*/		INCH/12,
47 /*twinit*/	"\0334\033\037\013",
48 /*twrest*/	"\0334\033\037\015",
49 /*twnl*/	"\015\n",
50 /*hlr*/		"\033D",
51 /*hlf*/		"\033U",
52 /*flr*/		"\033\n",
53 /*bdon*/	"",
54 /*bdoff*/	"",
55 /*ploton*/	"\0333",
56 /*plotoff*/	"\0334",
57 /*up*/		"\033\n",
58 /*down*/	"\n",
59 /*right*/	" ",
60 /*left*/	"\b",
61 /*codetab*/
62 "\001 ",	/*space*/
63 "\001!",	/*!*/
64 "\002\200\047\202\047",	/*"*/
65 "\001#",	/*#*/
66 "\001\200|\341S\301",	/*$*/
67 "\001%",	/*%*/
68 "\000",	/*&*/
69 "\001'",	/*' close*/
70 "\001(",	/*(*/
71 "\001)",	/*)*/
72 "\001*",	/***/
73 "\001+",	/*+*/
74 "\001,",	/*,*/
75 "\001-",	/*- hyphen*/
76 "\001.",	/*.*/
77 "\001/",	/*/*/
78 "\2010",	/*0*/
79 "\2011",	/*1*/
80 "\2012",	/*2*/
81 "\2013",	/*3*/
82 "\2014",	/*4*/
83 "\2015",	/*5*/
84 "\2016",	/*6*/
85 "\2017",	/*7*/
86 "\2018",	/*8*/
87 "\2019",	/*9*/
88 "\001:",	/*:*/
89 "\001:\b,",	/*;*/
90 "\001<",	/*<*/
91 "\001=",	/*=*/
92 "\001>",	/*>*/
93 "\001?",	/*?*/
94 "\001@",	/*@*/
95 "\201A",	/*A*/
96 "\201B",	/*B*/
97 "\201C",	/*C*/
98 "\201D",	/*D*/
99 "\201E",	/*E*/
100 "\201F",	/*F*/
101 "\201G",	/*G*/
102 "\201H",	/*H*/
103 "\201I",	/*I*/
104 "\201J",	/*J*/
105 "\201K",	/*K*/
106 "\201L",	/*L*/
107 "\201M",	/*M*/
108 "\201N",	/*N*/
109 "\201O",	/*O*/
110 "\201P",	/*P*/
111 "\201Q",	/*Q*/
112 "\201R",	/*R*/
113 "\201S",	/*S*/
114 "\201T",	/*T*/
115 "\201U",	/*U*/
116 "\201V",	/*V*/
117 "\201W",	/*W*/
118 "\201X",	/*X*/
119 "\201Y",	/*Y*/
120 "\201Z",	/*Z*/
121 "\001[",	/*[*/
122 "\001\016\112\017",	/*\*/
123 "\001]",	/*]*/
124 "\001\344.\201\341.\201\301.\242\304",	/*^*/
125 "\001_",	/*_ dash*/
126 "\001'",	/*` open*/
127 "\201a",	/*a*/
128 "\201b",	/*b*/
129 "\201c",	/*c*/
130 "\201d",	/*d*/
131 "\201e",	/*e*/
132 "\201f",	/*f*/
133 "\201g",	/*g*/
134 "\201h",	/*h*/
135 "\201i",	/*i*/
136 "\201j",	/*j*/
137 "\201k",	/*k*/
138 "\201l",	/*l*/
139 "\201m",	/*m*/
140 "\201n",	/*n*/
141 "\201o",	/*o*/
142 "\201p",	/*p*/
143 "\201q",	/*q*/
144 "\201r",	/*r*/
145 "\201s",	/*s*/
146 "\201t",	/*t*/
147 "\201u",	/*u*/
148 "\201v",	/*v*/
149 "\201w",	/*w*/
150 "\201x",	/*x*/
151 "\201y",	/*y*/
152 "\201z",	/*z*/
153 "\001{",	/*{*/
154 "\001|",	/*|*/
155 "\001}",	/*}*/
156 "\001\343\016\074\017\303",	/*~*/
157 "\000\0",	/*narrow sp*/
158 "\001-",	/*hyphen*/
159 "\001O\b+",	/*bullet*/
160 "\002[]",	/*square*/
161 "\001-",	/*3/4 em*/
162 "\001_",	/*rule*/
163 "\2031/4",	/*1/4*/
164 "\2031/2",	/*1/2*/
165 "\2033/4",	/*3/4*/
166 "\001-",	/*minus*/
167 "\202fi",	/*fi*/
168 "\202fl",	/*fl*/
169 "\202ff",	/*ff*/
170 "\203ffi",	/*ffi*/
171 "\203ffl",	/*ffl*/
172 "\001\343o\303",	/*degree*/
173 "\001\342-\302|",	/*dagger*/
174 "\001\342s\302s",	/*section*/
175 "\001'",	/*foot mark*/
176 "\001'",	/*acute accent*/
177 "\001\345.\201\301.\201\304",	/*grave accent*/
178 "\001_",	/*underrule*/
179 "\001/",	/*slash (longer)*/
180 "\000\0",	/*half narrow space*/
181 "\001 ",	/*unpaddable space*/
182 "\001\016\123\017",	/*alpha*/
183 "\001\046",	/*beta*/
184 "\001\016\107\017",	/*gamma*/
185 "\001\016\113\017",	/*delta*/
186 "\001\016\116\017",	/*epsilon*/
187 "\001\200c\201\301,\241\343<\302",	/*zeta*/
188 "\001\016\114\017",	/*eta*/
189 "\001O\b-",	/*theta*/
190 "\001i",	/*iota*/
191 "\001k",	/*kappa*/
192 "\001\016\102\017",	/*lambda*/
193 "\001\073",	/*mu*/
194 "\001\241(\203/\242",	/*nu*/
195 "\001\016\104\017",	/*xi*/
196 "\001o",	/*omicron*/
197 "\001\042",	/*pi*/
198 "\001\016\106\017",	/*rho*/
199 "\001\016\126\017",	/*sigma*/
200 "\001\016\103\017",	/*tau*/
201 "\001v",	/*upsilon*/
202 "\001o\b/",	/*phi*/
203 "\001x",	/*chi*/
204 "\001\200/-\301\202'\244'\202\341",	/*psi*/
205 "\001\016\130\017",	/*omega*/
206 "\001\242|\202\344-\304\342\202'\242\302",	/*Gamma*/
207 "\001\016\101\017",	/*Delta*/
208 "\001O\b=",	/*Theta*/
209 "\002/\242\016\112\017\202",	/*Lambda*/
210 "\001\341_\346_\307\341-\301",	/*Xi*/
211 "\001\242[]\204[]\242\343-\303",	/*Pi*/
212 "\001\341>\301\302-\346-\304\241",	/*Sigma*/
213 "\000\0",	/**/
214 "\001Y",	/*Upsilon*/
215 "\001o\b[\b]",	/*Phi*/
216 "\001\200[]-\301\202'\244'\202\341",	/*Psi*/
217 "\001\134",	/*Omega*/
218 "\001\301-\341\202\303'\202\343/\244",	/*square root*/
219 "\001\341s\301\202'\242",	/*terminal sigma*/
220 "\001\343-\303",	/*root en*/
221 "\001>\b_",	/*>=*/
222 "\001<\b_",	/*<=*/
223 "\001=\b_",	/*identically equal*/
224 "\001-",	/*equation minus*/
225 "\001=\b\344\016\074\017\304",	/*approx =*/
226 "\001\016\074\017",	/*approximates*/
227 "\001=\b/",	/*not equal*/
228 "\002 \245-\204->\201",	/*right arrow*/
229 "\002 \245<-\204-\201",	/*left arrow*/
230 "\001\016\132\017",	/*up arrow*/
231 "\001\016\136\017",	/*down arrow*/
232 "\001=",	/*equation equal*/
233 "\001x",	/*multiply*/
234 "\001\200.-\345.\305",	/*divide*/
235 "\001+\b_",	/*plus-minus*/
236 "\001U",	/*cup (union)*/
237 "\001\343\140\203\136\243\303",	/*cap (intersection)*/
238 "\002 \242\245\341(\301\341\204_\346_\203\307",	/*subset of*/
239 "\002 \243\341_\346_\307\204\341)\301\241",	/*superset of*/
240 "\002 \242\245\341(\301\341\204_\346_\307_\203",	/*improper subset of*/
241 "\002 \243_\341_\346_\307\341\204)\301\241",	/*improper superset of*/
242 "\001\016\137\017",	/*infinity*/
243 "\001\016\115\017",	/*partial derivative*/
244 "\001\200\016\112\017\203/\243\344\201-\201-\304\242",	/*gradient*/
245 "\001\200-\202\343,\303\242",	/*not*/
246 "\001\044",	/*integral sign*/
247 "\001\016\135\017",	/*proportional to*/
248 "\0010\b/",	/*empty set*/
249 "\001\200(\201-\241",	/*member of*/
250 "\001+",	/*equation plus*/
251 "\003(r)",	/*registered*/
252 "\003(c)",	/*copyright*/
253 "\001|",	/*box rule */
254 "\001c\b/",	/*cent sign*/
255 "\001\341=\301|",	/*dbl dagger*/
256 "\002*>",	/*right hand*/
257 "\002<*",	/*left hand*/
258 "\001*",	/*math * */
259 "\003(b)",	/*bell system sign*/
260 "\001|",	/*or (was star)*/
261 "\001O",	/*circle*/
262 "\001|",	/*left top (of big curly)*/
263 "\001|",	/*left bottom*/
264 "\001|",	/*right top*/
265 "\001|",	/*right bot*/
266 "\001|",	/*left center of big curly bracket*/
267 "\001|",	/*right center of big curly bracket*/
268 "\001|",	/*bold vertical*/
269 "\001\201\016\076\017\241",	/*left floor (left bot of big sq bract)*/
270 "\001\241\016\100\017\201",	/*right floor (right bot ")*/
271 "\001\201\140\241",	/*left ceiling (lt of ")*/
272 "\001\241\136\201"};	/*right ceiling (rt of ")*/
273