|
|
1.1 root 1: #ifndef lint
2: static char mkfont1sccsid[] = "@(#)mkfont1.c 4.3 2/16/88";
3: #endif lint
4:
5: #define BYTE 8
6: #define PAIR(a,b) ((a)|((b)<<BYTE))
7:
8: struct {
9: int name;
10: int ctval;
11: } font[102] = {
12: 'h',2,
13: 't',2,
14: 'n',0,
15: 'm',0,
16: 'l',2,
17: 'i',2,
18: 'z',0,
19: 's',0,
20: 'd',2,
21: 'b',2,
22: 'x',0,
23: 'f',2,
24: 'j',3,
25: 'u',0,
26: 'k',2,
27: 'p',1,
28: PAIR('e','m'),0,
29: ';',0,
30: 'a',0,
31: PAIR('r','u'),0,
32: 'c',0,
33: '`',0,
34: 'e',0,
35: '\'',0,
36: 'o',0,
37: PAIR('1','4'),0,
38: 'r',0,
39: PAIR('1','2'),0,
40: 'v',0,
41: PAIR('h','y'),0,
42: 'w',0,
43: 'q',1,
44: '/',0,
45: '.',0,
46: 'g',1,
47: PAIR('3','4'),0,
48: ',',0,
49: '&',0,
50: 'y',1,
51: '%',0,
52: 'Q',3,
53: 'T',2,
54: 'O',2,
55: 'H',2,
56: 'N',2,
57: 'M',2,
58: 'L',2,
59: 'R',2,
60: 'G',2,
61: 'I',2,
62: 'P',2,
63: 'C',2,
64: 'V',2,
65: 'E',2,
66: 'Z',2,
67: 'D',2,
68: 'B',2,
69: 'S',2,
70: 'Y',2,
71: 'F',2,
72: 'X',2,
73: 'A',2,
74: 'W',2,
75: 'J',2,
76: 'U',2,
77: 'K',2,
78: '0',2,
79: '1',2,
80: '2',2,
81: '3',2,
82: '4',2,
83: '5',2,
84: '6',2,
85: '7',2,
86: '8',2,
87: '9',2,
88: '*',0,
89: PAIR('-','-'),0,
90: PAIR('f','i'),0,
91: PAIR('f','l'),0,
92: PAIR('f','f'),0,
93: PAIR('c','t'),0,
94: PAIR('F','l'),0,
95: PAIR('F','i'),0,
96: '(',0,
97: ')',0,
98: '[',0,
99: ']',0,
100: PAIR('d','e'),0,
101: PAIR('d','g'),0,
102: '=',0,
103: PAIR('r','g'),0,
104: ':',0,
105: '+',0,
106: '!',0,
107: PAIR('b','u'),0,
108: '?',0,
109: PAIR('f','m'),0,
110: '|',0,
111: PAIR('c','o'),0,
112: PAIR('s','q'),0,
113: '$',0};
114: char *nametab[256-32] = {
115: "/*space*/",
116: "/*!*/",
117: "/*\"*/",
118: "/*#*/",
119: "/*$*/",
120: "/*%*/",
121: "/*&*/",
122: "/*' close*/",
123: "/*(*/",
124: "/*)*/",
125: "/***/",
126: "/*+*/",
127: "/*,*/",
128: "/*- hyphen*/",
129: "/*.*/",
130: "/*/*/",
131: "/*0*/",
132: "/*1*/",
133: "/*2*/",
134: "/*3*/",
135: "/*4*/",
136: "/*5*/",
137: "/*6*/",
138: "/*7*/",
139: "/*8*/",
140: "/*9*/",
141: "/*:*/",
142: "/*;*/",
143: "/*<*/",
144: "/*=*/",
145: "/*>*/",
146: "/*?*/",
147: "/*@*/",
148: "/*A*/",
149: "/*B*/",
150: "/*C*/",
151: "/*D*/",
152: "/*E*/",
153: "/*F*/",
154: "/*G*/",
155: "/*H*/",
156: "/*I*/",
157: "/*J*/",
158: "/*K*/",
159: "/*L*/",
160: "/*M*/",
161: "/*N*/",
162: "/*O*/",
163: "/*P*/",
164: "/*Q*/",
165: "/*R*/",
166: "/*S*/",
167: "/*T*/",
168: "/*U*/",
169: "/*V*/",
170: "/*W*/",
171: "/*X*/",
172: "/*Y*/",
173: "/*Z*/",
174: "/*[*/",
175: "/*\\*/",
176: "/*]*/",
177: "/*^*/",
178: "/*_*/",
179: "/*` open*/",
180: "/*a*/",
181: "/*b*/",
182: "/*c*/",
183: "/*d*/",
184: "/*e*/",
185: "/*f*/",
186: "/*g*/",
187: "/*h*/",
188: "/*i*/",
189: "/*j*/",
190: "/*k*/",
191: "/*l*/",
192: "/*m*/",
193: "/*n*/",
194: "/*o*/",
195: "/*p*/",
196: "/*q*/",
197: "/*r*/",
198: "/*s*/",
199: "/*t*/",
200: "/*u*/",
201: "/*v*/",
202: "/*w*/",
203: "/*x*/",
204: "/*y*/",
205: "/*z*/",
206: "/*{*/",
207: "/*|*/",
208: "/*}*/",
209: "/*~*/",
210: "/*narrow space*/",
211: "/*hyphen*/",
212: "/*bullet*/",
213: "/*square*/",
214: "/*3/4 em*/",
215: "/*rule*/",
216: "/*1/4*/",
217: "/*1/2*/",
218: "/*3/4*/",
219: "/*minus*/",
220: "/*fi*/",
221: "/*fl*/",
222: "/*ff*/",
223: "/*ffi*/",
224: "/*ffl*/",
225: "/*degree*/",
226: "/*dagger*/",
227: "/*section*/",
228: "/*foot mark*/",
229: "/*'*/",
230: "/*`*/",
231: "/*_*/",
232: 0,
233: "/*half nar sp*/",
234: 0,
235: 0,0,0,0,0,0,0,0,
236: 0,0,0,0,0,0,0,0,
237: 0,0,0,0,0,0,0,0,
238: 0,0,0,0,0,0,0,0,
239: 0,0,0,0,0,0,0,0,
240: 0,0,0,0,0,0,0,0,
241: 0,0,0,0,0,0,0,0,
242: 0,0,0,0,0,0,0,0,
243: 0,0,0,0,0,
244: "/*registered*/",
245: "/*copywrite*/",
246: 0,
247: "/*cent*/",
248: };
249: int chtab [] = {
250: PAIR('-','-'), 0210, /*font minus*/
251: PAIR('h','y'), 0200, /*hyphen*/
252: PAIR('b','u'), 0201, /*bullet*/
253: PAIR('s','q'), 0202, /*square*/
254: PAIR('e','m'), 0203, /*3/4em*/
255: PAIR('r','u'), 0204, /*rule*/
256: PAIR('1','4'), 0205, /*1/4*/
257: PAIR('1','2'), 0206, /*1/2*/
258: PAIR('3','4'), 0207, /*3/4*/
259: PAIR('m','i'), 0302, /*equation minus*/
260: PAIR('f','i'), 0211, /*fi*/
261: PAIR('f','l'), 0212, /*fl*/
262: PAIR('f','f'), 0213, /*ff*/
263: PAIR('F','i'), 0214, /*ffi*/
264: PAIR('F','l'), 0215, /*ffl*/
265: PAIR('d','e'), 0216, /*degree*/
266: PAIR('d','g'), 0217, /*dagger*/
267: PAIR('s','c'), 0220, /*section*/
268: PAIR('f','m'), 0221, /*foot mark*/
269: PAIR('a','a'), 0222, /*acute accent*/
270: PAIR('g','a'), 0223, /*grave accent*/
271: PAIR('u','l'), 0224, /*underrule*/
272: PAIR('s','l'), 0225, /*slash (longer)*/
273: PAIR('*','a'), 0230, /*alpha*/
274: PAIR('*','b'), 0231, /*beta*/
275: PAIR('*','g'), 0232, /*gamma*/
276: PAIR('*','d'), 0233, /*delta*/
277: PAIR('*','e'), 0234, /*epsilon*/
278: PAIR('*','z'), 0235, /*zeta*/
279: PAIR('*','y'), 0236, /*eta*/
280: PAIR('*','h'), 0237, /*theta*/
281: PAIR('*','i'), 0240, /*iota*/
282: PAIR('*','k'), 0241, /*kappa*/
283: PAIR('*','l'), 0242, /*lambda*/
284: PAIR('*','m'), 0243, /*mu*/
285: PAIR('*','n'), 0244, /*nu*/
286: PAIR('*','c'), 0245, /*xi*/
287: PAIR('*','o'), 0246, /*omicron*/
288: PAIR('*','p'), 0247, /*pi*/
289: PAIR('*','r'), 0250, /*rho*/
290: PAIR('*','s'), 0251, /*sigma*/
291: PAIR('*','t'), 0252, /*tau*/
292: PAIR('*','u'), 0253, /*upsilon*/
293: PAIR('*','f'), 0254, /*phi*/
294: PAIR('*','x'), 0255, /*chi*/
295: PAIR('*','q'), 0256, /*psi*/
296: PAIR('*','w'), 0257, /*omega*/
297: PAIR('*','A'), 0101, /*Alpha*/
298: PAIR('*','B'), 0102, /*Beta*/
299: PAIR('*','G'), 0260, /*Gamma*/
300: PAIR('*','D'), 0261, /*Delta*/
301: PAIR('*','E'), 0105, /*Epsilon*/
302: PAIR('*','Z'), 0132, /*Zeta*/
303: PAIR('*','Y'), 0110, /*Eta*/
304: PAIR('*','H'), 0262, /*Theta*/
305: PAIR('*','I'), 0111, /*Iota*/
306: PAIR('*','K'), 0113, /*Kappa*/
307: PAIR('*','L'), 0263, /*Lambda*/
308: PAIR('*','M'), 0115, /*Mu*/
309: PAIR('*','N'), 0116, /*Nu*/
310: PAIR('*','C'), 0264, /*Xi*/
311: PAIR('*','O'), 0117, /*Omicron*/
312: PAIR('*','P'), 0265, /*Pi*/
313: PAIR('*','R'), 0120, /*Rho*/
314: PAIR('*','S'), 0266, /*Sigma*/
315: PAIR('*','T'), 0124, /*Tau*/
316: PAIR('*','U'), 0270, /*Upsilon*/
317: PAIR('*','F'), 0271, /*Phi*/
318: PAIR('*','X'), 0130, /*Chi*/
319: PAIR('*','Q'), 0272, /*Psi*/
320: PAIR('*','W'), 0273, /*Omega*/
321: PAIR('s','r'), 0274, /*square root*/
322: PAIR('t','s'), 0275, /*terminal sigma*/
323: PAIR('r','n'), 0276, /*root en*/
324: PAIR('>','='), 0277, /*>=*/
325: PAIR('<','='), 0300, /*<=*/
326: PAIR('=','='), 0301, /*identically equal*/
327: PAIR('~','='), 0303, /*approx =*/
328: PAIR('a','p'), 0304, /*approximates*/
329: PAIR('!','='), 0305, /*not equal*/
330: PAIR('-','>'), 0306, /*right arrow*/
331: PAIR('<','-'), 0307, /*left arrow*/
332: PAIR('u','a'), 0310, /*up arrow*/
333: PAIR('d','a'), 0311, /*down arrow*/
334: PAIR('e','q'), 0312, /*equation equal*/
335: PAIR('m','u'), 0313, /*multiply*/
336: PAIR('d','i'), 0314, /*divide*/
337: PAIR('+','-'), 0315, /*plus-minus*/
338: PAIR('c','u'), 0316, /*cup (union)*/
339: PAIR('c','a'), 0317, /*cap (intersection)*/
340: PAIR('s','b'), 0320, /*subset of*/
341: PAIR('s','p'), 0321, /*superset of*/
342: PAIR('i','b'), 0322, /*improper subset*/
343: PAIR('i','p'), 0323, /* " superset*/
344: PAIR('i','f'), 0324, /*infinity*/
345: PAIR('p','d'), 0325, /*partial derivative*/
346: PAIR('g','r'), 0326, /*gradient*/
347: PAIR('n','o'), 0327, /*not*/
348: PAIR('i','s'), 0330, /*integral sign*/
349: PAIR('p','t'), 0331, /*proportional to*/
350: PAIR('e','s'), 0332, /*empty set*/
351: PAIR('m','o'), 0333, /*member of*/
352: PAIR('p','l'), 0334, /*equation plus*/
353: PAIR('r','g'), 0335, /*registered*/
354: PAIR('c','o'), 0336, /*copyright*/
355: PAIR('b','r'), 0337, /*box vert rule*/
356: PAIR('c','t'), 0340, /*cent sign*/
357: PAIR('d','d'), 0341, /*dbl dagger*/
358: PAIR('r','h'), 0342, /*right hand*/
359: PAIR('l','h'), 0343, /*left hand*/
360: PAIR('*','*'), 0344, /*math * */
361: PAIR('b','s'), 0345, /*bell system sign*/
362: PAIR('o','r'), 0346, /*or*/
363: PAIR('c','i'), 0347, /*circle*/
364: PAIR('l','t'), 0350, /*left top (of big curly)*/
365: PAIR('l','b'), 0351, /*left bottom*/
366: PAIR('r','t'), 0352, /*right top*/
367: PAIR('r','b'), 0353, /*right bot*/
368: PAIR('l','k'), 0354, /*left center of big curly bracket*/
369: PAIR('r','k'), 0355, /*right center of big curly bracket*/
370: PAIR('b','v'), 0356, /*bold vertical*/
371: PAIR('l','f'), 0357, /*left floor (left bot of big sq bract)*/
372: PAIR('r','f'), 0360, /*right floor (rb of ")*/
373: PAIR('l','c'), 0361, /*left ceiling (lt of ")*/
374: PAIR('r','c'), 0362, /*right ceiling (rt of ")*/
375: 0,0};
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.