1*31049Sminshall /* 2*31049Sminshall * Copyright (c) 1984, 1985, 1986 by the Regents of the 3*31049Sminshall * University of California and by Gregory Glenn Minshall. 4*31049Sminshall * 5*31049Sminshall * Permission to use, copy, modify, and distribute these 6*31049Sminshall * programs and their documentation for any purpose and 7*31049Sminshall * without fee is hereby granted, provided that this 8*31049Sminshall * copyright and permission appear on all copies and 9*31049Sminshall * supporting documentation, the name of the Regents of 10*31049Sminshall * the University of California not be used in advertising 11*31049Sminshall * or publicity pertaining to distribution of the programs 12*31049Sminshall * without specific prior permission, and notice be given in 13*31049Sminshall * supporting documentation that copying and distribution is 14*31049Sminshall * by permission of the Regents of the University of California 15*31049Sminshall * and by Gregory Glenn Minshall. Neither the Regents of the 16*31049Sminshall * University of California nor Gregory Glenn Minshall make 17*31049Sminshall * representations about the suitability of this software 18*31049Sminshall * for any purpose. It is provided "as is" without 19*31049Sminshall * express or implied warranty. 20*31049Sminshall */ 21*31049Sminshall 22*31049Sminshall #ifndef lint 23*31049Sminshall static char sccsid[] = "@(#)asctab.c 3.1 10/29/86"; 24*31049Sminshall #endif /* ndef lint */ 25*31049Sminshall 26*31049Sminshall 27*31049Sminshall /* 28*31049Sminshall * ascii to ebcdic translation tables 29*31049Sminshall */ 30*31049Sminshall 31*31049Sminshall #include "ascebc.h" 32*31049Sminshall 33*31049Sminshall unsigned char ascebc[NASCEBC][NASCII] = { 34*31049Sminshall 35*31049Sminshall /* 36*31049Sminshall * printer translation 37*31049Sminshall */ 38*31049Sminshall 39*31049Sminshall /* 000 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 40*31049Sminshall /* 010 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 41*31049Sminshall /* 020 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 42*31049Sminshall /* 030 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 43*31049Sminshall /* 040 */ 0x40, 0x5A, 0x7F, 0x7B, 0x5B, 0x6C, 0x50, 0x74, 44*31049Sminshall /* 050 */ 0x4D, 0x5D, 0x5C, 0x4E, 0x6B, 0x60, 0x4B, 0x61, 45*31049Sminshall /* 060 */ 0xF0, 0xF1, 0xF2, 0xF3, 0xF4, 0xF5, 0xF6, 0xF7, 46*31049Sminshall /* 070 */ 0xF8, 0xF9, 0x7A, 0x5E, 0x4C, 0x7E, 0x6E, 0x6F, 47*31049Sminshall /* 100 */ 0x7C, 0xC1, 0xC2, 0xC3, 0xC4, 0xC5, 0xC6, 0xC7, 48*31049Sminshall /* 110 */ 0xC8, 0xC9, 0xD1, 0xD2, 0xD3, 0xD4, 0xD5, 0xD6, 49*31049Sminshall /* 120 */ 0xD7, 0xD8, 0xD9, 0xE2, 0xE3, 0xE4, 0xE5, 0xE6, 50*31049Sminshall /* 130 */ 0xE7, 0xE8, 0xE9, 0xAD, 0xE0, 0xBD, 0x71, 0x6D, 51*31049Sminshall /* 140 */ 0x79, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 52*31049Sminshall /* 150 */ 0x88, 0x89, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 53*31049Sminshall /* 160 */ 0x97, 0x98, 0x99, 0xA2, 0xA3, 0xA4, 0xA5, 0xA6, 54*31049Sminshall /* 170 */ 0xA7, 0xA8, 0xA9, 0xC0, 0x4F, 0xD0, 0xA1, 0x00, 55*31049Sminshall 56*31049Sminshall /* 57*31049Sminshall * input translation 58*31049Sminshall */ 59*31049Sminshall 60*31049Sminshall /* 000 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 61*31049Sminshall /* 010 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 62*31049Sminshall /* 020 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 63*31049Sminshall /* 030 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 64*31049Sminshall /* 040 */ 0x40, 0x5A, 0x7F, 0x7B, 0x5B, 0x6C, 0x50, 0x7D, 65*31049Sminshall /* 050 */ 0x4D, 0x5D, 0x5C, 0x4E, 0x6B, 0x60, 0x4B, 0x61, 66*31049Sminshall /* 060 */ 0xF0, 0xF1, 0xF2, 0xF3, 0xF4, 0xF5, 0xF6, 0xF7, 67*31049Sminshall /* 070 */ 0xF8, 0xF9, 0x7A, 0x5E, 0x4C, 0x7E, 0x6E, 0x6F, 68*31049Sminshall /* 100 */ 0x7C, 0xC1, 0xC2, 0xC3, 0xC4, 0xC5, 0xC6, 0xC7, 69*31049Sminshall /* 110 */ 0xC8, 0xC9, 0xD1, 0xD2, 0xD3, 0xD4, 0xD5, 0xD6, 70*31049Sminshall /* 120 */ 0xD7, 0xD8, 0xD9, 0xE2, 0xE3, 0xE4, 0xE5, 0xE6, 71*31049Sminshall /* 130 */ 0xE7, 0xE8, 0xE9, 0xAD, 0xE0, 0xBD, 0x5F, 0x6D, 72*31049Sminshall /* 140 */ 0x79, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 73*31049Sminshall /* 150 */ 0x88, 0x89, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 74*31049Sminshall /* 160 */ 0x97, 0x98, 0x99, 0xA2, 0xA3, 0xA4, 0xA5, 0xA6, 75*31049Sminshall /* 170 */ 0xA7, 0xA8, 0xA9, 0xC0, 0x4F, 0xD0, 0xA1, 0x00, 76*31049Sminshall 77*31049Sminshall /* 78*31049Sminshall * special translation - for IBM 6670 laser printer. 79*31049Sminshall * Used by iroff and ipr. The control characters 030-037 have been mapped 80*31049Sminshall * into printable (though non-ascii) characters. Bell 007 and backspace 010 81*31049Sminshall * translate to the corresponding ebcdic characters, and ^N 016 and ^O 017 82*31049Sminshall * map to ebcdic SBS (subscript) and SPS (superscript). 83*31049Sminshall */ 84*31049Sminshall 85*31049Sminshall /* 000 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x2F, 86*31049Sminshall /* 010 */ 0x16, 0x00, 0x00, 0x00, 0x00, 0x00, 0x38, 0x09, 87*31049Sminshall /* 020 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 88*31049Sminshall /* 030 */ 0x8D, 0x9D, 0x9E, 0x8B, 0x4A, 0x9B, 0x8C, 0xAE, 89*31049Sminshall /* 040 */ 0x40, 0x5A, 0x7F, 0x7B, 0x5B, 0x6C, 0x50, 0x7D, 90*31049Sminshall /* 050 */ 0x4D, 0x5D, 0x5C, 0x4E, 0x6B, 0x60, 0x4B, 0x61, 91*31049Sminshall /* 060 */ 0xF0, 0xF1, 0xF2, 0xF3, 0xF4, 0xF5, 0xF6, 0xF7, 92*31049Sminshall /* 070 */ 0xF8, 0xF9, 0x7A, 0x5E, 0x4C, 0x7E, 0x6E, 0x6F, 93*31049Sminshall /* 100 */ 0x7C, 0xC1, 0xC2, 0xC3, 0xC4, 0xC5, 0xC6, 0xC7, 94*31049Sminshall /* 110 */ 0xC8, 0xC9, 0xD1, 0xD2, 0xD3, 0xD4, 0xD5, 0xD6, 95*31049Sminshall /* 120 */ 0xD7, 0xD8, 0xD9, 0xE2, 0xE3, 0xE4, 0xE5, 0xE6, 96*31049Sminshall /* 130 */ 0xE7, 0xE8, 0xE9, 0xAD, 0xE0, 0xBD, 0x5F, 0x6D, 97*31049Sminshall /* 140 */ 0x79, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 98*31049Sminshall /* 150 */ 0x88, 0x89, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 99*31049Sminshall /* 160 */ 0x97, 0x98, 0x99, 0xA2, 0xA3, 0xA4, 0xA5, 0xA6, 100*31049Sminshall /* 170 */ 0xA7, 0xA8, 0xA9, 0xC0, 0x4F, 0xD0, 0xA1, 0x00, 101*31049Sminshall 102*31049Sminshall /* 103*31049Sminshall * text translation - all graphics retained. 104*31049Sminshall */ 105*31049Sminshall 106*31049Sminshall /* 000 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 107*31049Sminshall /* 010 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 108*31049Sminshall /* 020 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 109*31049Sminshall /* 030 */ 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 110*31049Sminshall /* 040 */ 0x40, 0x5A, 0x7F, 0x7B, 0x5B, 0x6C, 0x50, 0x7D, 111*31049Sminshall /* 050 */ 0x4D, 0x5D, 0x5C, 0x4E, 0x6B, 0x60, 0x4B, 0x61, 112*31049Sminshall /* 060 */ 0xF0, 0xF1, 0xF2, 0xF3, 0xF4, 0xF5, 0xF6, 0xF7, 113*31049Sminshall /* 070 */ 0xF8, 0xF9, 0x7A, 0x5E, 0x4C, 0x7E, 0x6E, 0x6F, 114*31049Sminshall /* 100 */ 0x7C, 0xC1, 0xC2, 0xC3, 0xC4, 0xC5, 0xC6, 0xC7, 115*31049Sminshall /* 110 */ 0xC8, 0xC9, 0xD1, 0xD2, 0xD3, 0xD4, 0xD5, 0xD6, 116*31049Sminshall /* 120 */ 0xD7, 0xD8, 0xD9, 0xE2, 0xE3, 0xE4, 0xE5, 0xE6, 117*31049Sminshall /* 130 */ 0xE7, 0xE8, 0xE9, 0xAD, 0xE0, 0xBD, 0x71, 0x6D, 118*31049Sminshall /* 140 */ 0x79, 0x81, 0x82, 0x83, 0x84, 0x85, 0x86, 0x87, 119*31049Sminshall /* 150 */ 0x88, 0x89, 0x91, 0x92, 0x93, 0x94, 0x95, 0x96, 120*31049Sminshall /* 160 */ 0x97, 0x98, 0x99, 0xA2, 0xA3, 0xA4, 0xA5, 0xA6, 121*31049Sminshall /* 170 */ 0xA7, 0xA8, 0xA9, 0xC0, 0x4F, 0xD0, 0xA1, 0x00, 122*31049Sminshall }; 123