]> wirehaze git hosting - MS-DOS.git/blob - v4.0/src/DEV/KEYBOARD/KDFIT142.ASM

wirehaze git hosting

projects / MS-DOS.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
MZ is back!
[MS-DOS.git] / v4.0 / src / DEV / KEYBOARD / KDFIT142.ASM
1
2
3
4
5 PAGE ,132
6 TITLE DOS - Keyboard Definition File
7
8 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
9 ;; DOS - - NLS Support - Keyboard Defintion File
10 ;; (c) Copyright 1988 Microsoft
11 ;;
12 ;; This file contains the keyboard tables for Spanish.
13 ;;
14 ;; Linkage Instructions:
15 ;; Refer to KDF.ASM.
16 ;;
17 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
18 ;;
19 INCLUDE KEYBSHAR.INC ;; ;AN000;
20 INCLUDE POSTEQU.INC ;; ;AN000;
21 INCLUDE KEYBMAC.INC ;; ;AN000;
22 ;; ;AN000;
23 PUBLIC IT1_LOGIC ;; ;AN000;
24 PUBLIC IT1_437_XLAT ;; ;AN000;
25 PUBLIC IT1_850_XLAT ;; ;AN000;
26 ;; ;AN000;
27 CODE SEGMENT PUBLIC 'CODE' ;; ;AN000;
28 ASSUME CS:CODE,DS:CODE ;; ;AN000;
29 ;; ;AN000;
30 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
31 ;; Standard translate table options are a liner search table ;AN000;
32 ;; (TYPE_2_TAB) and ASCII entries ONLY (ASCII_ONLY) ;AN000;
33 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
34 ;; ;AN000;
35 STANDARD_TABLE EQU TYPE_2_TAB+ASCII_ONLY ;AN000;
36 ;; ;AN000;
37 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
38 ;;*************************************** ;AN000;
39 ;; IT State Logic ;AN000;
40 ;;*************************************** ;AN000;
41 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
42 ;; ;AN000;
43 ;; ;AN000;
44 IT1_LOGIC: ;AN000;
45 ;AN000;
46 DW LOGIC_END-$ ;; length ;AN000;
47 ;; ;AN000;
48 DW 0 ;; special features ;AN000;
49 ;; ;AN000;
50 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; COMMANDS START HERE ;AN000;
51 ;; ;AN000;
52 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
53 ;; OPTIONS: If we find a scan match in ;AN000;
54 ;; an XLATT or SET_FLAG operation then ;AN000;
55 ;; exit from INT 9. ;AN000;
56 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
57 ;; ;AN000;
58 OPTION EXIT_IF_FOUND ;; ;AN000;
59 ;; ;AN000;
60 ;; ;AN000;
61 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
62 ;; Dead key definitions must come before ;AN000;
63 ;; dead key translations to handle ;AN000;
64 ;; dead key + dead key. ;AN000;
65 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
66 ;; ;AN000;
67 IFF EITHER_ALT,NOT ;; ;AN000;
68 ANDF EITHER_CTL,NOT ;; ;AN000;
69 IFF EITHER_SHIFT ;; ;AN000;
70 SET_FLAG DEAD_UPPER ;; ;AN000;
71 ELSEF ;; ;AN000;
72 SET_FLAG DEAD_LOWER ;; ;AN000;
73 ENDIFF ;; ;AN000;
74 ENDIFF ;; ;AN000;
75 ;; ;AN000;
76 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
77 ;; ACUTE ACCENT TRANSLATIONS ;AN000;
78 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
79 ;; ;AN000;
80 ACUTE_PROC: ;; ;AN000;
81 ;; ;AN000;
82 IFF ACUTE,NOT ;; ;AN000;
83 GOTO DIARESIS_PROC ;; ;AN000;
84 ENDIFF ;; ;AN000;
85 ;; ;AN000;
86 RESET_NLS ;; ;AN000;
87 IFF R_ALT_SHIFT,NOT ;; ;AN000;
88 XLATT ACUTE_SPACE ;; ;AN000;
89 ENDIFF ;; ;AN000;
90 IFF EITHER_CTL,NOT ;; ;AN000;
91 ANDF EITHER_ALT,NOT ;; ;AN000;
92 IFF EITHER_SHIFT ;; ;AN000;
93 IFF CAPS_STATE ;; ;AN000;
94 XLATT ACUTE_LOWER ;; ;AN000;
95 ELSEF ;; ;AN000;
96 XLATT ACUTE_UPPER ;; ;AN000;
97 ENDIFF ;; ;AN000;
98 ELSEF ;; ;AN000;
99 IFF CAPS_STATE ;; ;AN000;
100 XLATT ACUTE_UPPER ;; ;AN000;
101 ELSEF ;; ;AN000;
102 XLATT ACUTE_LOWER ;; ;AN000;
103 ENDIFF ;; ;AN000;
104 ENDIFF ;; ;AN000;
105 ENDIFF ;; ;AN000;
106 ;; ;AN000;
107 INVALID_ACUTE: ;; ;AN000;
108 PUT_ERROR_CHAR ACUTE_LOWER ;; If we get here then either the XLATT ;AN000;
109 BEEP ;; failed or we are ina bad shift state. ;AN000;
110 GOTO NON_DEAD ;; Either is invalid so BEEP and fall ;AN000;
111 ;; through to generate the second char. ;AN000;
112 ;; Note that the dead key flag will be ;AN000;
113 ;; reset before we get here. ;AN000;
114 ;; ;AN000;
115 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
116 ;; DIARESIS ACCENT TRANSLATIONS ;AN000;
117 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
118 ;; ;AN000;
119 DIARESIS_PROC: ;; ;AN000;
120 ;; ;AN000;
121 IFF DIARESIS,NOT ;; ;AN000;
122 GOTO GRAVE_PROC ;; ;AN000;
123 ENDIFF ;; ;AN000;
124 ;; ;AN000;
125 RESET_NLS ;; ;AN000;
126 IFF R_ALT_SHIFT,NOT ;; ;AN000;
127 XLATT DIARESIS_SPACE ;; exist for 437 so beep for ;AN000;
128 ENDIFF ;; ;AN000;
129 IFF EITHER_CTL,NOT ;; ;AN000;
130 ANDF EITHER_ALT,NOT ;; ;AN000;
131 IFF EITHER_SHIFT ;; ;AN000;
132 IFF CAPS_STATE ;; ;AN000;
133 XLATT DIARESIS_LOWER ;; ;AN000;
134 ELSEF ;; ;AN000;
135 XLATT DIARESIS_UPPER ;; ;AN000;
136 ENDIFF ;; ;AN000;
137 ELSEF ;; ;AN000;
138 IFF CAPS_STATE ;; ;AN000;
139 XLATT DIARESIS_UPPER ;; ;AN000;
140 ELSEF ;; ;AN000;
141 XLATT DIARESIS_LOWER ;; ;AN000;
142 ENDIFF ;; ;AN000;
143 ENDIFF ;; ;AN000;
144 ENDIFF ;; ;AN000;
145 ;; ;AN000;
146 INVALID_DIARESIS: ;; ;AN000;
147 PUT_ERROR_CHAR DIARESIS_SPACE ;; standalone accent ;AN000;
148 BEEP ;; Invalid dead key combo. ;AN000;
149 GOTO NON_DEAD ;; ;AN000;
150 ;; ;AN000;
151 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
152 ;; GRAVE ACCENT TRANSLATIONS ;AN000;
153 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
154 ;; ;AN000;
155 GRAVE_PROC: ;; ;AN000;
156 ;; ;AN000;
157 IFF GRAVE,NOT ;; ;AN000;
158 GOTO CIRCUMFLEX_PROC ;; ;AN000;
159 ENDIFF ;; ;AN000;
160 ;; ;AN000;
161 RESET_NLS ;; ;AN000;
162 IFF R_ALT_SHIFT,NOT ;; ;AN000;
163 XLATT GRAVE_SPACE ;; ;AN000;
164 ENDIFF ;; ;AN000;
165 IFF EITHER_CTL,NOT ;; ;AN000;
166 ANDF EITHER_ALT,NOT ;; ;AN000;
167 IFF EITHER_SHIFT ;; ;AN000;
168 IFF CAPS_STATE ;; ;AN000;
169 XLATT GRAVE_LOWER ;; ;AN000;
170 ELSEF ;; ;AN000;
171 XLATT GRAVE_UPPER ;; ;AN000;
172 ENDIFF ;; ;AN000;
173 ELSEF ;; ;AN000;
174 IFF CAPS_STATE,NOT ;; ;AN000;
175 XLATT GRAVE_LOWER ;; ;AN000;
176 ELSEF ;; ;AN000;
177 XLATT GRAVE_UPPER ;; ;AN000;
178 ENDIFF ;; ;AN000;
179 ENDIFF ;; ;AN000;
180 ENDIFF ;; ;AN000;
181 ;; ;AN000;
182 INVALID_GRAVE: ;; ;AN000;
183 PUT_ERROR_CHAR GRAVE_LOWER ;; standalone accent ;AN000;
184 BEEP ;; Invalid dead key combo. ;AN000;
185 GOTO NON_DEAD ;; ;AN000;
186 ;; ;AN000;
187 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
188 ;; CIRCUMFLEX ACCENT TRANSLATIONS ;AN000;
189 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
190 ;; ;AN000;
191 CIRCUMFLEX_PROC: ;; ;AN000;
192 ;; ;AN000;
193 IFF CIRCUMFLEX,NOT ;; ;AN000;
194 GOTO NON_DEAD ;; ;AN000;
195 ENDIFF ;; ;AN000;
196 ;; ;AN000;
197 RESET_NLS ;; ;AN000;
198 IFF R_ALT_SHIFT,NOT ;; ;AN000;
199 XLATT CIRCUMFLEX_SPACE ;; ;AN000;
200 ENDIFF ;; ;AN000;
201 IFF EITHER_CTL,NOT ;; ;AN000;
202 ANDF EITHER_ALT,NOT ;; ;AN000;
203 IFF EITHER_SHIFT ;; ;AN000;
204 IFF CAPS_STATE ;; ;AN000;
205 XLATT CIRCUMFLEX_LOWER ;; ;AN000;
206 ELSEF ;; ;AN000;
207 XLATT CIRCUMFLEX_UPPER ;; ;AN000;
208 ENDIFF ;; ;AN000;
209 ELSEF ;; ;AN000;
210 IFF CAPS_STATE,NOT ;; ;AN000;
211 XLATT CIRCUMFLEX_LOWER ;; ;AN000;
212 ELSEF ;; ;AN000;
213 XLATT CIRCUMFLEX_UPPER ;; ;AN000;
214 ENDIFF ;; ;AN000;
215 ENDIFF ;; ;AN000;
216 ENDIFF ;; ;AN000;
217 ;; ;AN000;
218 INVALID_CIRCUMFLEX: ;; ;AN000;
219 PUT_ERROR_CHAR CIRCUMFLEX_LOWER ;; standalone accent ;AN000;
220 BEEP ;; Invalid dead key combo. ;AN000;
221 GOTO NON_DEAD ;; ;AN000;
222 ;; ;AN000;
223 ;; ;AN000;
224 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
225 ;; Upper, lower and third shifts ;AN000;
226 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
227 ;; ;AN000;
228 NON_DEAD: ;; ;AN000;
229 ;; ;AN000;
230 IFKBD G_KB+P12_KB ;; Avoid accidentally translating ;AN000;
231 ANDF LC_E0 ;; the "/" on the numeric pad of the ;AN000;
232 EXIT_STATE_LOGIC ;; G keyboard ;AN000;
233 ENDIFF ;; ;AN000;
234 ;;***BD ADDED FOR ALT, CTRL CASES ;; ;AN000;
235 IFF EITHER_CTL,NOT ;; ;AN000;
236 IFF ALT_SHIFT ;; ALT - case ;AN000;
237 ANDF R_ALT_SHIFT,NOT ;; ;AN000;
238 XLATT ALT_CASE ;; ;AN000;
239 ENDIFF ;; ;AN000;
240 ELSEF ;; ;AN000;
241 IFF EITHER_ALT,NOT ;; CTRL - case ;AN000;
242 XLATT CTRL_CASE ;; ;AN000;
243 ENDIFF ;; ;AN000;
244 ENDIFF ;; ;AN000;
245 ;;***BD END OF ADDITION ;AN000;
246 ;; ;AN000;
247 IFF EITHER_ALT,NOT ;; Lower and upper case. Alphabetic ;AN000;
248 ANDF EITHER_CTL,NOT ;; keys are affected by CAPS LOCK. ;AN000;
249 IFF EITHER_SHIFT ;; Numeric keys are not. ;AN000;
250 ;;***BD ADDED FOR NUMERIC PAD ;AN000;
251 IFF NUM_STATE,NOT ;; ;AN000;
252 XLATT NUMERIC_PAD ;; ;AN000;
253 ENDIFF ;; ;AN000;
254 ;;***BD END OF ADDITION ;AN000;
255 XLATT NON_ALPHA_UPPER ;; ;AN000;
256 IFF CAPS_STATE ;; ;AN000;
257 XLATT ALPHA_LOWER ;; ;AN000;
258 ELSEF ;; ;AN000;
259 XLATT ALPHA_UPPER ;; ;AN000;
260 ENDIFF ;; ;AN000;
261 ELSEF ;; ;AN000;
262 ;;***BD ADDED FOR NUMERIC PAD ;AN000;
263 IFF NUM_STATE ;; ;AN000;
264 XLATT NUMERIC_PAD ;; ;AN000;
265 ENDIFF ;; ;AN000;
266 ;;***BD END OF ADDITION ;AN000;
267 XLATT NON_ALPHA_LOWER ;; ;AN000;
268 IFF CAPS_STATE ;; ;AN000;
269 XLATT ALPHA_UPPER ;; ;AN000;
270 ELSEF ;; ;AN000;
271 XLATT ALPHA_LOWER ;; ;AN000;
272 ENDIFF ;; ;AN000;
273 ENDIFF ;; ;AN000;
274 ELSEF ;; ;AN000;
275 IFF EITHER_SHIFT,NOT ;; ;AN000;
276 IFKBD XT_KB+AT_KB ;; ;AN000;
277 IFF EITHER_CTL ;; ;AN000;
278 ANDF ALT_SHIFT ;; ;AN000;
279 XLATT THIRD_SHIFT ;; ;AN000;
280 ENDIFF ;; ;AN000;
281 ELSEF ;; ;AN000;
282 IFF EITHER_CTL,NOT ;; ;AN000;
283 ANDF R_ALT_SHIFT ;; ;AN000;
284 XLATT THIRD_SHIFT ;; ;AN000;
285 ENDIFF ;; ;AN000;
286 ENDIFF ;; ;AN000;
287 ENDIFF ;; ;AN000;
288 ENDIFF ;; ;AN000;
289 ;; ;AN000;
290 EXIT_STATE_LOGIC ;; ;AN000;
291 ;; ;AN000;
292 LOGIC_END: ;; ;AN000;
293 ;; ;AN000;
294 ;; ;AN000;
295 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
296 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
297 ;;;*************************************** ;AN000;
298 ;; IT Common Translate Section ;AN000;
299 ;; This section contains translations for the lower 128 characters ;AN000;
300 ;; only since these will never change from code page to code page. ;AN000;
301 ;; In addition the dead key "Set Flag" tables are here since the ;AN000;
302 ;; dead keys are on the same keytops for all code pages. ;AN000;
303 ;;*************************************** ;AN000;
304 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
305 ;; ;AN000;
306 PUBLIC IT1_COMMON_XLAT ;; ;AN000;
307 IT1_COMMON_XLAT: ;; ;AN000;
308 ;; ;AN000;
309 DW COMMON_XLAT_END-$ ;; length of section ;AN000;
310 DW -1 ;; code page ;AN000;
311 ;; ;AN000;
312 ;; ;AN000;
313 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
314 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
315 ;; CODE PAGE: Common ;AN000;
316 ;; STATE: Upper Shift Dead Key ;AN000;
317 ;; KEYBOARD TYPES: G + P12 ;AN000;
318 ;; TABLE TYPE: Flag Table ;AN000;
319 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
320 ;; ;; ;AN000;
321 ;; DW COM_DK_UP_K1_END-$ ;; length of state section ;AN000;
322 ;; DB DEAD_UPPER ;; State ID ;AN000;
323 ;; DW G_KB+P12_KB ;; Keyboard Type ;AN000;
324 ;; DB -1,-1 ;; Buffer entry for error character ;AN000;
325 ;; ;; Set Flag Table ;AN000;
326 ;; DW 1 ;; number of entries ;AN000;
327 ;; DB 13 ;; scan code ;AN000;
328 ;; FLAG CIRCUMFLEX ;; flag bit to set ;AN000;
329 ;; ;; ;AN000;
330 ;;COM_DK_UP_K1_END: ;; ;AN000;
331 ;; ;; ;AN000;
332 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
333 ;;*************************************** ;AN000;
334 ;;***BD - ADDED FOR ALT CASE ;AN000;
335 ;;****************************** ;AN000;
336 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
337 ;; CODE PAGE: Common ;AN000;
338 ;; STATE: Alt Case ;AN000;
339 ;; KEYBOARD TYPES: All ;AN000;
340 ;; TABLE TYPE: Translate ;AN000;
341 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
342 ;; ;AN000;
343 DW COM_ALT_K1_END-$ ;; length of state section ;AN000;
344 DB ALT_CASE ;; State ID ;AN000;
345 DW ANY_KB ;; Keyboard Type ;AN000;
346 DB -1,-1 ;; Buffer entry for error character ;AN000;
347 ;; ;AN000;
348 DW COM_ALT_K1_T1_END-$ ;; Size of xlat table ;AN000;
349 DB TYPE_2_TAB ;; xlat options: ;AN000;
350 DB 0 ;; 3 number of entries ;AN000;
351 ;;***BD THIS ENTRY IS A TEST ENTRY ;AN000;
352 ;; DB 53,225,0 ;; TEST ENTRY ;AN000;
353 ; DB 53,0,82H ;; valid alt - ;AN000;
354 ; DB 12,-1,-1 ;; invalid alt - ;AN000;
355 ; DB 13,-1,-1 ;; invalid alt = ;AN000;
356 COM_ALT_K1_T1_END: ;; ;AN000;
357 ;; ;AN000;
358 DW 0 ;; Size of xlat table - null table ;AN000;
359 ;; ;AN000;
360 COM_ALT_K1_END: ;; ;AN000;
361 ;; ;AN000;
362 ;;****************************** ;AN000;
363 ;;***BD - ADDED FOR CTRL CASE ;AN000;
364 ;;****************************** ;AN000;
365 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
366 ;; CODE PAGE: Common ;AN000;
367 ;; STATE: Ctrl Case ;AN000;
368 ;; KEYBOARD TYPES: G_KB+P12_KB+AT ;AN000;
369 ;; TABLE TYPE: Translate ;AN000;
370 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
371 ;; ;AN000;
372 DW COM_CTRL_K1_END-$ ;; length of state section ;AN000;
373 DB CTRL_CASE ;; State ID ;AN000;
374 DW G_KB+P12_KB+AT_KB ;; Keyboard Type ;AN000;
375 DB -1,-1 ;; Buffer entry for error character ;AN000;
376 ;; ;AN000;
377 DW COM_CTRL_K1_T1_END-$ ;; Size of xlat table ;AN000;
378 DB TYPE_2_TAB ;; xlat options: ;AN000;
379 DB 2 ;; number of entries ;AN000;
380 ;;***BD THIS ENTRY IS A TEST ENTRY ;AN000;
381 ;; DB 53,226,0 ;; TEST ENTRY ;AN000;
382 DB 43,-1,-1 ;; invalid slash ;AN000;
383 DB 41,28,41 ;; valid slash ;AN000;
384 COM_CTRL_K1_T1_END: ;; ;AN000;
385 ;; ;AN000;
386 DW 0 ;; Size of xlat table - null table ;AN000;
387 ;; ;AN000;
388 COM_CTRL_K1_END: ;; ;AN000;
389 ;; ;AN000;
390 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
391 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
392 ;; CODE PAGE: Common ;;change **********CNS ************** ;AN000;
393 ;; STATE: Numeric Key Pad ;AN000;
394 ;; KEYBOARD TYPES: All except the p12 ;AN000;
395 ;; TABLE TYPE: Translate ;AN000;
396 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
397 ;; ;AN000;
398 DW COM_PAD_K1_END-$ ;; length of state section ;AN000;
399 DB NUMERIC_PAD ;; State ID ;AN000;
400 DW G_KB+AT_KB+XT_KB ;; Keyboard Type ;AN000;
401 DB -1,-1 ;; Buffer entry for error character ;AN000;
402 ;; ;AN000;
403 DW COM_PAD_K1_T1_END-$ ;; Size of xlat table ;AN000;
404 DB STANDARD_TABLE ;; xlat options: ;AN000;
405 DB 1 ;; number of entries ;AN000;
406 DB 83,',' ;; decimal seperator = , ;AN000;
407 COM_PAD_K1_T1_END: ;; ;AN000;
408 ;; ;AN000;
409 DW 0 ;; Size of xlat table - null table ;AN000;
410 ;; ;AN000;
411 COM_PAD_K1_END: ;; ;AN000;
412 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
413 ;; CODE PAGE: Common ;AN000;
414 ;; STATE: Non-Alpha Lower Case ;AN000;
415 ;; KEYBOARD TYPES: G_KB+P12_KB ;AN000;
416 ;; TABLE TYPE: Translate ;AN000;
417 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
418 ;; ;AN000;
419 DW COM_NA_LO_K1_END-$ ;; length of state section ;AN000;
420 DB NON_ALPHA_LOWER ;; State ID ;AN000;
421 DW G_KB+P12_KB ;; Keyboard Type ;AN000;
422 DB -1,-1 ;; Buffer entry for error character ;AN000;
423 ;; ;AN000;
424 DW COM_NA_LO_K1_T1_END-$ ;; Size of xlat table ;AN000;
425 DB STANDARD_TABLE ;; xlat options: ;AN000;
426 DB 10 ;; number of entries ;AN000;
427 DB 41,"\" ;; \ ;AN000;
428 DB 12,"'" ;; ' ;AN000;
429 DB 13,141 ;; grave i - ¡; ;AN000;
430 DB 27,'+' ;; + ;AN000;
431 DB 86,'<' ;; < ;AN000;
432 DB 53,'-' ;; - ;AN000;
433 DB 39,149 ;; grave o - \95 ;AN000;
434 DB 40,133 ;; grave a - \85; ;AN000;
435 DB 43,151 ;; grave u - \97; ;AN000;
436 DB 26,138 ;; grave e - \8a; ;AN000;
437 COM_NA_LO_K1_T1_END: ;; ;AN000;
438 ;; ;AN000;
439 DW 0 ;; Size of xlat table - null table ;AN000;
440 ;; ;AN000;
441 COM_NA_LO_K1_END: ;; ;AN000;
442 ;; ;AN000;
443 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
444 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
445 ;; CODE PAGE: Common ;AN000;
446 ;; STATE: Non-Alpha Lower Case ;AN000;
447 ;; KEYBOARD TYPES: AT ;AN000;
448 ;; TABLE TYPE: Translate ;AN000;
449 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
450 ;; ;AN000;
451 DW COM_NA_LO_K2_END-$ ;; length of state section ;AN000;
452 DB NON_ALPHA_LOWER ;; State ID ;AN000;
453 DW AT_KB ;; Keyboard Type ;AN000;
454 DB -1,-1 ;; Buffer entry for error character ;AN000;
455 ;; ;AN000;
456 DW COM_NA_LO_K2_T1_END-$ ;; Size of xlat table ;AN000;
457 DB STANDARD_TABLE ;; xlat options: ;AN000;
458 DB 9 ;; number of entries ;AN000;
459 DB 41,"<" ;; < ;AN000;
460 DB 12,"'" ;; ' ;AN000;
461 DB 13,141 ;; grave i - ¡; ;AN000;
462 DB 27,'+' ;; + ;AN000;
463 DB 53,'-' ;; - ;AN000;
464 DB 39,149 ;; grave o - \95 ;AN000;
465 DB 40,133 ;; grave a - \85; ;AN000;
466 DB 43,151 ;; grave u - \97; ;AN000;
467 DB 26,138 ;; grave e - \8a; ;AN000;
468 COM_NA_LO_K2_T1_END: ;; ;AN000;
469 ;; ;AN000;
470 DW 0 ;; Size of xlat table - null table ;AN000;
471 ;; ;AN000;
472 COM_NA_LO_K2_END: ;; ;AN000;
473 ;; ;AN000;
474 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
475 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
476 ;; CODE PAGE: Common ;AN000;
477 ;; STATE: Non-Alpha Lower Case ;AN000;
478 ;; KEYBOARD TYPES: XT + ;AN000;
479 ;; TABLE TYPE: Translate ;AN000;
480 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
481 ;; ;AN000;
482 DW COM_NA_LO_K3_END-$ ;; length of state section ;AN000;
483 DB NON_ALPHA_LOWER ;; State ID ;AN000;
484 DW XT_KB ;; Keyboard Type ;AN000;
485 DB -1,-1 ;; Buffer entry for error character ;AN000;
486 ;; ;AN000;
487 DW COM_NA_LO_K3_T1_END-$ ;; Size of xlat table ;AN000;
488 DB STANDARD_TABLE ;; xlat options: ;AN000;
489 DB 9 ;; number of entries ;AN000;
490 DB 12,"'" ;; ' ;AN000;
491 DB 13,141 ;; grave i - ¡; ;AN000;
492 DB 27,'+' ;; + ;AN000;
493 DB 43,'<' ;; < ;AN000;
494 DB 53,'-' ;; - ;AN000;
495 DB 39,149 ;; grave o - \95 ;AN000;
496 DB 40,133 ;; grave a - \85; ;AN000;
497 DB 41,151 ;; grave u - \97; ;AN000;
498 DB 26,138 ;; grave e - \8a; ;AN000;
499 COM_NA_LO_K3_T1_END: ;; ;AN000;
500 ;; ;AN000;
501 DW 0 ;; Size of xlat table - null table ;AN000;
502 ;; ;AN000;
503 COM_NA_LO_K3_END: ;; ;AN000;
504 ;; ;AN000;
505 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
506 ;; CODE PAGE: Common ;AN000;
507 ;; STATE: Non-Alpha Upper Case ;AN000;
508 ;; KEYBOARD TYPES: G_KB+P12 ;AN000;
509 ;; TABLE TYPE: Translate ;AN000;
510 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
511 ;; ;AN000;
512 DW COM_NA_UP_K1_END-$ ;; length of state section ;AN000;
513 DB NON_ALPHA_UPPER ;; State ID ;AN000;
514 DW G_KB+P12_KB ;; Keyboard Type ;AN000;
515 DB -1,-1 ;; Buffer entry for error character ;AN000;
516 ;; ;AN000;
517 DW COM_NA_UP_K1_T1_END-$ ;; Size of xlat table ;AN000;
518 DB STANDARD_TABLE ;; xlat options: ;AN000;
519 DB 18 ;; number of entries ;AN000;
520 DB 41,07CH ;; Solid vertical bar - | ;AN000;
521 DB 3,'"' ;; ;AN000;
522 DB 4,'\9c' ;; ;AN000;
523 DB 7,'&' ;; ;AN000;
524 DB 8,'/' ;; ;AN000;
525 DB 9,'(' ;; ;AN000;
526 DB 10,')' ;; ;AN000;
527 DB 11,'=' ;; ;AN000;
528 DB 12,'?' ;; ;AN000;
529 DB 13,'^' ;; ;AN000;
530 DB 26,130 ;; acute e - \82; ;AN000;
531 DB 39,135 ;; c - cedilla - \87 ;AN000;
532 DB 27,'*' ;; ;AN000;
533 DB 40,0F8H ;; ø - degree symbol ;AN000;
534 DB 86,'>' ;; ;AN000;
535 DB 51,';' ;; ;AN000;
536 DB 52,':' ;; ;AN000;
537 DB 53,'_' ;; ;AN000;
538 ;; ;AN000;
539 COM_NA_UP_K1_T1_END: ;; ;AN000;
540 ;; ;AN000;
541 DW 0 ;; Size of xlat table - null table ;AN000;
542 ;; ;AN000;
543 COM_NA_UP_K1_END: ;; ;AN000;
544 ;; ;AN000;
545 ;; ;AN000;
546 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
547 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
548 ;; CODE PAGE: Common ;AN000;
549 ;; STATE: Non-Alpha Upper Case ;AN000;
550 ;; KEYBOARD TYPES: AT ;AN000;
551 ;; TABLE TYPE: Translate ;AN000;
552 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
553 ;; ;AN000;
554 DW COM_NA_UP_K2_END-$ ;; length of state section ;AN000;
555 DB NON_ALPHA_UPPER ;; State ID ;AN000;
556 DW AT_KB ;; Keyboard Type ;AN000;
557 DB -1,-1 ;; Buffer entry for error character ;AN000;
558 ;; ;AN000;
559 DW COM_NA_UP_K2_T1_END-$ ;; Size of xlat table ;AN000;
560 DB STANDARD_TABLE ;; xlat options: ;AN000;
561 DB 18 ;; number of entries ;AN000;
562 DB 41,'>' ;; > ;AN000;
563 DB 3,'"' ;; ;AN000;
564 DB 4,'\9c' ;; ;AN000;
565 DB 7,'&' ;; ;AN000;
566 DB 8,'/' ;; ;AN000;
567 DB 9,'(' ;; ;AN000;
568 DB 10,')' ;; ;AN000;
569 DB 11,'=' ;; ;AN000;
570 DB 12,'?' ;; ;AN000;
571 DB 13,'^' ;; ;AN000;
572 DB 26,130 ;; acute e - \82; ;AN000;
573 DB 39,'@' ;; @ AT sign replaces c - cedilla - \87 ;AN000;
574 DB 27,'*' ;; ;AN000;
575 DB 40,'#' ;; # sign replaces ø - degree symbol ;AN000;
576 DB 86,'>' ;; ;AN000;
577 DB 51,';' ;; ;AN000;
578 DB 52,':' ;; ;AN000;
579 DB 53,'_' ;; ;AN000;
580 ;; ;AN000;
581 COM_NA_UP_K2_T1_END: ;; ;AN000;
582 ;; ;AN000;
583 DW 0 ;; Size of xlat table - null table ;AN000;
584 ;; ;AN000;
585 COM_NA_UP_K2_END: ;; ;AN000;
586 ;; ;AN000;
587 ;; ;AN000;
588 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
589 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
590 ;; CODE PAGE: Common ;AN000;
591 ;; STATE: Non-Alpha Upper Case ;AN000;
592 ;; KEYBOARD TYPES: XT + ;AN000;
593 ;; TABLE TYPE: Translate ;AN000;
594 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
595 ;; ;AN000;
596 DW COM_NA_UP_K3_END-$ ;; length of state section ;AN000;
597 DB NON_ALPHA_UPPER ;; State ID ;AN000;
598 DW XT_KB ;; Keyboard Type ;AN000;
599 DB -1,-1 ;; Buffer entry for error character ;AN000;
600 ;; ;AN000;
601 DW COM_NA_UP_K3_T1_END-$ ;; Size of xlat table ;AN000;
602 DB STANDARD_TABLE ;; xlat options: ;AN000;
603 DB 17 ;; number of entries ;AN000;
604 DB 3,'"' ;; ;AN000;
605 DB 4,'\9c' ;; ;AN000;
606 DB 7,'&' ;; ;AN000;
607 DB 8,'/' ;; ;AN000;
608 DB 9,'(' ;; ;AN000;
609 DB 10,')' ;; ;AN000;
610 DB 11,'=' ;; ;AN000;
611 DB 12,'?' ;; ;AN000;
612 DB 13,'^' ;; ;AN000;
613 DB 26,130 ;; acute e - \82; ;AN000;
614 DB 39,'@' ;; @ AT sign replaces c - cedilla - \87 ;AN000;
615 DB 27,'*' ;; ;AN000;
616 DB 40,'#' ;; # sign replaces ø - degree symbol ;AN000;
617 DB 43,'>' ;; ;AN000;
618 DB 51,';' ;; ;AN000;
619 DB 52,':' ;; ;AN000;
620 DB 53,'_' ;; ;AN000;
621 ;; ;AN000;
622 COM_NA_UP_K3_T1_END: ;; ;AN000;
623 ;; ;AN000;
624 DW 0 ;; Size of xlat table - null table ;AN000;
625 ;; ;AN000;
626 COM_NA_UP_K3_END: ;; ;AN000;
627 ;; ;AN000;
628 ;; ;AN000;
629 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
630 ;; CODE PAGE: Common ;AN000;
631 ;; STATE: Third Shift ;AN000;
632 ;; KEYBOARD TYPES: G_KB ;AN000;
633 ;; TABLE TYPE: Translate ;AN000;
634 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
635 ;; ;AN000;
636 DW COM_THIRD_K1_END-$ ;; length of state section ;AN000;
637 DB THIRD_SHIFT ;; State ID ;AN000;
638 DW G_KB ;; Keyboard Type ;AN000;
639 DB -1,-1 ;; Buffer entry for error character ;AN000;
640 ;; ;AN000;
641 DW COM_THIRD_K1_T1_END-$ ;; Size of xlat table ;AN000;
642 DB STANDARD_TABLE ;; xlat options: ;AN000;
643 DB 8 ;; number of entries ;AN000;
644 DB 4,'#' ;; ;AN000;
645 DB 8,'{' ;; ;AN000;
646 DB 9,'[' ;; ;AN000;
647 DB 10,']' ;; ;AN000;
648 DB 11,'}' ;; ;AN000;
649 DB 16,'@' ;; ;AN000;
650 DB 27,'~' ;; ;AN000;
651 DB 43,"`" ;; grave symbol or closing single quote ;AN000;
652 COM_THIRD_K1_T1_END: ;; codepoint 60h ;AN000;
653 ;; ;AN000;
654 DW 0 ;; Last xlat table ;AN000;
655 COM_THIRD_K1_END: ;; ;AN000;
656 ;; ;AN000;
657 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
658 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
659 ;; CODE PAGE: Common ;AN000;
660 ;; STATE: Third Shift ;AN000;
661 ;; KEYBOARD TYPES: P12_KB ;AN000;
662 ;; TABLE TYPE: Translate ;AN000;
663 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
664 ;; ;AN000;
665 DW COM_THIRD_PK1_END-$ ;; length of state section ;AN000;
666 DB THIRD_SHIFT ;; State ID ;AN000;
667 DW P12_KB ;; Keyboard Type ;AN000;
668 DB -1,-1 ;; Buffer entry for error character ;AN000;
669 ;; ;AN000;
670 DW COM_THIRD_PK1_T1_END-$ ;; Size of xlat table ;AN000;
671 DB STANDARD_TABLE ;; xlat options: ;AN000;
672 DB 4 ;; number of entries ;AN000;
673 DB 26,'[' ;; ;AN000;
674 DB 27,']' ;; ;AN000;
675 DB 39,'@' ;; ;AN000;
676 DB 40,'#' ;; ;AN000;
677 COM_THIRD_PK1_T1_END: ;; ;AN000;
678 ;; ;AN000;
679 DW 0 ;; Last xlat table ;AN000;
680 COM_THIRD_PK1_END: ;; ;AN000;
681 ;; ;AN000;
682 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
683 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
684 ;; CODE PAGE: Common ;AN000;
685 ;; STATE: Third Shift ;AN000;
686 ;; KEYBOARD TYPES: AT ;AN000;
687 ;; TABLE TYPE: Translate ;AN000;
688 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
689 ;; ;AN000;
690 DW COM_THIRD_K2_END-$ ;; length of state section ;AN000;
691 DB THIRD_SHIFT ;; State ID ;AN000;
692 DW AT_KB ;; Keyboard Type ;AN000;
693 DB -1,-1 ;; Buffer entry for error character ;AN000;
694 ;; ;AN000;
695 DW COM_THIRD_K2_T1_END-$ ;; Size of xlat table ;AN000;
696 DB STANDARD_TABLE ;; xlat options: ;AN000;
697 DB 3 ;; number of entries ;AN000;
698 DB 41,'\' ;; ;AN000;
699 DB 26,'[' ;; ;AN000;
700 DB 27,']' ;; ;AN000;
701 COM_THIRD_K2_T1_END: ;; ;AN000;
702 ;; ;AN000;
703 DW 0 ;; Last xlat table ;AN000;
704 COM_THIRD_K2_END: ;; ;AN000;
705 ;; ;AN000;
706 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
707 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
708 ;; CODE PAGE: Common ;AN000;
709 ;; STATE: Third Shift ;AN000;
710 ;; KEYBOARD TYPES: XT + ;AN000;
711 ;; TABLE TYPE: Translate ;AN000;
712 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
713 ;; ;AN000;
714 DW COM_THIRD_K3_END-$ ;; length of state section ;AN000;
715 DB THIRD_SHIFT ;; State ID ;AN000;
716 DW XT_KB ;; Keyboard Type ;AN000;
717 DB -1,-1 ;; Buffer entry for error character ;AN000;
718 ;; ;AN000;
719 DW COM_THIRD_K3_T1_END-$ ;; Size of xlat table ;AN000;
720 DB STANDARD_TABLE ;; xlat options: ;AN000;
721 DB 3 ;; number of entries ;AN000;
722 DB 43,'\' ;; ;AN000;
723 DB 26,'[' ;; ;AN000;
724 DB 27,']' ;; ;AN000;
725 COM_THIRD_K3_T1_END: ;; ;AN000;
726 ;; ;AN000;
727 DW 0 ;; Last xlat table ;AN000;
728 COM_THIRD_K3_END: ;; ;AN000;
729 ;; ;AN000;
730 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
731 DW 0 ;; Last State ;AN000;
732 COMMON_XLAT_END: ;; ;AN000;
733 ;; ;AN000;
734 ;; ;AN000;
735 ;; ;AN000;
736 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
737 ;;*************************************** ;AN000;
738 ;; IT Specific Translate Section for 437 ;AN000;
739 ;; 437 IS COMPLETELY COVERED BY THE COMMON TABLE. ;AN000;
740 ;;*************************************** ;AN000;
741 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
742 ;; ;AN000;
743 PUBLIC IT1_437_XLAT ;; ;AN000;
744 IT1_437_XLAT: ;; ;AN000;
745 ;; ;AN000;
746 DW CP437_XLAT_END-$ ;; length of section ;AN000;
747 DW 437 ;; ;AN000;
748 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
749 ;; CODE PAGE: 437 ;AN000;
750 ;; STATE: Non-Alpha Upper case ;AN000;
751 ;; KEYBOARD TYPES: G_KB+P12+AT ;AN000;
752 ;; TABLE TYPE: Translate ;AN000;
753 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
754 ;; ;AN000;
755 DW CP437_NA_UP_K1_END-$ ;; length of state section ;AN000;
756 DB NON_ALPHA_UPPER ;; State ID ;AN000;
757 DW G_KB+P12_KB+AT_KB ;; Keyboard Type ;AN000;
758 DB -1,-1 ;; error character = standalone accent ;AN000;
759 ;; ;AN000;
760 DW CP437_NA_UP_T1_K1_END-$ ;; Size of xlat table ;AN000;
761 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options: ;AN000;
762 DB 1 ;; number of scans ;AN000;
763 DB 43,015H ;; Section symbol - \15 ;AN000;
764 CP437_NA_UP_T1_K1_END: ;; ;AN000;
765 ;; ;AN000;
766 DW 0 ;; Size of xlat table - null table ;AN000;
767 ;; ;AN000;
768 CP437_NA_UP_K1_END: ;; ;AN000;
769 ;; ;AN000;
770 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
771 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
772 ;; CODE PAGE: 437 ;AN000;
773 ;; STATE: Non-Alpha Upper case ;AN000;
774 ;; KEYBOARD TYPES: XT + ;AN000;
775 ;; TABLE TYPE: Translate ;AN000;
776 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
777 ;; ;AN000;
778 DW CP437_NA_UP_K2_END-$ ;; length of state section ;AN000;
779 DB NON_ALPHA_UPPER ;; State ID ;AN000;
780 DW XT_KB ;; Keyboard Type ;AN000;
781 DB -1,-1 ;; error character = standalone accent ;AN000;
782 ;; ;AN000;
783 DW CP437_NA_UP_T1_K2_END-$ ;; Size of xlat table ;AN000;
784 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options: ;AN000;
785 DB 1 ;; number of scans ;AN000;
786 DB 41,015H ;; Section symbol - \15 ;AN000;
787 CP437_NA_UP_T1_K2_END: ;; ;AN000;
788 ;; ;AN000;
789 DW 0 ;; Size of xlat table - null table ;AN000;
790 ;; ;AN000;
791 CP437_NA_UP_K2_END: ;; ;AN000;
792 ;; ;AN000;
793 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
794 DW 0 ;; LAST STATE ;AN000;
795 ;; ;AN000;
796 CP437_XLAT_END: ;; ;AN000;
797 ;; ;AN000;
798 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
799 ;;*************************************** ;AN000;
800 ;; IT Specific Translate Section for 850 ;AN000;
801 ;;*************************************** ;AN000;
802 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
803 ;; ;AN000;
804 PUBLIC IT1_850_XLAT ;; ;AN000;
805 IT1_850_XLAT: ;; ;AN000;
806 ;; ;AN000;
807 DW CP850_XLAT_END-$ ;; length of section ;AN000;
808 DW 850 ;; ;AN000;
809 ;; ;AN000;
810 ;; ;AN000;
811 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
812 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
813 ;; CODE PAGE: 850 ;AN000;
814 ;; STATE: Non-Alpha Upper case ;AN000;
815 ;; KEYBOARD TYPES: G_KB+P12+AT ;AN000;
816 ;; TABLE TYPE: Translate ;AN000;
817 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
818 ;; ;AN000;
819 DW CP850_NA_UP_K1_END-$ ;; length of state section ;AN000;
820 DB NON_ALPHA_UPPER ;; State ID ;AN000;
821 DW G_KB+P12_KB+AT_KB ;; Keyboard Type ;AN000;
822 DB -1,-1 ;; error character = standalone accent ;AN000;
823 ;; ;AN000;
824 DW CP850_NA_UP_T1_K1_END-$ ;; Size of xlat table ;AN000;
825 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options: ;AN000;
826 DB 1 ;; number of scans ;AN000;
827 DB 43,0F5H ;; Section symbol - \15 ;AN000;
828 CP850_NA_UP_T1_K1_END: ;; ;AN000;
829 ;; ;AN000;
830 DW 0 ;; Size of xlat table - null table ;AN000;
831 ;; ;AN000;
832 CP850_NA_UP_K1_END: ;; ;AN000;
833 ;; ;AN000;
834 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
835 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
836 ;; CODE PAGE: 850 ;AN000;
837 ;; STATE: Non-Alpha Upper case ;AN000;
838 ;; KEYBOARD TYPES: XT ;AN000;
839 ;; TABLE TYPE: Translate ;AN000;
840 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
841 ;; ;AN000;
842 DW CP850_NA_UP_K2_END-$ ;; length of state section ;AN000;
843 DB NON_ALPHA_UPPER ;; State ID ;AN000;
844 DW XT_KB ;; Keyboard Type ;AN000;
845 DB -1,-1 ;; error character = standalone accent ;AN000;
846 ;; ;AN000;
847 DW CP850_NA_UP_T1_K2_END-$ ;; Size of xlat table ;AN000;
848 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options: ;AN000;
849 DB 1 ;; number of scans ;AN000;
850 DB 41,0F5H ;; Section symbol - \15 ;AN000;
851 CP850_NA_UP_T1_K2_END: ;; ;AN000;
852 ;; ;AN000;
853 DW 0 ;; Size of xlat table - null table ;AN000;
854 ;; ;AN000;
855 CP850_NA_UP_K2_END: ;; ;AN000;
856 ;; ;AN000;
857 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
858 DW 0 ;; LAST STATE ;AN000;
859 ;; ;AN000;
860 CP850_XLAT_END: ;; ;AN000;
861 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;AN000;
862 ;; ;AN000;
863 CODE ENDS ;; ;AN000;
864 END ;; ;AN000;
The original sources of MS-DOS 1.25, 2.0, and 4.0 for reference purposes