/*
 * (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]))