/* | |
* (C) Copyright 2002, Brian Knittel. | |
* You may freely use this program, but: it offered strictly on an AS-IS, AT YOUR OWN | |
* RISK basis, there is no warranty of fitness for any purpose, and the rest of the | |
* usual yada-yada. Please keep this notice and the copyright in any distributions | |
* or modifications. | |
* | |
* This is not a supported product, but I welcome bug reports and fixes. | |
* Mail to sim@ibm1130.org | |
*/ | |
struct tag_codewheel { | |
unsigned char ascii; | |
unsigned char ebcdic; | |
}; | |
static struct tag_codewheel codewheel1132[] = | |
{ /* characters and EBCDIC codes in printwheel order */ | |
'A', 0xC1, | |
'B', 0xC2, | |
'C', 0xC3, | |
'D', 0xC4, | |
'F', 0xC6, | |
'H', 0xC8, | |
'I', 0xC9, | |
'S', 0xE2, | |
'T', 0xE3, | |
'U', 0xE4, | |
'V', 0xE5, | |
'1', 0xF1, | |
'2', 0xF2, | |
'3', 0xF3, | |
'4', 0xF4, | |
'5', 0xF5, | |
'6', 0xF6, | |
'7', 0xF7, | |
'8', 0xF8, | |
'9', 0xF9, | |
'0', 0xF0, | |
'=', 0x7E, | |
'$', 0x5B, | |
'.', 0x4B, | |
'\'', 0x7D, | |
',', 0x6B, | |
')', 0x5D, | |
'-', 0x60, | |
'(', 0x4D, | |
'+', 0x4E, | |
'/', 0x61, | |
'*', 0x5C, | |
'&', 0x50, | |
'J', 0xD1, | |
'K', 0xD2, | |
'L', 0xD3, | |
'M', 0xD4, | |
'N', 0xD5, | |
'O', 0xD6, | |
'P', 0xD7, | |
'Q', 0xD8, | |
'R', 0xD9, | |
'E', 0xC5, | |
'G', 0xC7, | |
'W', 0xE6, | |
'X', 0xE7, | |
'Y', 0xE8, | |
'Z', 0xE9, | |
}; | |
#define WHEELCHARS_1132 (sizeof(codewheel1132)/sizeof(codewheel1132[0])) | |
static struct tag_codewheel codewheel1403[] = | |
{ | |
'A', 0x64, | |
'B', 0x25, | |
'C', 0x26, | |
'D', 0x67, | |
'E', 0x68, | |
'F', 0x29, | |
'G', 0x2A, | |
'H', 0x6B, | |
'I', 0x2C, | |
'J', 0x58, | |
'K', 0x19, | |
'L', 0x1A, | |
'M', 0x5B, | |
'N', 0x1C, | |
'O', 0x5D, | |
'P', 0x5E, | |
'Q', 0x1F, | |
'R', 0x20, | |
'S', 0x0D, | |
'T', 0x0E, | |
'U', 0x4F, | |
'V', 0x10, | |
'W', 0x51, | |
'X', 0x52, | |
'Y', 0x13, | |
'Z', 0x54, | |
'0', 0x49, | |
'1', 0x40, | |
'2', 0x01, | |
'3', 0x02, | |
'4', 0x43, | |
'5', 0x04, | |
'6', 0x45, | |
'7', 0x46, | |
'8', 0x07, | |
'9', 0x08, | |
' ', 0x7F, | |
'.', 0x6E, | |
'(', 0x57, | |
'+', 0x6D, | |
'&', 0x15, | |
'$', 0x62, | |
'*', 0x23, | |
')', 0x2F, | |
'-', 0x61, | |
'/', 0x4C, | |
',', 0x16, | |
'\'', 0x0B, | |
'=', 0x4A, | |
}; | |
#define WHEELCHARS_1403 (sizeof(codewheel1403)/sizeof(codewheel1403[0])) | |