49 case 'A':extract(H_ROMAN,H_UPPER,
'A',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
50 case 'B':extract(H_ROMAN,H_UPPER,
'B',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
51 case 'C':extract(H_ROMAN,H_UPPER,
'C',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
52 case 'D':extract(H_ROMAN,H_UPPER,
'D',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
53 case 'E':extract(H_ROMAN,H_UPPER,
'E',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
54 case 'F':extract(H_ROMAN,H_UPPER,
'F',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
55 case 'G':extract(H_ROMAN,H_UPPER,
'G',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
56 case 'H':extract(H_ROMAN,H_UPPER,
'H',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
57 case 'I':extract(H_ROMAN,H_UPPER,
'I',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
58 case 'J':extract(H_ROMAN,H_UPPER,
'J',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
59 case 'K':extract(H_ROMAN,H_UPPER,
'K',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
60 case 'L':extract(H_ROMAN,H_UPPER,
'L',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
61 case 'M':extract(H_ROMAN,H_UPPER,
'M',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
62 case 'N':extract(H_ROMAN,H_UPPER,
'N',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
63 case 'O':extract(H_ROMAN,H_UPPER,
'O',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
64 case 'P':extract(H_ROMAN,H_UPPER,
'P',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
65 case 'Q':extract(H_ROMAN,H_UPPER,
'Q',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
66 case 'R':extract(H_ROMAN,H_UPPER,
'R',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
67 case 'S':extract(H_ROMAN,H_UPPER,
'S',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
68 case 'T':extract(H_ROMAN,H_UPPER,
'T',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
69 case 'U':extract(H_ROMAN,H_UPPER,
'U',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
70 case 'V':extract(H_ROMAN,H_UPPER,
'V',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
71 case 'W':extract(H_ROMAN,H_UPPER,
'W',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
72 case 'X':extract(H_ROMAN,H_UPPER,
'X',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
73 case 'Y':extract(H_ROMAN,H_UPPER,
'Y',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
74 case 'Z':extract(H_ROMAN,H_UPPER,
'Z',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
76 case 'a':extract(H_ROMAN,H_LOWER,
'A',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
77 case 'b':extract(H_ROMAN,H_LOWER,
'B',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
78 case 'c':extract(H_ROMAN,H_LOWER,
'C',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
79 case 'd':extract(H_ROMAN,H_LOWER,
'D',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
80 case 'e':extract(H_ROMAN,H_LOWER,
'E',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
81 case 'f':extract(H_ROMAN,H_LOWER,
'F',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
82 case 'g':extract(H_ROMAN,H_LOWER,
'G',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
83 case 'h':extract(H_ROMAN,H_LOWER,
'H',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
84 case 'i':extract(H_ROMAN,H_LOWER,
'I',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
85 case 'j':extract(H_ROMAN,H_LOWER,
'J',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
86 case 'k':extract(H_ROMAN,H_LOWER,
'K',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
87 case 'l':extract(H_ROMAN,H_LOWER,
'L',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
88 case 'm':extract(H_ROMAN,H_LOWER,
'M',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
89 case 'n':extract(H_ROMAN,H_LOWER,
'N',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
90 case 'o':extract(H_ROMAN,H_LOWER,
'O',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
91 case 'p':extract(H_ROMAN,H_LOWER,
'P',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
92 case 'q':extract(H_ROMAN,H_LOWER,
'Q',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
93 case 'r':extract(H_ROMAN,H_LOWER,
'R',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
94 case 's':extract(H_ROMAN,H_LOWER,
'S',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
95 case 't':extract(H_ROMAN,H_LOWER,
'T',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
96 case 'u':extract(H_ROMAN,H_LOWER,
'U',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
97 case 'v':extract(H_ROMAN,H_LOWER,
'V',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
98 case 'w':extract(H_ROMAN,H_LOWER,
'W',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
99 case 'x':extract(H_ROMAN,H_LOWER,
'X',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
100 case 'y':extract(H_ROMAN,H_LOWER,
'Y',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
101 case 'z':extract(H_ROMAN,H_LOWER,
'Z',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
103 case '0':extract(H_DIGIT,H_UPPER,
'0',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
104 case '1':extract(H_DIGIT,H_UPPER,
'1',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
105 case '2':extract(H_DIGIT,H_UPPER,
'2',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
106 case '3':extract(H_DIGIT,H_UPPER,
'3',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
107 case '4':extract(H_DIGIT,H_UPPER,
'4',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
108 case '5':extract(H_DIGIT,H_UPPER,
'5',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
109 case '6':extract(H_DIGIT,H_UPPER,
'6',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
110 case '7':extract(H_DIGIT,H_UPPER,
'7',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
111 case '8':extract(H_DIGIT,H_UPPER,
'8',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
112 case '9':extract(H_DIGIT,H_UPPER,
'9',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
114 case '.':extract(H_MATH,H_UPPER,
'.',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
115 case ',':extract(H_MATH,H_UPPER,
',',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
116 case '/':extract(H_MATH,H_UPPER,
'/',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
117 case '(':extract(H_MATH,H_UPPER,
'(',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
118 case ')':extract(H_MATH,H_UPPER,
')',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
119 case '-':extract(H_MATH,H_UPPER,
'-',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
120 case '+':extract(H_MATH,H_UPPER,
'+',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
121 case '=':extract(H_MATH,H_UPPER,
'=',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
122 case '*':extract(H_MATH,H_UPPER,
'*',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
124 case '$':extract(H_SPECIAL,H_UPPER,
'D',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
125 case '!':extract(H_SPECIAL,H_UPPER,
'E',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
126 case '#':extract(H_SPECIAL,H_UPPER,
'F',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
127 case '>':extract(H_SPECIAL,H_UPPER,
'G',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
128 case '?':extract(H_SPECIAL,H_UPPER,
'H',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
129 case ':':extract(H_SPECIAL,H_UPPER,
'J',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
130 case ';':extract(H_SPECIAL,H_UPPER,
'K',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
131 case '<':extract(H_SPECIAL,H_UPPER,
'L',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
132 case '[':extract(H_SPECIAL,H_UPPER,
'M',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
133 case ']':extract(H_SPECIAL,H_UPPER,
'N',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
134 case '{':extract(H_SPECIAL,H_UPPER,
'P',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
135 case '}':extract(H_SPECIAL,H_UPPER,
'Q',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
136 case '%':extract(H_SPECIAL,H_UPPER,
'Y',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;
137 case '&':extract(H_SPECIAL,H_UPPER,
'W',a_scale,a_number,a_mx_point,aX,aY,a_width);
break;