]> wirehaze git hosting - MS-DOS.git/blob - v4.0/src/DEV/KEYBOARD/KDFNL.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 / KDFNL.ASM
1 ;; LATEST CHANGE ALT & CTL
2 PAGE ,132
3 TITLE DOS - Keyboard Definition File
4
5 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
6 ;; DOS - - NLS Support - Keyboard Defintion File
7 ;; (c) Copyright 1988 Microsoft
8 ;;
9 ;; This file contains the keyboard tables for Netherlands
10 ;;
11 ;; Linkage Instructions:
12 ;; Refer to KDF.ASM.
13 ;;
14 ;; Modded from Belgian - DTF 20-Aug-86; 08-Sep-86
15 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
16 ;;
17 INCLUDE KEYBSHAR.INC ;;
18 INCLUDE POSTEQU.INC ;;
19 INCLUDE KEYBMAC.INC ;;
20 ;;
21 PUBLIC NL_LOGIC ;;
22 PUBLIC NL_437_XLAT ;;
23 PUBLIC NL_850_XLAT ;;
24 ;;
25 CODE SEGMENT PUBLIC 'CODE' ;;
26 ASSUME CS:CODE,DS:CODE ;;
27 ;;
28 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
29 ;; Standard translate table options are a liner search table
30 ;; (TYPE_2_TAB) and ASCII entries ONLY (ASCII_ONLY)
31 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
32 ;;
33 STANDARD_TABLE EQU TYPE_2_TAB+ASCII_ONLY
34 ;;
35 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
36 ;;***************************************
37 ;; NL State Logic
38 ;;***************************************
39 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
40 ;;
41 ;;
42 NL_LOGIC:
43
44 DW LOGIC_END-$ ;; length
45 ;;
46 DW 0 ;; special features
47 ;;
48 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; COMMANDS START HERE
49 ;;
50 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
51 ;; OPTIONS: If we find a scan match in
52 ;; an XLATT or SET_FLAG operation then
53 ;; exit from INT 9.
54 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
55 ;;
56 OPTION EXIT_IF_FOUND ;;
57 ;;
58 ;;
59 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
60 ;; Dead key definitions must come before
61 ;; dead key translations to handle
62 ;; dead key + dead key.
63 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
64 ;;
65 IFF EITHER_CTL,NOT ;;
66 IFF EITHER_ALT,NOT ;;
67 IFF EITHER_SHIFT ;;
68 SET_FLAG DEAD_UPPER ;;
69 ELSEF ;;
70 SET_FLAG DEAD_LOWER ;;
71 ENDIFF ;;
72 ELSEF ;;
73 IFKBD G_KB+P12_KB ;; For ENHANCED keyboard some
74 ANDF R_ALT_SHIFT ;; dead keys are on third shift
75 ANDF EITHER_SHIFT,NOT ;; which is accessed via the altgr key
76 SET_FLAG DEAD_THIRD ;;
77 ENDIFF ;;
78 ENDIFF ;;
79 ENDIFF ;;
80 ;;
81 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
82 ;; ACUTE ACCENT TRANSLATIONS
83 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
84 ;;
85 ACUTE_PROC: ;;
86 ;;
87 IFF ACUTE,NOT ;;
88 GOTO CEDILLA_PROC ;;
89 ENDIFF ;;
90 ;;
91 RESET_NLS ;;
92 IFF R_ALT_SHIFT,NOT ;;
93 XLATT ACUTE_SPACE ;;
94 ENDIFF ;;
95 IFF EITHER_CTL,NOT ;;
96 ANDF EITHER_ALT,NOT ;;
97 IFF EITHER_SHIFT ;;
98 IFF CAPS_STATE ;;
99 XLATT ACUTE_LOWER ;;
100 ELSEF ;;
101 XLATT ACUTE_UPPER ;;
102 ENDIFF ;;
103 ELSEF ;;
104 IFF CAPS_STATE ;;
105 XLATT ACUTE_UPPER ;;
106 ELSEF ;;
107 XLATT ACUTE_LOWER ;;
108 ENDIFF ;;
109 ENDIFF ;;
110 ENDIFF ;;
111 ;;
112 INVALID_ACUTE: ;;
113 PUT_ERROR_CHAR ACUTE_SPACE ;; If we get here then either the XLATT
114 BEEP ;; failed or we are ina bad shift state.
115 GOTO NON_DEAD ;; Either is invalid so BEEP and fall
116 ;; through to generate the second char.
117 ;; Note that the dead key flag will be
118 ;; reset before we get here.
119 ;;
120 ;;
121 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
122 ;; CEDILLA ACCENT TRANSLATIONS
123 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
124 ;;
125 CEDILLA_PROC: ;;
126 ;;
127 IFF CEDILLA,NOT ;;
128 GOTO TILDE_PROC ;;
129 ENDIFF ;;
130 ;;
131 RESET_NLS ;;
132 IFF R_ALT_SHIFT,NOT ;;
133 XLATT CEDILLA_SPACE ;;
134 ENDIFF ;;
135 IFF EITHER_CTL,NOT ;;
136 ANDF EITHER_ALT,NOT ;;
137 IFF EITHER_SHIFT ;;
138 IFF CAPS_STATE ;;
139 XLATT CEDILLA_LOWER ;;
140 ELSEF ;;
141 XLATT CEDILLA_UPPER ;;
142 ENDIFF ;;
143 ELSEF ;;
144 IFF CAPS_STATE ;;
145 XLATT CEDILLA_UPPER ;;
146 ELSEF ;;
147 XLATT CEDILLA_LOWER ;;
148 ENDIFF ;;
149 ENDIFF ;;
150 ENDIFF ;;
151 ;;
152 INVALID_CEDILLA: ;;
153 PUT_ERROR_CHAR CEDILLA_SPACE ;; If we get here then either the XLATT
154 BEEP ;; failed or we are ina bad shift state.
155 GOTO NON_DEAD ;; Either is invalid so BEEP and fall
156 ;; through to generate the second char.
157 ;; Note that the dead key flag will be
158 ;; reset before we get here.
159 ;;
160 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
161 ;; TILDE ACCENT TRANSLATIONS
162 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
163 ;;
164 TILDE_PROC: ;;
165 ;;
166 IFF TILDE,NOT ;;
167 GOTO DIARESIS_PROC ;;
168 ENDIFF ;;
169 ;;
170 RESET_NLS ;;
171 IFF R_ALT_SHIFT,NOT ;;
172 XLATT TILDE_SPACE ;;
173 ENDIFF ;;
174 IFF EITHER_CTL,NOT ;;
175 ANDF EITHER_ALT,NOT ;;
176 IFF EITHER_SHIFT ;;
177 IFF CAPS_STATE ;;
178 XLATT TILDE_LOWER ;;
179 ELSEF ;;
180 XLATT TILDE_UPPER ;;
181 ENDIFF ;;
182 ELSEF ;;
183 IFF CAPS_STATE,NOT ;;
184 XLATT TILDE_LOWER ;;
185 ELSEF ;;
186 XLATT TILDE_UPPER ;;
187 ENDIFF ;;
188 ENDIFF ;;
189 ENDIFF ;;
190 ;;
191 INVALID_TILDE: ;;
192 PUT_ERROR_CHAR TILDE_SPACE ;; standalone accent
193 BEEP ;; Invalid dead key combo.
194 GOTO NON_DEAD ;;
195 ;;
196 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
197 ;; DIARESIS ACCENT TRANSLATIONS
198 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
199 ;;
200 DIARESIS_PROC: ;;
201 ;;
202 IFF DIARESIS,NOT ;;
203 GOTO GRAVE_PROC ;;
204 ENDIFF ;;
205 ;;
206 RESET_NLS ;;
207 IFF R_ALT_SHIFT,NOT ;;
208 XLATT DIARESIS_SPACE ;; exist for 437 so beep for
209 ENDIFF ;;
210 IFF EITHER_CTL,NOT ;;
211 ANDF EITHER_ALT,NOT ;;
212 IFF EITHER_SHIFT ;;
213 IFF CAPS_STATE ;;
214 XLATT DIARESIS_LOWER ;;
215 ELSEF ;;
216 XLATT DIARESIS_UPPER ;;
217 ENDIFF ;;
218 ELSEF ;;
219 IFF CAPS_STATE ;;
220 XLATT DIARESIS_UPPER ;;
221 ELSEF ;;
222 XLATT DIARESIS_LOWER ;;
223 ENDIFF ;;
224 ENDIFF ;;
225 ENDIFF ;;
226 ;;
227 INVALID_DIARESIS: ;;
228 PUT_ERROR_CHAR DIARESIS_SPACE ;; standalone accent
229 BEEP ;; Invalid dead key combo.
230 GOTO NON_DEAD ;;
231 ;;
232 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
233 ;; GRAVE ACCENT TRANSLATIONS
234 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
235 ;;
236 GRAVE_PROC: ;;
237 ;;
238 IFF GRAVE,NOT ;;
239 GOTO CIRCUMFLEX_PROC ;;
240 ENDIFF ;;
241 ;;
242 RESET_NLS ;;
243 IFF R_ALT_SHIFT,NOT ;;
244 XLATT GRAVE_SPACE ;;
245 ENDIFF ;;
246 IFF EITHER_CTL,NOT ;;
247 ANDF EITHER_ALT,NOT ;;
248 IFF EITHER_SHIFT ;;
249 IFF CAPS_STATE ;;
250 XLATT GRAVE_LOWER ;;
251 ELSEF ;;
252 XLATT GRAVE_UPPER ;;
253 ENDIFF ;;
254 ELSEF ;;
255 IFF CAPS_STATE,NOT ;;
256 XLATT GRAVE_LOWER ;;
257 ELSEF ;;
258 XLATT GRAVE_UPPER ;;
259 ENDIFF ;;
260 ENDIFF ;;
261 ENDIFF ;;
262 ;;
263 INVALID_GRAVE: ;;
264 PUT_ERROR_CHAR GRAVE_SPACE ;; standalone accent
265 BEEP ;; Invalid dead key combo.
266 GOTO NON_DEAD ;;
267 ;;
268 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
269 ;; CIRCUMFLEX ACCENT TRANSLATIONS
270 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
271 ;;
272 CIRCUMFLEX_PROC: ;;
273 ;;
274 IFF CIRCUMFLEX,NOT ;;
275 GOTO NON_DEAD ;;
276 ENDIFF ;;
277 ;;
278 RESET_NLS ;;
279 IFF R_ALT_SHIFT,NOT ;;
280 XLATT CIRCUMFLEX_SPACE ;;
281 ENDIFF ;;
282 IFF EITHER_CTL,NOT ;;
283 ANDF EITHER_ALT,NOT ;;
284 IFF EITHER_SHIFT ;;
285 IFF CAPS_STATE ;;
286 XLATT CIRCUMFLEX_LOWER ;;
287 ELSEF ;;
288 XLATT CIRCUMFLEX_UPPER ;;
289 ENDIFF ;;
290 ELSEF ;;
291 IFF CAPS_STATE,NOT ;;
292 XLATT CIRCUMFLEX_LOWER ;;
293 ELSEF ;;
294 XLATT CIRCUMFLEX_UPPER ;;
295 ENDIFF ;;
296 ENDIFF ;;
297 ENDIFF ;;
298 ;;
299 INVALID_CIRCUMFLEX: ;;
300 PUT_ERROR_CHAR CIRCUMFLEX_SPACE ;; standalone accent
301 BEEP ;; Invalid dead key combo.
302 GOTO NON_DEAD ;;
303 ;;
304 ;;
305 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
306 ;; Upper, lower and third shifts
307 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
308 NON_DEAD: ;;
309 ;;
310 IFKBD G_KB+P12_KB ;; Avoid accidentally translating
311 ANDF LC_E0 ;; the "/" on the numeric pad of the
312 EXIT_STATE_LOGIC ;; G keyboard
313 ENDIFF ;;
314 ;;
315 ;;***BD ADDED FOR ALT, CTRL CASES ;;
316 ;;***MJS Added because of diferences ;;
317 ;;between KYB Types ;;
318 ;;
319 IFKBD AT_KB+XT_KB ;;
320 IFF EITHER_CTL,NOT ;;
321 IFF ALT_SHIFT ;; ALT - case
322 XLATT ALT_CASE ;;
323 ENDIFF ;;
324 ELSEF ;;
325 IFF EITHER_ALT,NOT ;; CTRL - case
326 XLATT CTRL_CASE ;;
327 ENDIFF ;;
328 ENDIFF ;;
329 ENDIFF ;;
330 ;;
331 ;;***MJS repeated for G, P12 ;;
332 IFKBD G_KB+P12_KB ;;
333 IFF EITHER_CTL,NOT ;;
334 ANDF ALT_SHIFT ;;
335 ANDF R_ALT_SHIFT,NOT ;;
336 XLATT ALT_CASE ;;
337 ENDIFF ;;
338 IFF EITHER_CTL ;;
339 ANDF ALT_SHIFT ;; ALT - case
340 ANDF R_ALT_SHIFT,NOT ;;
341 XLATT ALT_CASE ;;
342 ENDIFF ;;
343 IFF EITHER_CTL ;;
344 ANDF EITHER_ALT,NOT ;; CTRL - case
345 XLATT CTRL_CASE ;;
346 ENDIFF ;;
347 ENDIFF ;;
348 ;;***BD END OF ADDITION
349 IFF EITHER_CTL,NOT ;; Lower and upper case. Alphabetic
350 IFF EITHER_ALT,NOT ;; keys are affected by CAPS LOCK.
351 IFF EITHER_SHIFT ;; Numeric keys are not.
352 ;;***BD ADDED FOR NUMERIC PAD
353 IFF NUM_STATE,NOT ;;
354 XLATT NUMERIC_PAD ;;
355 ENDIFF ;;
356 ;;***BD END OF ADDITION
357 XLATT NON_ALPHA_UPPER ;;
358 IFF CAPS_STATE ;;
359 XLATT ALPHA_LOWER ;;
360 ELSEF ;;
361 XLATT ALPHA_UPPER ;;
362 ENDIFF ;;
363 ELSEF ;;
364 ;;***BD ADDED FOR NUMERIC PAD
365 IFF NUM_STATE ;;
366 XLATT NUMERIC_PAD ;;
367 ENDIFF ;;
368 ;;***BD END OF ADDITION
369 XLATT NON_ALPHA_LOWER ;;
370 IFF CAPS_STATE ;;
371 XLATT ALPHA_UPPER ;;
372 ELSEF ;;
373 XLATT ALPHA_LOWER ;;
374 ENDIFF ;;
375 ENDIFF ;; Third and Fourth shifts
376 ELSEF ;; ctl off, alt on at this point
377 IFKBD XT_KB+AT_KB ;; XT, AT, keyboards. Nordics
378 IFF EITHER_SHIFT ;; only.
379 XLATT FOURTH_SHIFT ;; ALT + shift
380 ELSEF ;;
381 XLATT THIRD_SHIFT ;; ALT
382 ENDIFF ;;
383 ELSEF ;; ENHANCED keyboard
384 IFF R_ALT_SHIFT ;; ALTGr
385 ANDF EITHER_SHIFT,NOT ;;
386 XLATT THIRD_SHIFT ;;
387 ENDIFF ;;
388 ENDIFF ;;
389 ENDIFF ;;
390 ENDIFF ;;
391 ;;
392 EXIT_STATE_LOGIC ;;
393 ;;
394 LOGIC_END: ;;
395 ;;
396 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
397 ;;***************************************
398 ;; NL Common Translate Section
399 ;; This section contains translations for the lower 128 characters
400 ;; only since these will never change from code page to code page.
401 ;; In addition the dead key "Set Flag" tables are here since the
402 ;; dead keys are on the same keytops for all code pages.
403 ;;***************************************
404 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
405 ;;
406 PUBLIC NL_COMMON_XLAT ;;
407 NL_COMMON_XLAT: ;;
408 ;;
409 DW COMMON_XLAT_END-$ ;; length of section
410 DW -1 ;; code page
411 ;;
412 ;;
413 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
414 ;; CODE PAGE: Common
415 ;; STATE: Lower Shift Dead Key
416 ;; KEYBOARD TYPES : G_KB + P12_KB
417 ;; TABLE TYPE: Flag Table
418 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
419 ;;
420 DW COM_DK_LO_END-$ ;; length of state section
421 DB DEAD_LOWER ;; State ID
422 DW G_KB + P12_KB ;; Keyboard Type
423 DB -1,-1 ;; Buffer entry for error character
424 ;; Set Flag Table
425 DW 2 ;; number of entries
426 DB 26 ;; scan code
427 FLAG DIARESIS ;; flag bit to set
428 DB 40 ;;
429 FLAG ACUTE ;;
430 ;;
431 ;;
432 COM_DK_LO_END: ;;
433 ;;
434 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
435 ;; CODE PAGE: Common
436 ;; STATE: Upper Shift Dead Key
437 ;; KEYBOARD TYPES : G_KB + P12_KB
438 ;; TABLE TYPE: Flag Table
439 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
440 ;;
441 DW COM_DK_UP_END-$ ;; length of state section
442 DB DEAD_UPPER ;; State ID
443 DW G_KB + P12_KB ;; Keyboard Type
444 DB -1,-1 ;; Buffer entry for error character
445 ;; Set Flag Table
446 DW 3 ;; number of entries
447 DB 26 ;; scan code
448 FLAG CIRCUMFLEX ;; flag bit to set
449 DB 40 ;;
450 FLAG GRAVE ;;
451 DB 13 ;;
452 FLAG TILDE ;;
453 ;;
454 COM_DK_UP_END: ;;
455 ;;
456 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
457 ;; CODE PAGE: Common
458 ;; STATE: Third Shift Dead Key
459 ;; KEYBOARD TYPES : G_KB + P12_KB
460 ;; TABLE TYPE: Flag Table
461 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
462 ;;
463 DW COM_DK_TH_END-$ ;; length of state section
464 DB DEAD_THIRD ;; State ID
465 DW G_KB + P12_KB ;; Keyboard Type
466 DB -1,-1 ;; Buffer entry for error character
467 ;; Set Flag Table
468 DW 1 ;; number of entries
469 DB 13 ;;
470 FLAG CEDILLA ;;
471 ;;
472 COM_DK_TH_END: ;;
473 ;;
474 ;;
475 ;;
476 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
477 ;; CODE PAGE: Common
478 ;; STATE: Alpha Lower Case
479 ;; KEYBOARD TYPES : G_KB + P12_KB
480 ;; TABLE TYPE: Translate
481 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
482 ;;
483 ; DW COM_AL_LO_END-$ ;; length of state section
484 ; DB ALPHA_LOWER ;; State ID
485 ; DW G_KB + P12_KB ;; Keyboard Type
486 ; DB -1,-1 ;; Buffer entry for error character
487 ;;
488 ; DW COM_AL_LO_T1_END-$ ;; Size of xlat table
489 ; DB STANDARD_TABLE ;; xlat options:
490 ; DB 0 ;; number of entries
491 ;COM_AL_LO_T1_END: ;;
492 ;;
493 ; DW 0 ;; Size of xlat table - null table
494 ;;
495 ;COM_AL_LO_END: ;;
496 ;;
497 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
498 ;; CODE PAGE: Common
499 ;; STATE: Alpha Upper Case
500 ;; KEYBOARD TYPES : G_KB + P12_KB
501 ;; TABLE TYPE: Translate
502 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
503 ; ;;
504 ; DW COM_AL_UP_END-$ ;; length of state section
505 ; DB ALPHA_UPPER ;; State ID
506 ; DW G_KB + P12_KB ;; Keyboard Type
507 ; DB -1,-1 ;; Buffer entry for error character
508 ;;
509 ; DW COM_AL_UP_T1_END-$ ;; Size of xlat table
510 ; DB STANDARD_TABLE ;; xlat options:
511 ; DB 0 ;; number of entries
512 ;COM_AL_UP_T1_END: ;;
513 ; ;;
514 ; DW 0 ;; Size of xlat table - null table
515 ;;
516 ;COM_AL_UP_END: ;;
517 ;;
518 ;;
519 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
520 ;; CODE PAGE: Common
521 ;; STATE: Non-Alpha Lower Case
522 ;; KEYBOARD TYPES : G_KB + P12_KB
523 ;; TABLE TYPE: Translate
524 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
525 ;;
526 DW COM_NA_LO_END-$ ;; length of state section
527 DB NON_ALPHA_LOWER ;; State ID
528 DW G_KB + P12_KB ;; Keyboard Type
529 DB -1,-1 ;; Buffer entry for error character
530 ;;
531 DW COM_NA_LO_T1_END-$ ;; Size of xlat table
532 DB STANDARD_TABLE ;; xlat options:
533 DB 10 ;; number of entries
534 DB 41,"@" ;; at sign
535 DB 12,"/" ;;
536 DB 13,0F8H ;;
537 DB 27,"*" ;;
538 DB 39,'+' ;;
539 DB 43,'<' ;;
540 DB 51,',' ;;
541 DB 52,'.' ;;
542 DB 53,'-' ;;
543 DB 86,']'
544 COM_NA_LO_T1_END: ;;
545 ;;
546 DW 0 ;; Size of xlat table - null table
547 ;;
548 COM_NA_LO_END: ;;
549 ;;
550 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
551 ;; CODE PAGE: Common
552 ;; STATE: Non-Alpha Upper Case
553 ;; KEYBOARD TYPES : G_KB + P12_KB
554 ;; TABLE TYPE: Translate
555 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
556 ;;
557 DW COM_NA_UP_END-$ ;; length of state section
558 DB NON_ALPHA_UPPER ;; State ID
559 DW G_KB + P12_KB ;; Keyboard Type
560 DB -1,-1 ;; Buffer entry for error character
561 ;;
562 DW COM_NA_UP_T1_END-$ ;; Size of xlat table
563 DB STANDARD_TABLE ;; xlat options:
564 DB 17 ;; number of entries
565 DB 2,'!' ;;
566 DB 3,'"' ;;
567 DB 4,'#' ;;
568 DB 5,'$' ;;
569 DB 6,'%' ;;
570 DB 7,'&' ;;
571 DB 8,'_' ;;
572 DB 9,'(' ;;
573 DB 10,')' ;;
574 DB 11,"'" ;;
575 DB 12,'?' ;;
576 DB 39,0F1H ;;
577 DB 43,'>' ;;
578 DB 51,';' ;;
579 DB 52,':' ;;
580 DB 53,'=' ;;
581 DB 86,'['
582 COM_NA_UP_T1_END: ;;
583 ;;
584 DW 0 ;; Size of xlat table - null table
585 ;;
586 COM_NA_UP_END: ;;
587 ;;
588 ;;
589 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
590 ;; CODE PAGE: Common
591 ;; STATE: Third Shift
592 ;; KEYBOARD TYPES : G_KB + P12_KB
593 ;; TABLE TYPE: Translate
594 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
595 ;;
596 DW COM_THIRD_END-$ ;; length of state section
597 DB THIRD_SHIFT ;; State ID
598 DW G_KB + P12_KB ;; Keyboard Type
599 DB -1,-1 ;; Buffer entry for error character
600 ;;
601 DW COM_THIRD_T1_END-$ ;; Size of xlat table
602 DB STANDARD_TABLE ;; xlat options:
603 DB 16 ;; number of entries
604 DB 41,0AAH ;;
605 DB 2,0FBH ;;
606 DB 3,0FDH ;;
607 DB 4,0FCH ;;
608 DB 5,0ACH ;;
609 DB 6,0ABH ;;
610 DB 7,0F3H ;;
611 DB 8,9CH ;;
612 DB 9,'{' ;;
613 DB 10,'}' ;;
614 DB 12,5CH ;;
615 DB 31,0E1H ;;
616 DB 44,0AEH ;;
617 DB 45,0AFH ;;
618 ; DB 46,9BH ;; special case
619 DB 50,0E6H ;; mu character
620 DB 52,0FAH ;;
621 COM_THIRD_T1_END: ;;
622 ;;
623 DW 0 ;; Last xlat table
624 COM_THIRD_END: ;;
625 ;;
626 ;;******************************
627 ;;***BD - ADDED FOR NUMERIC PAD (DECIMAL SEPERATOR)
628 ;;******************************
629 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
630 ;; CODE PAGE: Common
631 ;; STATE: Numeric Key Pad
632 ;; KEYBOARD TYPES : G_KB (P12 change does not apply)
633 ;; TABLE TYPE: Translate
634 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
635 ;;
636 DW COM_PAD_K1_END-$ ;; length of state section
637 DB NUMERIC_PAD ;; State ID
638 DW G_KB ;; Keyboard Type
639 DB -1,-1 ;; Buffer entry for error character
640 ;;
641 DW COM_PAD_K1_T1_END-$ ;; Size of xlat table
642 DB STANDARD_TABLE ;; xlat options:
643 DB 1 ;; number of entries
644 DB 83,',' ;; decimal seperator = ,
645 COM_PAD_K1_T1_END: ;;
646 ;;
647 DW 0 ;; Size of xlat table - null table
648 ;;
649 COM_PAD_K1_END: ;;
650 ;;
651 ;;******************************
652 ;;***BD - ADDED FOR ALT CASE
653 ;;******************************
654 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
655 ;; CODE PAGE: Common
656 ;; STATE: Alt Case
657 ;; KEYBOARD TYPES: G, P12
658 ;; TABLE TYPE: Translate
659 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
660 ;;
661 DW COM_ALT_K1_END-$ ;; length of state section
662 DB ALT_CASE ;; State ID
663 DW G_KB+P12_KB ;; Keyboard Type
664 DB -1,-1 ;; Buffer entry for error character
665 ;;
666 DW COM_ALT_K1_T1_END-$ ;; Size of xlat table
667 DB TYPE_2_TAB ;; xlat options:
668 DB 0 ;; 2 number of entries
669 ; DB 12,-1,-1 ;;
670 ; DB 53,0,82H ;;
671 COM_ALT_K1_T1_END: ;;
672 ;;
673 DW 0 ;; Size of xlat table - null table
674 ;;
675 COM_ALT_K1_END: ;;
676 ;;
677 ;;******************************
678 ;;***BD - ADDED FOR CTRL CASE
679 ;;******************************
680 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
681 ;; CODE PAGE: Common
682 ;; STATE: Ctrl Case
683 ;; KEYBOARD TYPES : G_KB + P12_KB
684 ;; TABLE TYPE: Translate
685 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
686 ;;
687 DW COM_CTRL_K1_END-$ ;; length of state section
688 DB CTRL_CASE ;; State ID
689 DW G_KB + P12_KB ;; Keyboard Type
690 DB -1,-1 ;; Buffer entry for error character
691 ;;
692 DW COM_CTRL_K1_T1_END-$ ;; Size of xlat table
693 DB TYPE_2_TAB ;; xlat options:
694 DB 5 ;; number of entries
695 DB 12,-1,-1 ;;
696 DB 26,-1,-1 ;;
697 DB 27,-1,-1 ;;
698 DB 43,-1,-1 ;;
699 DB 53,01FH,35h ;;
700 COM_CTRL_K1_T1_END: ;;
701 ;;
702 DW 0 ;; Size of xlat table - null table
703 ;;
704 COM_CTRL_K1_END: ;;
705 ;;
706 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
707 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
708 ;; CODE PAGE: Common
709 ;; STATE: Grave Lower
710 ;; KEYBOARD TYPES : G_KB + P12_KB
711 ;; TABLE TYPE: Translate
712 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
713 ;;
714 DW COM_GR_LO_END-$ ;; length of state section
715 DB GRAVE_LOWER ;; State ID
716 DW G_KB + P12_KB ;; Keyboard Type
717 DB 60H,0 ;; error character = standalone accent
718 ;;
719 DW COM_GR_LO_T1_END-$ ;; Size of xlat table
720 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
721 DB 5 ;; number of scans
722 DB 18,'\8a' ;; scan code,ASCII - e
723 DB 30,'\85' ;; scan code,ASCII - a
724 DB 24,'\95' ;; scan code,ASCII - o
725 DB 22,'\97' ;; scan code,ASCII - u
726 DB 23,'\8d' ;; scan code,ASCII - i
727 COM_GR_LO_T1_END: ;;
728 ;;
729 DW 0 ;; Size of xlat table - null table
730 ;;
731 COM_GR_LO_END: ;; length of state section
732 ;;
733 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
734 ;; CODE PAGE: Common
735 ;; STATE: Grave Upper Case
736 ;; KEYBOARD TYPES : G_KB + P12_KB
737 ;; TABLE TYPE: Translate
738 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
739 ;;
740 DW COM_GR_UP_END-$ ;; length of state section
741 DB GRAVE_UPPER ;; State ID
742 DW G_KB + P12_KB ;; Keyboard Type
743 DB 60H,0 ;; error character = standalone accent
744 ;;
745 DW COM_GR_UP_T1_END-$ ;; Size of xlat table
746 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
747 DB 0 ;; number of scans
748 COM_GR_UP_T1_END: ;;
749 ;;
750 DW 0 ;; Size of xlat table - null table
751 ;;
752 COM_GR_UP_END: ;; length of state section
753 ;;
754 ;;
755 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
756 ;; CODE PAGE: Common
757 ;; STATE: Grave Space Bar
758 ;; KEYBOARD TYPES : G_KB + P12_KB
759 ;; TABLE TYPE: Translate
760 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
761 ;;
762 DW COM_GR_SP_END-$ ;; length of state section
763 DB GRAVE_SPACE ;; State ID
764 DW G_KB + P12_KB ;; Keyboard Type
765 DB 60H,0 ;; error character = standalone accent
766 ;;
767 DW COM_GR_SP_T1_END-$ ;; Size of xlat table
768 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
769 DB 1 ;; number of scans
770 DB 57,60H ;; STANDALONE GRAVE
771 COM_GR_SP_T1_END: ;;
772 ;;
773 DW 0 ;; Size of xlat table - null table
774 ;;
775 COM_GR_SP_END: ;; length of state section
776 ;;
777 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
778 ;; CODE PAGE: Common
779 ;; STATE: Circumflex Lower
780 ;; KEYBOARD TYPES : G_KB + P12_KB
781 ;; TABLE TYPE: Translate
782 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
783 ;;
784 DW COM_CI_LO_END-$ ;; length of state section
785 DB CIRCUMFLEX_LOWER ;; State ID
786 DW G_KB + P12_KB ;; Keyboard Type
787 DB 5EH,0 ;; error character = standalone accent
788 ;;
789 DW COM_CI_LO_T1_END-$ ;; Size of xlat table
790 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
791 DB 5 ;; number of scans
792 DB 30,'\83' ;; scan code,ASCII - a
793 DB 18,'\88' ;; scan code,ASCII - e
794 DB 24,'\93' ;; scan code,ASCII - o
795 DB 22,'\96' ;; scan code,ASCII - u
796 DB 23,'\8c' ;; scan code,ASCII - i
797 COM_CI_LO_T1_END: ;;
798 ;;
799 DW 0 ;;
800 ;;
801 COM_CI_LO_END: ;;
802 ;;
803 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
804 ;; CODE PAGE: Common
805 ;; STATE: Circumflex Upper
806 ;; KEYBOARD TYPES : G_KB + P12_KB
807 ;; TABLE TYPE: Translate
808 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
809 ;;
810 DW COM_CI_UP_END-$ ;; length of state section
811 DB CIRCUMFLEX_UPPER ;; State ID
812 DW G_KB + P12_KB ;; Keyboard Type
813 DB 5EH,0 ;; error character = standalone accent
814 ;;
815 DW COM_CI_UP_T1_END-$ ;; Size of xlat table
816 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
817 DB 0 ;; number of scans
818 COM_CI_UP_T1_END: ;;
819 ;;
820 DW 0 ;;
821 ;;
822 COM_CI_UP_END: ;;
823 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
824 ;; CODE PAGE: Common
825 ;; STATE: Circumflex Space Bar
826 ;; KEYBOARD TYPES : G_KB + P12_KB
827 ;; TABLE TYPE: Translate
828 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
829 ;;
830 DW COM_CI_SP_END-$ ;; length of state section
831 DB CIRCUMFLEX_SPACE ;; State ID
832 DW G_KB + P12_KB ;; Keyboard Type
833 DB 5EH,0 ;; error character = standalone accent
834 ;;
835 DW COM_CI_SP_T1_END-$ ;; Size of xlat table
836 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
837 DB 1 ;; number of scans
838 DB 57,5EH ;; STANDALONE CIRCUMFLEX
839 COM_CI_SP_T1_END: ;;
840 ;;
841 DW 0 ;; Size of xlat table - null table
842 ;;
843 COM_CI_SP_END: ;; length of state section
844 ;;
845 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
846 ;; CODE PAGE: Common
847 ;; STATE: Tilde Space Bar
848 ;; KEYBOARD TYPES : G_KB + P12_KB
849 ;; TABLE TYPE: Translate
850 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
851 ;;
852 DW COM_TI_SP_END-$ ;; length of state section
853 DB TILDE_SPACE ;; State ID
854 DW G_KB + P12_KB ;; Keyboard Type
855 DB 7EH,0 ;; error character = standalone accent
856 ;;
857 DW COM_TI_SP_T1_END-$ ;; Size of xlat table
858 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
859 DB 1 ;; number of scans
860 DB 57,7EH ;; STANDALONE TIDLE
861 COM_TI_SP_T1_END: ;;
862 ;;
863 DW 0 ;; Size of xlat table - null table
864 ;;
865 COM_TI_SP_END: ;; length of state section
866 ;;
867 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
868 ;; CODE PAGE: Common
869 ;; STATE: Cedilla lower
870 ;; KEYBOARD TYPES : G_KB + P12_KB
871 ;; TABLE TYPE: Translate
872 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
873 ;;
874 DW COM_CE_LO_END-$ ;; length of state section
875 DB CEDILLA_LOWER ;; State ID
876 DW G_KB + P12_KB ;; Keyboard Type
877 DB 0F7H,0 ;; error character = standalone accent
878 ;; CHNAGED MJS 31/10/86
879 DW COM_CE_LO_T1_END-$ ;; Size of xlat table
880 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
881 DB 1 ;; number of scans
882 DB 46,135 ;; scan code,ASCII - c
883 COM_CE_LO_T1_END: ;;
884 ;;
885 DW 0 ;; Size of xlat table - null table
886 ;;
887 COM_CE_LO_END: ;; length of state section
888 ;;
889 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
890 ;; CODE PAGE: Common
891 ;; STATE: CedilIa Upper Case
892 ;; KEYBOARD TYPES : G_KB + P12_KB
893 ;; TABLE TYPE: Translate
894 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
895 ;;
896 DW COM_CE_UP_END-$ ;; length of state section
897 DB CEDILLA_UPPER ;; State ID
898 DW G_KB + P12_KB ;; Keyboard Type
899 DB 0F7H,0 ;; error character = standalone accent
900 ;; CHANGED MJS 31/10/86
901 DW COM_CE_UP_T1_END-$ ;; Size of xlat table
902 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
903 DB 1 ;; number of scans
904 DB 46,128 ;; scan code,ASCII - C
905 COM_CE_UP_T1_END: ;;
906 ;;
907 DW 0 ;; Size of xlat table - null table
908 ;;
909 COM_CE_UP_END: ;; length of state section
910 ;;
911 ;;
912 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
913 ;; CODE PAGE: Common
914 ;; STATE: Cedilla Space Bar
915 ;; KEYBOARD TYPES : G_KB + P12_KB
916 ;; TABLE TYPE: Translate
917 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
918 ;;
919 DW COM_CE_SP_END-$ ;; length of state section
920 DB CEDILLA_SPACE ;; State ID
921 DW G_KB + P12_KB ;; Keyboard Type
922 DB 0F7H,0 ;; error character = standalone accent
923 ;; CHANGED MJS 31/10/86
924 DW COM_CE_SP_T1_END-$ ;; Size of xlat table
925 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
926 DB 1 ;; number of scans
927 DB 57,0F7H ;; STANDALONE CEDILLA
928 COM_CE_SP_T1_END: ;;
929 ;;
930 DW 0 ;; Size of xlat table - null table
931 ;;
932 COM_CE_SP_END: ;; length of state section
933 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
934 ;; CODE PAGE: Common
935 ;; STATE: Diaresis Lower Case
936 ;; KEYBOARD TYPES : G_KB + P12_KB
937 ;; TABLE TYPE: Translate
938 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
939 ;;
940 DW COM_DI_LO_END-$ ;; length of state section
941 DB DIARESIS_LOWER ;; State ID
942 DW G_KB + P12_KB ;; Keyboard Type
943 DB 0F9H,0 ;; error character = standalone accent
944 ;; CHANGED MJS 31/10/86
945 DW COM_DI_LO_T1_END-$ ;; Size of xlat table
946 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
947 DB 6 ;; number of scans
948 DB 18,'\89' ;; scan code,ASCII - e
949 DB 30,'\84' ;; scan code,ASCII - a
950 DB 24,'\94' ;; scan code,ASCII - o
951 DB 22,'\81' ;; scan code,ASCII - u
952 DB 23,'\8b' ;; scan code,ASCII - i
953 DB 21,'\98' ;; scan code,ASCII - y
954 COM_DI_LO_T1_END: ;;
955 ;;
956 DW 0 ;; Size of xlat table - null table
957 ;;
958 COM_DI_LO_END: ;; length of state section
959 ;;
960 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
961 ;; CODE PAGE: Common
962 ;; STATE: Diaresis Space Bar
963 ;; KEYBOARD TYPES : G_KB + P12_KB
964 ;; TABLE TYPE: Translate
965 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
966 ;;
967 DW COM_DI_SP_END-$ ;; length of state section
968 DB DIARESIS_SPACE ;; State ID
969 DW G_KB + P12_KB ;; Keyboard Type
970 DB 0F9H,0 ;; error character = standalone accent
971 ;; CHANGED MJS 31/10/86
972 DW COM_DI_SP_T1_END-$ ;; Size of xlat table
973 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
974 DB 1 ;; number of scans
975 DB 57,0F9H ;; error character = standalone accent
976 COM_DI_SP_T1_END: ;;
977 ;;
978 DW 0 ;; Size of xlat table - null table
979 COM_DI_SP_END: ;; length of state section
980 ;;
981 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
982 DW 0 ;; Last State
983 COMMON_XLAT_END: ;;
984 ;;
985 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
986 ;;***************************************
987 ;; NL Specific Translate Section for 437
988 ;;
989 ;;***************************************
990 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
991 ;;
992 PUBLIC NL_437_XLAT ;;
993 NL_437_XLAT: ;;
994 ;;
995 DW CP437_XLAT_END-$ ;; length of section
996 DW 437 ;;
997 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
998 ;; CODE PAGE: 437
999 ;; STATE: Third Shift
1000 ;; KEYBOARD TYPES : G_KB + P12_KB
1001 ;; TABLE TYPE: Translate
1002 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1003 ;;
1004 DW CP437_THIRD_END-$ ;; length of state section
1005 DB THIRD_SHIFT ;; State ID
1006 DW G_KB + P12_KB ;; Keyboard Type
1007 DB -1,-1 ;; default ignore error state
1008 ;;
1009 DW CP437_THIRD_T1_END-$ ;; Size of xlat table
1010 DB STANDARD_TABLE ;; xlat options:
1011 DB 3 ;; number of scans
1012 ;; DB 2,7 ;; NO CHAR - JUST BELL should be super 1
1013 ;; ;; NOW COMM. MJS 31/10/86
1014 ;; DB 7,0FCH ;; NOW COMM. MJS 31/10/86
1015 DB 19,14H ;; NO CHAR - JUST BELL
1016 ;; ;; SHOULD O/P MJS 31/10/86
1017 DB 46,9BH ;; cent sign - \9b
1018 DB 86,7CH ;; vertical bar
1019 ;;
1020 CP437_THIRD_T1_END: ;;
1021 ;;
1022 DW 0 ;; Size of xlat table - null table
1023 ;;
1024 CP437_THIRD_END: ;;
1025 ;;
1026 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1027 ;; CODE PAGE: 437
1028 ;; STATE: Non-Alpha Lower Case
1029 ;; KEYBOARD TYPES : G_KB + P12_KB
1030 ;; TABLE TYPE: Translate
1031 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1032 ;;
1033 ; DW CP437_NA_LO_END-$ ;; length of state section
1034 ; DB NON_ALPHA_LOWER ;; State ID
1035 ; DW G_KB + P12_KB ;; Keyboard Type
1036 ; DB -1,-1 ;; default ignore error state
1037 ;;
1038 ; DW CP437_NA_LO_T1_END-$ ;; Size of xlat table
1039 ; DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1040 ; DB 0 ;; number of scans
1041 ;CP437_NA_LO_T1_END: ;;
1042 ;;
1043 ; DW 0 ;; Size of xlat table - null table
1044 ;;
1045 ;CP437_NA_LO_END: ;;
1046 ;;
1047 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1048 ;; CODE PAGE: 437
1049 ;; STATE: Non-Alpha Upper Case
1050 ;; KEYBOARD TYPES : G_KB + P12_KB
1051 ;; TABLE TYPE: Translate
1052 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1053 ;;
1054 DW CP437_NA_UP_END-$ ;; length of state section
1055 DB NON_ALPHA_UPPER ;; State ID
1056 DW G_KB + P12_KB ;; Keyboard Type
1057 DB -1,-1 ;; default ignore error state
1058 ;;
1059 DW CP437_NA_UP_T1_END-$ ;; Size of xlat table
1060 DB STANDARD_TABLE ;; xlat options:
1061 DB 2 ;; number of scans
1062 DB 27,0B3H ;; vert. line graphics
1063 DB 41,15H ;; Section symbol
1064 CP437_NA_UP_T1_END: ;;
1065 ;;
1066 DW 0 ;; Size of xlat table - null table
1067 ;;
1068 CP437_NA_UP_END: ;;
1069 ;;
1070 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1071 ;; CODE PAGE: CP437
1072 ;; STATE: Tilde Lower
1073 ;; KEYBOARD TYPES : G_KB + P12_KB
1074 ;; TABLE TYPE: Translate
1075 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1076 ;;
1077 DW CP437_TI_LO_END-$ ;; length of state section
1078 DB TILDE_LOWER ;; State ID
1079 DW G_KB + P12_KB ;; Keyboard Type
1080 DB 7EH,0 ;; error character = standalone accent
1081 ;;
1082 DW CP437_TI_LO_T1_END-$ ;; Size of xlat table
1083 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1084 DB 1 ;; number of scans
1085 DB 49,164 ;; scan code,ASCII - n
1086 CP437_TI_LO_T1_END: ;;
1087 ;;
1088 DW 0 ;; Size of xlat table - null table
1089 ;;
1090 CP437_TI_LO_END: ;; length of state section
1091 ;;
1092 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1093 ;; CODE PAGE: CP437
1094 ;; STATE: Tilde Upper Case
1095 ;; KEYBOARD TYPES : G_KB + P12_KB
1096 ;; TABLE TYPE: Translate
1097 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1098 ;;
1099 DW CP437_TI_UP_END-$ ;; length of state section
1100 DB TILDE_UPPER ;; State ID
1101 DW G_KB + P12_KB ;; Keyboard Type
1102 DB 7EH,0 ;; error character = standalone accent
1103 ;;
1104 DW CP437_TI_UP_T1_END-$ ;; Size of xlat table
1105 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1106 DB 1 ;; number of scans
1107 DB 49,165 ;; scan code,ASCII - N
1108 CP437_TI_UP_T1_END: ;;
1109 ;;
1110 DW 0 ;; Size of xlat table - null table
1111 ;;
1112 CP437_TI_UP_END: ;; length of state section
1113 ;;
1114 ;;
1115 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1116 ;; CODE PAGE: CP437
1117 ;; STATE: Acute Lower Case
1118 ;; KEYBOARD TYPES : G_KB + P12_KB
1119 ;; TABLE TYPE: Translate
1120 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1121 ;;
1122 DW CP437_AC_LO_END-$ ;; length of state section
1123 DB ACUTE_LOWER ;; State ID
1124 DW G_KB + P12_KB ;; Keyboard Type
1125 DB 027H,0 ;; error character = standalone accent
1126 ;; CHANGED MJS 31/10/86
1127 DW CP437_AC_LO_T1_END-$ ;; Size of xlat table
1128 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1129 DB 5 ;; number of scans
1130 DB 30,' ' ;; a acute
1131 DB 18,'\82' ;; e acute
1132 DB 23,'¡' ;; i acute
1133 DB 24,'¢' ;; o acute
1134 DB 22,'£' ;; u acute
1135 CP437_AC_LO_T1_END: ;;
1136 ;;
1137 DW 0 ;; Size of xlat table - null table
1138 ;;
1139 CP437_AC_LO_END: ;;
1140 ;;
1141 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1142 ;; CODE PAGE: CP437
1143 ;; STATE: Acute Upper Case
1144 ;; KEYBOARD TYPES : G_KB + P12_KB
1145 ;; TABLE TYPE: Translate
1146 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1147 ;;
1148 DW CP437_AC_UP_END-$ ;; length of state section
1149 DB ACUTE_UPPER ;; State ID
1150 DW G_KB + P12_KB ;; Keyboard Type
1151 DB 027H,0 ;; error character = standalone accent
1152 ;; CHANGED MJS 31/10/86
1153 DW CP437_AC_UP_T1_END-$ ;; Size of xlat table
1154 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1155 DB 1 ;; number of scans
1156 DB 18,'\90' ;; scan code,ASCII - e
1157 CP437_AC_UP_T1_END: ;;
1158 ;;
1159 DW 0 ;; Size of xlat table - null table
1160 ;;
1161 CP437_AC_UP_END: ;;
1162 ;;
1163 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1164 ;; CODE PAGE: CP437
1165 ;; STATE: Acute Space Bar
1166 ;; KEYBOARD TYPES : G_KB + P12_KB
1167 ;; TABLE TYPE: Translate
1168 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1169 ;;
1170 DW CP437_AC_SP_END-$ ;; length of state section
1171 DB ACUTE_SPACE ;; State ID
1172 DW G_KB + P12_KB ;; Keyboard Type
1173 DB 027H,0 ;; error character = standalone accent
1174 ;; CHANGED MJS 34/10/86
1175 DW CP437_AC_SP_T1_END-$ ;; Size of xlat table
1176 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1177 DB 1 ;; number of scans
1178 DB 57,027H ;; scan code,ASCII - SPACE
1179 CP437_AC_SP_T1_END: ;;
1180 ;;
1181 DW 0 ;; Size of xlat table - null table
1182 ;;
1183 CP437_AC_SP_END: ;;
1184 ;;
1185 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1186 ;; CODE PAGE: CP437
1187 ;; STATE: Diaresis Upper Case
1188 ;; KEYBOARD TYPES : G_KB + P12_KB
1189 ;; TABLE TYPE: Translate
1190 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1191 ;;
1192 DW CP437_DI_UP_END-$ ;; length of state section
1193 DB DIARESIS_UPPER ;; State ID
1194 DW G_KB + P12_KB ;; Keyboard Type
1195 DB 0F9H,0 ;; error character = standalone accent
1196 ;;
1197 DW CP437_DI_UP_T1_END-$ ;; Size of xlat table
1198 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1199 DB 3 ;; number of scans
1200 DB 30,'\8e' ;; scan code,ASCII - a
1201 DB 24,'\99' ;; scan code,ASCII - o
1202 DB 22,'\9a' ;; scan code,ASCII - u
1203 CP437_DI_UP_T1_END: ;;
1204 ;;
1205 DW 0 ;; Size of xlat table - null table
1206 ;;
1207 CP437_DI_UP_END: ;; length of state section
1208 ;;
1209 ;;
1210 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1211 DW 0 ;; LAST STATE
1212 ;;
1213 CP437_XLAT_END: ;;
1214 ;;
1215 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1216 ;;***************************************
1217 ;; NL Specific Translate Section for 850
1218 ;;***************************************
1219 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1220 ;;
1221 PUBLIC NL_850_XLAT ;;
1222 NL_850_XLAT: ;;
1223 ;;
1224 DW CP850_XLAT_END-$ ;; length of section
1225 DW 850 ;;
1226 ;;
1227 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1228 ;; CODE PAGE: 850
1229 ;; STATE: Non-Alpha Upper Case
1230 ;; KEYBOARD TYPES : G_KB + P12_KB
1231 ;; TABLE TYPE: Translate
1232 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1233 ;;
1234 DW CP850_NA_UP_END-$ ;; length of state section
1235 DB NON_ALPHA_UPPER ;; State ID
1236 DW G_KB + P12_KB ;; Keyboard Type
1237 DB -1,-1 ;; default ignore error state
1238 ;;
1239 DW CP850_NA_UP_T1_END-$ ;; Size of xlat table
1240 DB STANDARD_TABLE ;; xlat options:
1241 DB 2 ;; number of scans
1242 DB 27,07CH ;; vert line
1243 DB 41,0F5H ;; section symbol
1244 CP850_NA_UP_T1_END: ;;
1245 ;;
1246 DW 0 ;; Size of xlat table - null table
1247 ;;
1248 CP850_NA_UP_END: ;;
1249 ;;
1250 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1251 ;; CODE PAGE: 850
1252 ;; STATE: Third Shift
1253 ;; KEYBOARD TYPES : G_KB + P12_KB
1254 ;; TABLE TYPE: Translate
1255 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1256 ;;
1257 DW CP850_THIRD_END-$ ;; length of state section
1258 DB THIRD_SHIFT ;; State ID
1259 DW G_KB + P12_KB ;; Keyboard Type
1260 DB -1,-1 ;; default ignore error state
1261 ;;
1262 DW CP850_THIRD_T1_END-$ ;; Size of xlat table
1263 DB STANDARD_TABLE ;; xlat options:
1264 DB 3 ;; number of scans
1265 ;; DB 2,0FBH ;; NOW COMM. MJS 31/10/86
1266 ;; DB 7,0F3H ;; NOW COMM. MJS 31/10/86
1267 DB 19,0F4H ;;
1268 DB 46,0BDH ;; cent sign - \9b
1269 DB 86,0DDH ;; true broken vertical
1270 CP850_THIRD_T1_END: ;;
1271 ;;
1272 DW 0 ;; Size of xlat table - null table
1273 ;;
1274 CP850_THIRD_END: ;;
1275 ;;
1276 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1277 ;; CODE PAGE: CP850
1278 ;; STATE: Tilde Lower
1279 ;; KEYBOARD TYPES : G_KB + P12_KB
1280 ;; TABLE TYPE: Translate
1281 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1282 ;;
1283 DW CP850_TI_LO_END-$ ;; length of state section
1284 DB TILDE_LOWER ;; State ID
1285 DW G_KB + P12_KB ;; Keyboard Type
1286 DB 7EH,0 ;; error character = standalone accent
1287 ;;
1288 DW CP850_TI_LO_T1_END-$ ;; Size of xlat table
1289 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1290 DB 3 ;; number of scans
1291 DB 30,0C6H ;; scan code,ASCII - a
1292 DB 24,0E4H ;; scan code,ASCII - o
1293 DB 49,164 ;; scan code,ASCII - n
1294 CP850_TI_LO_T1_END: ;;
1295 ;;
1296 DW 0 ;; Size of xlat table - null table
1297 ;;
1298 CP850_TI_LO_END: ;; length of state section
1299 ;;
1300 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1301 ;; CODE PAGE: CP850
1302 ;; STATE: Tilde Upper Case
1303 ;; KEYBOARD TYPES : G_KB + P12_KB
1304 ;; TABLE TYPE: Translate
1305 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1306 ;;
1307 DW CP850_TI_UP_END-$ ;; length of state section
1308 DB TILDE_UPPER ;; State ID
1309 DW G_KB + P12_KB ;; Keyboard Type
1310 DB 7EH,0 ;; error character = standalone accent
1311 ;;
1312 DW CP850_TI_UP_T1_END-$ ;; Size of xlat table
1313 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1314 DB 3 ;; number of scans
1315 DB 30,0C7H ;; scan code,ASCII - A
1316 DB 24,0E5H ;; scan code,ASCII - O
1317 DB 49,165 ;; scan code,ASCII - N
1318 CP850_TI_UP_T1_END: ;;
1319 ;;
1320 DW 0 ;; Size of xlat table - null table
1321 ;;
1322 CP850_TI_UP_END: ;; length of state section
1323 ;;
1324 ;;
1325 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1326 ;; CODE PAGE: CP850 - NOW IN COMMON MJS 31/10/86
1327 ;; STATE: Cedilla lower
1328 ;; KEYBOARD TYPES : G_KB + P12_KB
1329 ;; TABLE TYPE: Translate
1330 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1331 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1332 ;; CODE PAGE: CP850 - NOW IN COMMON MJS 31/10/86
1333 ;; STATE: CedilIa Upper Case
1334 ;; KEYBOARD TYPES : G_KB + P12_KB
1335 ;; TABLE TYPE: Translate
1336 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1337 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1338 ;; CODE PAGE: CP850 - NOW IN COMMON MJS 31/10/86
1339 ;; STATE: Cedilla Space Bar
1340 ;; KEYBOARD TYPES : G_KB + P12_KB
1341 ;; TABLE TYPE: Translate
1342 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1343 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1344 ;; CODE PAGE: CP850
1345 ;; STATE: Acute Lower Case
1346 ;; KEYBOARD TYPES : G_KB + P12_KB
1347 ;; TABLE TYPE: Translate
1348 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1349 ;;
1350 DW CP850_AC_LO_END-$ ;; length of state section
1351 DB ACUTE_LOWER ;; State ID
1352 DW G_KB + P12_KB ;; Keyboard Type
1353 DB 0EFH,0 ;; error character = standalone accent
1354 DW CP850_AC_LO_T1_END-$ ;; Size of xlat table
1355 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1356 DB 6 ;; number of scans
1357 DB 30,' ' ;; a acute
1358 DB 18,'\82' ;; e acute
1359 DB 23,'¡' ;; i acute
1360 DB 24,'¢' ;; o acute
1361 DB 22,'£' ;; u acute
1362 DB 21,0ECH ;; y acute
1363 CP850_AC_LO_T1_END: ;;
1364 ;;
1365 DW 0 ;; Size of xlat table - null table
1366 ;;
1367 CP850_AC_LO_END: ;;
1368 ;;
1369 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1370 ;; CODE PAGE: CP850
1371 ;; STATE: Acute Upper Case
1372 ;; KEYBOARD TYPES : G_KB + P12_KB
1373 ;; TABLE TYPE: Translate
1374 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1375 ;;
1376 DW CP850_AC_UP_END-$ ;; length of state section
1377 DB ACUTE_UPPER ;; State ID
1378 DW G_KB + P12_KB ;; Keyboard Type
1379 DB 0EFH,0 ;; error character = standalone accent
1380 DW CP850_AC_UP_T1_END-$ ;; Size of xlat table
1381 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1382 DB 6 ;; number of scans
1383 DB 18,090H ;; E acute
1384 DB 30,0B5H ;; A acute
1385 DB 23,0D6H ;; I acute
1386 DB 24,0E0H ;; O acute
1387 DB 22,0E9H ;; U acute
1388 DB 21,0EDH ;; Y acute
1389 CP850_AC_UP_T1_END: ;;
1390 ;;
1391 DW 0 ;; Size of xlat table - null table
1392 ;;
1393 CP850_AC_UP_END: ;;
1394 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1395 ;; CODE PAGE: CP850
1396 ;; STATE: Acute Space Bar
1397 ;; KEYBOARD TYPES : G_KB + P12_KB
1398 ;; TABLE TYPE: Translate
1399 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1400 ;;
1401 DW CP850_AC_SP_END-$ ;; length of state section
1402 DB ACUTE_SPACE ;; State ID
1403 DW G_KB + P12_KB ;; Keyboard Type
1404 DB 0EFH,0 ;; error character = standalone accent
1405 ;;
1406 DW CP850_AC_SP_T1_END-$ ;; Size of xlat table
1407 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1408 DB 1 ;; number of scans
1409 DB 57,0EFH ;; scan code,ASCII - SPACE
1410 CP850_AC_SP_T1_END: ;;
1411 ;;
1412 DW 0 ;; Size of xlat table - null table
1413 ;;
1414 CP850_AC_SP_END: ;;
1415 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1416 ;; CODE PAGE: CP850 - NOW IN COMMON MJS 31/10/86
1417 ;; STATE: Diaresis Lower Case
1418 ;; KEYBOARD TYPES : G_KB + P12_KB
1419 ;; TABLE TYPE: Translate
1420 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1421 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;
1422 ;; CODE PAGE: 850
1423 ;; STATE: Diaresis Upper
1424 ;; KEYBOARD TYPES : G_KB + P12_KB
1425 ;; TABLE TYPE: Translate
1426 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1427 ;;
1428 DW CP850_DI_UP_END-$ ;; length of state section
1429 DB DIARESIS_UPPER ;; State ID
1430 DW G_KB + P12_KB ;; Keyboard Type
1431 DB 0F9H,0 ;; error character = standalone accent
1432 ;;
1433 DW CP850_DI_UP_T1_END-$ ;; Size of xlat table
1434 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1435 DB 5 ;; number of scans
1436 DB 30,'\8e' ;; scan code,ASCII - A
1437 DB 18,0D3H ;; scan code,ASCII - E
1438 DB 23,0D8H ;; scan code,ASCII - I
1439 DB 24,'\99' ;; scan code,ASCII - O
1440 DB 22,'\9a' ;; scan code,ASCII - U
1441 CP850_DI_UP_T1_END: ;;
1442 ;;
1443 DW 0 ;; Size of xlat table - null table
1444 ;;
1445 CP850_DI_UP_END: ;; length of state section
1446 ;;
1447 ;;
1448 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1449 ;; CODE PAGE: CP850 - NOW IN COMMON MJS 31/10/86
1450 ;; STATE: Diaeresis Space Bar
1451 ;; KEYBOARD TYPES : G_KB + P12_KB
1452 ;; TABLE TYPE: Translate
1453 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1454 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1455 ;; CODE PAGE: 850
1456 ;; STATE: Grave Upper
1457 ;; KEYBOARD TYPES : G_KB + P12_KB
1458 ;; TABLE TYPE: Translate
1459 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1460 ;;
1461 DW CP850_GR_UP_END-$ ;; length of state section
1462 DB GRAVE_UPPER ;; State ID
1463 DW G_KB + P12_KB ;; Keyboard Type
1464 DB 60H,0 ;; error character = standalone accent
1465 ;;
1466 DW CP850_GR_UP_T1_END-$ ;; Size of xlat table
1467 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1468 DB 5 ;; number of scans
1469 DB 30,0B7H ;; A grave
1470 DB 18,0D4H ;; E grave
1471 DB 23,0DEH ;; I grave
1472 DB 24,0E3H ;; O grave
1473 DB 22,0EBH ;; U grave
1474 CP850_GR_UP_T1_END: ;;
1475 ;;
1476 DW 0 ;; Size of xlat table - null table
1477 ;;
1478 CP850_GR_UP_END: ;; length of state section
1479 ;;
1480 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1481 ;; CODE PAGE: 850
1482 ;; STATE: Circumflex Upper
1483 ;; KEYBOARD TYPES : G_KB + P12_KB
1484 ;; TABLE TYPE: Translate
1485 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1486 ;;
1487 DW CP850_CI_UP_END-$ ;; length of state section
1488 DB CIRCUMFLEX_UPPER ;; State ID
1489 DW G_KB + P12_KB ;; Keyboard Type
1490 DB 5EH,0 ;; error character = standalone accent
1491 ;;
1492 DW CP850_CI_UP_T1_END-$ ;; Size of xlat table
1493 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1494 DB 5 ;; number of scans
1495 DB 30,0B6H ;; A circumflex
1496 DB 18,0D2H ;; E circumflex
1497 DB 23,0D7H ;; I circumflex
1498 DB 24,0E2H ;; O circumflex
1499 DB 22,0EAH ;; U circumflex
1500 CP850_CI_UP_T1_END: ;;
1501 ;;
1502 DW 0 ;; Size of xlat table - null table
1503 ;;
1504 CP850_CI_UP_END: ;; length of state section
1505 ;;
1506 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1507 ;;
1508 DW 0 ;; LAST STATE
1509 ;;
1510 CP850_XLAT_END: ;;
1511 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1512 ;;
1513 CODE ENDS ;;
1514 END ;;
1515 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
The original sources of MS-DOS 1.25, 2.0, and 4.0 for reference purposes