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