|
|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T c
Length: 8807 (0x2267)
Types: TextFile
Names: »cat.c«
└─⟦060c9c824⟧ Bits:30007080 DKUUG TeX 2/12/89
└─⟦this⟧ »./DVIware/laser-setters/quicspool/src/cat.c«
└─⟦52210d11f⟧ Bits:30007239 EUUGD2: TeX 3 1992-12
└─⟦af5ba6c8e⟧ »unix3.0/DVIWARE.tar.Z«
└─⟦ca79c7339⟧
└─⟦this⟧ »DVIware/laser-setters/quicspool/src/cat.c«
#ifndef lint
static char *rcs = "$Header: cat.c,v 1.1 88/01/15 13:03:09 simpson Rel $";
#endif
/*
$Log: cat.c,v $
* Revision 1.1 88/01/15 13:03:09 simpson
* initial release
*
* Revision 0.1 87/12/11 18:30:40 simpson
* beta test
*
*/
/* This file contains structure for mapping between ASCII and the weird
* CAT otroff font positions. The CAT only contains 102 characters per
* font mapped into strange positions.
*/
/* This table maps from CAT otroff order of a non-special font to the position
* of the character in the real font.
*/
char RegularToAscii[128] = {
0, /* Not used */
'h', /* h */
't', /* t */
'n', /* n */
'm', /* m */
'l', /* l */
'i', /* i */
'z', /* z */
's', /* s */
'd', /* d */
'b', /* b */
'x', /* x */
'f', /* f */
'j', /* j */
'u', /* u */
'k', /* k */
0, /* Not used */
'p', /* p */
006, /* \(em */
';', /* ; */
0, /* Not used */
'a', /* a */
005, /* \(ru */
'c', /* c */
'`', /* ` */
'e', /* e */
'\'', /* ' */
'o', /* o */
021, /* \(14 */
'r', /* r */
022, /* \(12 */
'v', /* v */
'-', /* - or \(hy */
'w', /* w */
'q', /* q */
'/', /* / */
'.', /* . */
'g', /* g */
023, /* \(34 */
',', /* , */
'&', /* & */
'y', /* y */
0, /* Not used */
'%', /* % */
0, /* Not used */
'Q', /* Q */
'T', /* T */
'O', /* O */
'H', /* H */
'N', /* N */
'M', /* M */
'L', /* L */
'R', /* R */
'G', /* G */
'I', /* I */
'P', /* P */
'C', /* C */
'V', /* V */
'E', /* E */
'Z', /* Z */
'D', /* D */
'B', /* B */
'S', /* S */
'Y', /* Y */
0, /* Not used */
'F', /* F */
'X', /* X */
'A', /* A */
'W', /* W */
'J', /* J */
'U', /* U */
'K', /* K */
'0', /* 0 */
'1', /* 1 */
'2', /* 2 */
'3', /* 3 */
'4', /* 4 */
'5', /* 5 */
'6', /* 6 */
'7', /* 7 */
'8', /* 8 */
'9', /* 9 */
'*', /* * */
004, /* \- or \(-- */
001, /* \(fi */
002, /* \(fl */
003, /* \(ff */
020, /* \(ct */
012, /* \(fL or \(Fl */
011, /* \fI or \(Fi */
'(', /* ( */
')', /* ) */
'[', /* [ */
']', /* ] */
013, /* \(de */
014, /* \(dg */
'=', /* = */
017, /* \(rg */
':', /* : */
'+', /* + */
0, /* Not used */
'!', /* ! */
007, /* \(bu */
'?', /* ? */
015, /* \(fm */
'|', /* | */
0, /* Not used */
016, /* \(co */
010, /* \(sq */
'$', /* $ */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
};
/* This table maps from CAT otroff order in a special font to the position
* of the character in the real font.
*/
char SpecialToAscii[128] = {
0, /* Not used */
'w', /* \(*q */
'h', /* \(*h */
'm', /* \(*n */
'l', /* \(*m */
'k', /* \(*l */
'i', /* \(*i */
'f', /* \(*z */
'r', /* \(*s */
'd', /* \(*d */
'b', /* \(*b */
'n', /* \(*c */
'g', /* \(*y */
'u', /* \(*f */
't', /* \(*u */
'j', /* \(*k */
0, /* Not used */
'p', /* \(*p */
'@', /* @ */
'7', /* \(da */
0, /* Not used */
'a', /* \(*a */
'|', /* \(or */
'v', /* \(*x */
'"', /* " */
'e', /* \(*e */
'=', /* = */
'o', /* \(*o */
'4', /* \(<- */
'q', /* \(*r */
'6', /* \(ua */
's', /* \(*t */
'_', /* _ */
'\\', /* \e */
'W', /* \(*Q */
007, /* \(bs */
001, /* \(if */
'c', /* \(*g */
002, /* \(fl */
003, /* \(pt */
004, /* \(rh */
'x', /* \(*w */
0, /* Not used */
'(', /* \(gr */
0, /* Not used */
'U', /* \(*F */
'H', /* \(*H */
'X', /* \(*W */
005, /* \(cu */
006, /* \(rn */
014, /* \(ts */
'K', /* \(*L */
'-', /* \(mi */
'C', /* \(*G */
015, /* \(is */
'P', /* \(*P */
032, /* \(sb */
033, /* \(sp */
'2', /* \(ap */
'y', /* \(pd */
'D', /* \(*D */
013, /* \(sr */
'R', /* \(*S */
'1', /* \(~= */
0, /* Not used */
'>', /* > */
'N', /* \(*C */
'<', /* < */
016, /* \(sl */
034, /* \(ca */
'T', /* \(*U */
035, /* \(no */
023, /* \(rc */
024, /* \(lt */
017, /* \(bv */
030, /* \(lk */
025, /* \(lb */
026, /* \(rt */
031, /* \(rk */
027, /* \(rb */
021, /* \(rf */
020, /* \(lf */
022, /* \(lc */
'*', /* \(mu */
'/', /* \(di */
010, /* \(+- */
011, /* \(<= */
012, /* \(>= */
'0', /* \(== */
'3', /* \(!= */
'{', /* { */
'}', /* } */
'\'', /* ' */
'`', /* \` */
'^', /* ^ */
'#', /* # */
036, /* \(lh */
037, /* \(mo */
'~', /* ~ */
'z', /* \(es */
0, /* Not used */
'Y', /* \(dd */
'Z', /* \(br */
'9', /* \(** */
'[', /* \(ib */
']', /* \(ci */
0, /* Not used */
'+', /* \(pl */
'5', /* \(-> */
'8', /* \(sc */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0, /* Not used */
0 /* Not used */
};
/* This tables maps from the order in the otroff width output table to
* the font position of that character. A zero value designates not used.
*/
char RegularOrder[256-32] = {
' ',
'!',
0, /* " */
0, /* # */
'$',
'%',
'&',
'\'',
'(',
')',
'*',
'+',
',',
'-', /* hyphen */
'.',
'/',
'0',
'1',
'2',
'3',
'4',
'5',
'6',
'7',
'8',
'9',
':',
';',
0, /* < */
'=',
0, /* > */
'?',
0, /* @ */
'A',
'B',
'C',
'D',
'E',
'F',
'G',
'H',
'I',
'J',
'K',
'L',
'M',
'N',
'O',
'P',
'Q',
'R',
'S',
'T',
'U',
'V',
'W',
'X',
'Y',
'Z',
'[',
0, /* \ */
']',
0, /* ^ */
0, /* _ */
'`',
'a',
'b',
'c',
'd',
'e',
'f',
'g',
'h',
'i',
'j',
'k',
'l',
'm',
'n',
'o',
'p',
'q',
'r',
's',
't',
'u',
'v',
'w',
'x',
'y',
'z',
0, /* { */
'|',
0, /* } */
0, /* ~ */
0, /* narrow space */
055, /* hyphen */
007, /* bullet */
010, /* square */
006, /* 3/4 em */
005, /* rule */
021, /* 1/4 */
022, /* 1/2 */
023, /* 3/4 */
004, /* minus */
001, /* fi */
002, /* fl */
003, /* ff */
011, /* ffi */
012, /* ffl */
013, /* degree */
014, /* dagger */
0, /* section */
015, /* foot mark */
0, /* ' */
0, /* ` */
0, /* _ */
0,
0, /* half narrow space */
0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,
017, /* registered */
016, /* copyright */
0,
020 /* cent */
};
/* Just like RegularOrder, but for the special font */
char SpecialOrder[256-32] = {
0,0,
'"',
'#',
0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,
'<',
0,
'>',
0,
'@',
0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,
'\\',
0,
'^',
'_',
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
0,0,0,
'{',
0,
'}',
'~',
0,
0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0,0,
070, /* section */
0,
'\'',
'`',
'_',
016, /* slash (longer) */
0,
0,
0141, /* alpha */
0142, /* beta */
0143, /* gamma */
0144, /* delta */
0145, /* epsilon */
0146, /* zeta */
0147, /* eta */
0150, /* theta */
0151, /* iota */
0152, /* kappa */
0153, /* lambda */
0154, /* mu */
0155, /* nu */
0156, /* xi */
0157, /* omicron */
0160, /* pi */
0161, /* rho */
0162, /* sigma */
0163, /* tau */
0164, /* upsilon */
0165, /* phi */
0166, /* chi */
0167, /* psi */
0170, /* omega */
0103, /* Gamma */
0104, /* Delta */
0110, /* Theta */
0113, /* Lambda */
0116, /* Xi */
0120, /* Pi */
0122, /* Sigma */
0,
0124, /* Upsilon */
0125, /* Phi */
0127, /* Psi */
0130, /* Omega */
013, /* square root */
014, /* terminal sigma */
006, /* root extender */
012, /* >= */
011, /* <= */
060, /* identically equal */
055, /* minus */
061, /* approximately = */
062, /* approximates */
063, /* not equal */
065, /* right arrow */
064, /* left arrow */
066, /* up arrow */
067, /* down arrow */
'=',
052, /* multiply */
057, /* divide */
010, /* plus minus */
005, /* cup (union) */
034, /* cap (intersection) */
032, /* subset of */
033, /* superset of */
0133, /* improper subset */
002, /* improper superset */
001, /* infinity */
0171, /* partial derivative */
050, /* gradient */
035, /* not */
015, /* integral sign */
003, /* proportional to */
0172, /* empty set */
037, /* member of */
'+',
0,
0,
0, /* box vertical rule */
0,
0131, /* double dagger */
004, /* right hand */
036, /* left hand */
071, /* math * */
007, /* bell system sign */
'|', /* or */
0135, /* circle */
024, /* left top (of big curly) */
025, /* left bottom */
026, /* right top */
027, /* right bottom */
022, /* left center of big curly bracket */
023, /* right center of big curly bracket */
017, /* bold vertical */
020, /* left floor */
021, /* right floor */
022, /* left ceiling */
023 /* right ceiling */
};