summaryrefslogtreecommitdiff
path: root/v4.0/src/DEV/KEYBOARD/KDFFR120.ASM
diff options
context:
space:
mode:
Diffstat (limited to 'v4.0/src/DEV/KEYBOARD/KDFFR120.ASM')
-rw-r--r--v4.0/src/DEV/KEYBOARD/KDFFR120.ASM2307
1 files changed, 2307 insertions, 0 deletions
diff --git a/v4.0/src/DEV/KEYBOARD/KDFFR120.ASM b/v4.0/src/DEV/KEYBOARD/KDFFR120.ASM
new file mode 100644
index 0000000..3fdb453
--- /dev/null
+++ b/v4.0/src/DEV/KEYBOARD/KDFFR120.ASM
@@ -0,0 +1,2307 @@
1; ACUTE lc y added
2; ****** CNS 12/18
3; ****** CNS 01/21 NUM PAD
4 PAGE ,132
5 TITLE DOS - Keyboard Definition File
6
7;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
8;; DOS - - NLS Support - Keyboard Defintion File
9;; (c) Copyright 1988 Microsoft
10;;
11;; This file contains the keyboard tables for Belgium.
12;;
13;; Linkage Instructions:
14;; Refer to KDF.ASM.
15;;
16;; Modded from French - DTF 11-Sep-86
17;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
18 ;;
19 INCLUDE KEYBSHAR.INC ;;
20 INCLUDE POSTEQU.INC ;;
21 INCLUDE KEYBMAC.INC ;;
22 ;;
23 PUBLIC FR1_LOGIC ;;
24 PUBLIC FR1_437_XLAT ;;
25 PUBLIC FR1_850_XLAT ;;
26 ;;
27CODE SEGMENT PUBLIC 'CODE' ;;
28 ASSUME CS:CODE,DS:CODE ;;
29 ;;
30;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
31;; Standard translate table options are a liner search table
32;; (TYPE_2_TAB) and ASCII entries ONLY (ASCII_ONLY)
33;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
34 ;;
35STANDARD_TABLE EQU TYPE_2_TAB+ASCII_ONLY
36 ;;
37;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
38;;***************************************
39;; FR State Logic
40;;***************************************
41;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
42 ;;
43 ;;
44FR1_LOGIC:
45
46 DW LOGIC_END-$ ;; length
47 ;;
48 DW TYPEWRITER_CAPS_LK ;; special features
49 ;;
50 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; COMMANDS START HERE
51 ;;
52;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
53;; OPTIONS: If we find a scan match in
54;; an XLATT or SET_FLAG operation then
55;; exit from INT 9.
56;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
57 ;;
58 OPTION EXIT_IF_FOUND ;;
59 ;;
60 ;;
61;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
62;; Dead key definitions must come before
63;; dead key translations to handle
64;; dead key + dead key.
65;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
66 ;;
67 IFF EITHER_ALT,NOT ;;
68 ANDF EITHER_CTL,NOT ;;
69 IFF CAPS_STATE
70 SET_FLAG DEAD_UPPER
71 ELSEF
72 IFF EITHER_SHIFT ;;
73 SET_FLAG DEAD_UPPER ;;
74 ELSEF ;;
75 SET_FLAG DEAD_LOWER ;;
76 ENDIFF ;;
77 ENDIFF
78 ELSEF ;;
79 IFF EITHER_SHIFT,NOT ;;
80 IFKBD XT_KB+AT_KB
81 IFF EITHER_CTL ;;
82 ANDF ALT_SHIFT ;;
83 SET_FLAG DEAD_THIRD ;;
84 ENDIFF ;;
85 ELSEF
86 IFF R_ALT_SHIFT ;;
87 ANDF EITHER_CTL,NOT ;;
88 ANDF LC_E0,NOT ;;
89 SET_FLAG DEAD_THIRD ;;
90 ENDIFF ;;
91 ENDIFF
92 ENDIFF
93 ENDIFF ;;
94 ;;
95;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
96;; ACUTE ACCENT TRANSLATIONS
97;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
98 ;;
99ACUTE_PROC: ;;
100 ;;
101 IFF ACUTE,NOT ;;
102 GOTO TILDE_PROC ;;
103 ENDIFF ;;
104 ;;
105 RESET_NLS ;;
106 IFF R_ALT_SHIFT,NOT ;;
107 XLATT ACUTE_SPACE ;;
108 ENDIFF ;;
109 IFF EITHER_CTL,NOT ;;
110 ANDF EITHER_ALT,NOT ;;
111 IFF EITHER_SHIFT ;;
112 IFF CAPS_STATE ;;
113 XLATT ACUTE_LOWER ;;
114 ELSEF ;;
115 XLATT ACUTE_UPPER ;;
116 ENDIFF ;;
117 ELSEF ;;
118 IFF CAPS_STATE ;;
119 XLATT ACUTE_UPPER ;;
120 ELSEF ;;
121 XLATT ACUTE_LOWER ;;
122 ENDIFF ;;
123 ENDIFF ;;
124 ENDIFF ;;
125 ;;
126INVALID_ACUTE: ;;
127 PUT_ERROR_CHAR ACUTE_LOWER ;; If we get here then either the XLATT
128 BEEP ;; failed or we are ina bad shift state.
129 GOTO NON_DEAD ;; Either is invalid so BEEP and fall
130 ;; through to generate the second char.
131 ;; Note that the dead key flag will be
132 ;; reset before we get here.
133 ;;
134 ;;
135;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
136;; TILDE ACCENT TRANSLATIONS
137;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
138 ;;
139TILDE_PROC: ;;
140 ;;
141 IFF TILDE,NOT ;;
142 GOTO DIARESIS_PROC ;;
143 ENDIFF ;;
144 RESET_NLS ;;
145 IFF R_ALT_SHIFT,NOT ;;
146 XLATT TILDE_SPACE ;;
147 ENDIFF ;;
148 IFF EITHER_CTL,NOT ;;
149 ANDF EITHER_ALT,NOT ;;
150 IFF EITHER_SHIFT ;;
151 IFF CAPS_STATE ;;
152 XLATT TILDE_LOWER ;;
153 ELSEF ;;
154 XLATT TILDE_UPPER ;;
155 ENDIFF ;;
156 ELSEF ;;
157 IFF CAPS_STATE,NOT ;;
158 XLATT TILDE_LOWER ;;
159 ELSEF ;;
160 XLATT TILDE_UPPER ;;
161 ENDIFF ;;
162 ENDIFF ;;
163 ENDIFF ;;
164 ;;
165INVALID_TILDE: ;;
166 PUT_ERROR_CHAR TILDE_LOWER ;; standalone accent
167 BEEP ;; Invalid dead key combo.
168 GOTO NON_DEAD ;;
169 ;;
170;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
171;; DIARESIS ACCENT TRANSLATIONS
172;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
173 ;;
174DIARESIS_PROC: ;;
175 ;;
176 IFF DIARESIS,NOT ;;
177 GOTO GRAVE_PROC ;;
178 ENDIFF ;;
179 ;;
180 RESET_NLS ;;
181 IFF R_ALT_SHIFT,NOT ;;
182 XLATT DIARESIS_SPACE ;; exist for 437 so beep for
183 ENDIFF ;;
184 IFF EITHER_CTL,NOT ;;
185 ANDF EITHER_ALT,NOT ;;
186 IFF EITHER_SHIFT ;;
187 IFF CAPS_STATE ;;
188 XLATT DIARESIS_LOWER ;;
189 ELSEF ;;
190 XLATT DIARESIS_UPPER ;;
191 ENDIFF ;;
192 ELSEF ;;
193 IFF CAPS_STATE ;;
194 XLATT DIARESIS_UPPER ;;
195 ELSEF ;;
196 XLATT DIARESIS_LOWER ;;
197 ENDIFF ;;
198 ENDIFF ;;
199 ENDIFF ;;
200 ;;
201INVALID_DIARESIS: ;;
202 PUT_ERROR_CHAR DIARESIS_LOWER ;; standalone accent
203 BEEP ;; Invalid dead key combo.
204 GOTO NON_DEAD ;;
205 ;;
206;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
207;; GRAVE ACCENT TRANSLATIONS
208;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
209 ;;
210GRAVE_PROC: ;;
211 ;;
212 IFF GRAVE,NOT ;;
213 GOTO CIRCUMFLEX_PROC ;;
214 ENDIFF ;;
215 ;;
216 RESET_NLS ;;
217 IFF R_ALT_SHIFT,NOT ;;
218 XLATT GRAVE_SPACE ;;
219 ENDIFF ;;
220 IFF EITHER_CTL,NOT ;;
221 ANDF EITHER_ALT,NOT ;;
222 IFF EITHER_SHIFT ;;
223 IFF CAPS_STATE ;;
224 XLATT GRAVE_LOWER ;;
225 ELSEF ;;
226 XLATT GRAVE_UPPER ;;
227 ENDIFF ;;
228 ELSEF ;;
229 IFF CAPS_STATE,NOT ;;
230 XLATT GRAVE_LOWER ;;
231 ELSEF ;;
232 XLATT GRAVE_UPPER ;;
233 ENDIFF ;;
234 ENDIFF ;;
235 ENDIFF ;;
236 ;;
237INVALID_GRAVE: ;;
238 PUT_ERROR_CHAR GRAVE_LOWER ;; standalone accent
239 BEEP ;; Invalid dead key combo.
240 GOTO NON_DEAD ;;
241 ;;
242;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
243;; CIRCUMFLEX ACCENT TRANSLATIONS
244;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
245 ;;
246CIRCUMFLEX_PROC: ;;
247 ;;
248 IFF CIRCUMFLEX,NOT ;;
249 GOTO NON_DEAD ;;
250 ENDIFF ;;
251 ;;
252 RESET_NLS ;;
253 IFF R_ALT_SHIFT,NOT ;;
254 XLATT CIRCUMFLEX_SPACE ;;
255 ENDIFF ;;
256 IFF EITHER_CTL,NOT ;;
257 ANDF EITHER_ALT,NOT ;;
258 IFF EITHER_SHIFT ;;
259 IFF CAPS_STATE ;;
260 XLATT CIRCUMFLEX_LOWER ;;
261 ELSEF ;;
262 XLATT CIRCUMFLEX_UPPER ;;
263 ENDIFF ;;
264 ELSEF ;;
265 IFF CAPS_STATE,NOT ;;
266 XLATT CIRCUMFLEX_LOWER ;;
267 ELSEF ;;
268 XLATT CIRCUMFLEX_UPPER ;;
269 ENDIFF ;;
270 ENDIFF ;;
271 ENDIFF ;;
272 ;;
273INVALID_CIRCUMFLEX: ;;
274 PUT_ERROR_CHAR CIRCUMFLEX_LOWER ;; standalone accent
275 BEEP ;; Invalid dead key combo.
276 GOTO NON_DEAD ;;
277 ;;
278;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
279;; Upper, lower and third shifts
280;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
281 ;;
282;***************************
283NON_DEAD: ;;
284;ADDED FOR DIVIDE SIGN ;;
285 IFKBD G_KB+P12_KB ;; Avoid accidentally translating
286 ANDF LC_E0 ;; the "/" on the numeric pad of the
287 IFF EITHER_CTL,NOT
288 ANDF EITHER_ALT,NOT
289 XLATT DIVIDE_SIGN ;;
290 ENDIFF
291 EXIT_STATE_LOGIC ;;
292 ENDIFF ;;
293;BD END OF ADDITION
294;****************************
295;NON_DEAD: ;;
296; ;;
297; IFKBD G_KB+P12_KB ;; Avoid accidentally translating
298; ANDF LC_E0 ;; the "/" on the numeric pad of the
299; EXIT_STATE_LOGIC ;; G keyboard
300; ENDIFF ;;
301 ;;
302 IFF EITHER_ALT,NOT ;;
303 ANDF EITHER_CTL,NOT ;;
304 IFF EITHER_SHIFT ;;
305;******************************************
306;;***BD ADDED FOR NUMERIC PAD
307 IFF NUM_STATE,NOT ;;
308 XLATT NUMERIC_PAD ;;
309 ENDIFF ;;
310;;***BD END OF ADDITION
311;*******************************************
312 IFF CAPS_STATE ;;
313 XLATT ALPHA_LOWER ;;
314 XLATT NON_ALPHA_LOWER ;;
315 ELSEF ;;
316 XLATT ALPHA_UPPER ;;
317 XLATT NON_ALPHA_UPPER ;;
318 ENDIFF ;;
319 ELSEF ;;
320;******************************************
321;;***BD ADDED FOR NUMERIC PAD
322 IFF NUM_STATE ;;
323 XLATT NUMERIC_PAD ;;
324 ENDIFF ;;
325;;***BD END OF ADDITION
326;******************************************
327 IFF CAPS_STATE ;;
328 XLATT ALPHA_UPPER ;;
329 XLATT NON_ALPHA_UPPER ;;
330 ELSEF ;;
331 XLATT ALPHA_LOWER ;;
332 XLATT NON_ALPHA_LOWER ;;
333 ENDIFF ;;
334 ENDIFF ;;
335 ELSEF ;;
336 IFF EITHER_SHIFT,NOT ;;
337 IFKBD XT_KB+AT_KB ;;
338 IFF EITHER_CTL ;;
339 ANDF ALT_SHIFT ;;
340 XLATT THIRD_SHIFT ;;
341 ENDIFF ;;
342 ELSEF ;;
343 IFF EITHER_CTL,NOT ;;
344 ANDF R_ALT_SHIFT ;;
345 XLATT THIRD_SHIFT ;;
346 ENDIFF ;;
347 ENDIFF ;;
348 IFKBD AT_KB+XT_KB ;;
349 IFF EITHER_CTL ;;
350 ANDF ALT_SHIFT ;;
351 XLATT ALT_CASE ;;
352 ENDIFF ;;
353 ENDIFF ;;
354 IFKBD G_KB+P12_KB ;;
355 IFF EITHER_CTL ;;
356 ANDF ALT_SHIFT ;;
357 IFF R_ALT_SHIFT,NOT ;;
358 XLATT ALT_CASE ;;
359 ENDIFF ;;
360 ENDIFF ;;
361 ENDIFF ;;
362 ENDIFF ;;
363 ENDIFF ;;
364;IFF EITHER_SHIFT,NOT ;;
365 IFKBD AT_KB+XT_KB ;;
366 IFF EITHER_CTL,NOT ;;
367 IFF ALT_SHIFT ;; ALT - case
368 XLATT ALT_CASE ;;
369 ENDIFF ;;
370 ELSEF ;;
371 XLATT CTRL_CASE ;;
372 ENDIFF ;;
373 ENDIFF ;;
374 ;;
375 IFKBD G_KB+P12_KB ;;
376 IFF EITHER_CTL,NOT ;;
377 IFF ALT_SHIFT ;; ALT - case
378 ANDF R_ALT_SHIFT,NOT ;;
379 XLATT ALT_CASE ;;
380 ENDIFF ;;
381 ELSEF ;;
382 IFF EITHER_ALT,NOT ;;
383 XLATT CTRL_CASE ;;
384 ENDIFF ;;
385 ENDIFF ;;
386 IFF EITHER_CTL ;;
387 ANDF ALT_SHIFT ;;
388 ANDF R_ALT_SHIFT,NOT ;;
389 XLATT ALT_CASE ;;
390 ENDIFF ;;
391 ENDIFF ;;
392 ;;
393 EXIT_STATE_LOGIC ;;
394 ;;
395LOGIC_END: ;;
396 ;;
397;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
398;;***************************************
399;; BE Common Translate Section
400;; This section contains translations for the lower 128 characters
401;; only since these will never change from code page to code page.
402;; In addition the dead key "Set Flag" tables are here since the
403;; dead keys are on the same keytops for all code pages.
404;;***************************************
405;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
406 ;;
407 PUBLIC FR1_COMMON_XLAT ;;
408FR1_COMMON_XLAT: ;;
409 ;;
410 DW COMMON_XLAT_END-$ ;; length of section
411 DW -1 ;; code page
412 ;;
413;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
414;; CODE PAGE: Common
415;; STATE: Alt Case
416;; KEYBOARD TYPES: G + P
417;; TABLE TYPE: Translate
418;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
419 ;;
420 DW COM_ALT_K1_END-$ ;; length of state section
421 DB ALT_CASE ;; 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 COM_ALT_K1_T1_END-$ ;; Size of xlat table
426 DB TYPE_2_TAB ;;
427 DB 6 ;;8 Number of entries
428; DB 12,-1,-1 ;;
429; DB 13,0,82H ;;
430 DB 16,0,1EH ;; A
431 DB 17,0,2CH ;; Z
432 DB 30,0,10H ;; Q
433 DB 39,0,32H ;; M
434 DB 44,0,11H ;; W
435 DB 50,-1,-1 ;; U.S. 'M'
436COM_ALT_K1_T1_END: ;;
437 ;;
438 DW 0 ;;
439 ;;
440COM_ALT_K1_END: ;;
441 ;;
442;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
443;***************************************** CNS P12 Addition *****************
444;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
445;; CODE PAGE: Common
446;; STATE: Alt Case
447;; KEYBOARD TYPES: P12_KB
448;; TABLE TYPE: Translate
449;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
450 ;;
451 DW COM_ALT_PK1_END-$ ;; length of state section
452 DB ALT_CASE ;; State ID
453 DW P12_KB ;; Keyboard Type
454 DB -1,-1 ;; Buffer entry for error character
455 ;; Set Flag Table
456 DW COM_ALT_PK1_T1_END-$ ;; Size of xlat table
457 DB TYPE_2_TAB ;;
458 DB 6 ;; 10 Number of entries
459; DB 12,-1,-1 ;; invalid key U.S. alt -
460; DB 13,-1,-1 ;; invalid key U.S. alt =
461; DB 07,0,82H ;; alt - (minus sign)
462; DB 13,0,83H ;; alt = (equal sign)
463 DB 16,0,1EH ;; A
464 DB 17,0,2CH ;; Z
465 DB 30,0,10H ;; Q
466 DB 39,0,32H ;; M
467 DB 44,0,11H ;; W
468 DB 50,-1,-1 ;; U.S. 'M'
469COM_ALT_PK1_T1_END: ;;
470 ;;
471 DW 0 ;;
472 ;;
473COM_ALT_PK1_END: ;;
474 ;;
475;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
476;***************************************** CNS P12 Addition *****************
477;; CODE PAGE: Common
478;; STATE: Ctrl Case
479;; KEYBOARD TYPES: GKB
480;; TABLE TYPE: Translate
481;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
482 ;;
483 DW COM_CTRL_K1_END-$ ;; length of state section
484 DB CTRL_CASE ;; State ID
485 DW G_KB ;P12_KB ;; Keyboard Type
486 DB -1,-1 ;; Buffer entry for error character
487 ;; Set Flag Table
488 DW COM_CTRL_K1_T1_END-$ ;; Size of xlat table
489 DB TYPE_2_TAB ;;
490 DB 10 ;; Number of entries
491 DB 12,-1,-1 ;;
492 DB 13,31,13 ;;
493 DB 16,01,16 ;; A
494 DB 17,26,17 ;; Z
495 DB 30,17,30 ;; Q
496 DB 39,13,39 ;; M
497 DB 43,-1,-1 ;; \
498 DB 44,23,44 ;; W
499 DB 50,-1,-1 ;; U.S. 'M'
500 DB 86,28,86 ;;
501COM_CTRL_K1_T1_END: ;;
502 ;;
503 DW 0 ;;
504 ;;
505COM_CTRL_K1_END: ;;
506 ;;
507 ;;
508;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
509;***************************************** CNS P12 Addition *****************
510;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
511;; CODE PAGE: Common
512;; STATE: Ctrl Case
513;; KEYBOARD TYPES: P12_KB
514;; TABLE TYPE: Translate
515;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
516 ;;
517 DW COM_CTRL_PK1_END-$ ;; length of state section
518 DB CTRL_CASE ;; State ID
519 DW P12_KB ;; Keyboard Type
520 DB -1,-1 ;; Buffer entry for error character
521 ;; Set Flag Table
522 DW COM_CTRL_PK1_T1_END-$ ;; Size of xlat table
523 DB TYPE_2_TAB ;;
524 DB 12 ;; Number of entries
525 DB 12,-1,-1 ;;
526 DB 07,30,07 ;; ctl + number six key
527 DB 12,29,12 ;; ctl + ]
528 DB 13,31,13 ;;
529 DB 16,01,16 ;; A
530 DB 17,26,17 ;; Z
531 DB 30,17,30 ;; Q
532 DB 39,13,39 ;; M
533 DB 43,-1,-1 ;; \
534 DB 44,23,44 ;; W
535 DB 50,-1,-1 ;; U.S. 'M'
536 DB 9,28,9 ;; \ position (this is also the underscore position)
537COM_CTRL_PK1_T1_END: ;;
538 ;;
539 DW 0 ;;
540 ;;
541COM_CTRL_PK1_END: ;;
542 ;;
543 ;;
544;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
545;***************************************** CNS P12 Addition *****************
546;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
547;; CODE PAGE: Common
548;; STATE: Alt Case
549;; KEYBOARD TYPES: AT + XT
550;; TABLE TYPE: Translate
551;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
552 ;;
553 DW COM_ALT_K2_END-$ ;; length of state section
554 DB ALT_CASE ;; State ID
555 DW AT_KB+XT_KB ;; Keyboard Type
556 DB -1,-1 ;; Buffer entry for error character
557 ;; Set Flag Table
558 DW COM_ALT_K2_T2_END-$ ;; Size of xlat table
559 DB TYPE_2_TAB ;;
560 DB 6 ;; 9 Number of entries
561; DB 12,-1,-1 ;; invalid key U.S. alt -
562; DB 13,0,82H ;; alt - (minus sign)
563; DB 53,0,83H ;; alt = (equal sign)
564 DB 16,0,1EH ;; A
565 DB 17,0,2CH ;; Z
566 DB 30,0,10H ;; Q
567 DB 39,0,32H ;; M
568 DB 44,0,11H ;; W
569 DB 50,-1,-1 ;; U.S. 'M'
570COM_ALT_K2_T2_END: ;;
571 ;;
572 DW 0 ;;
573 ;;
574COM_ALT_K2_END: ;;
575 ;;
576;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
577;; CODE PAGE: Common
578;; STATE: Ctrl Case
579;; KEYBOARD TYPES: AT
580;; TABLE TYPE: Translate
581;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
582 ;;
583 DW COM_CTRL_K2_END-$ ;; length of state section
584 DB CTRL_CASE ;; State ID
585 DW AT_KB ;; Keyboard Type
586 DB -1,-1 ;; Buffer entry for error character
587 ;; Set Flag Table
588 DW COM_CTRL_K2_T2_END-$ ;; Size of xlat table
589 DB TYPE_2_TAB ;;
590 DB 10;11 ;; Number of entries
591 DB 12,-1,-1 ;; invalid U.S. -
592 DB 43,-1,-1 ;; invalid U.S. \
593 DB 41,28,41 ;; valid ctl + \
594 DB 07,30,07 ;; ctl + number six key
595; DB 13,31,13 ;; ctl - or _
596 DB 16,01,16 ;; A
597 DB 17,26,17 ;; Z
598 DB 30,17,30 ;; Q
599 DB 39,13,39 ;; M
600 DB 44,23,44 ;; W
601 DB 50,-1,-1 ;; U.S. 'M'
602COM_CTRL_K2_T2_END: ;;
603 ;;
604 DW 0 ;;
605 ;;
606COM_CTRL_K2_END: ;;
607 ;;
608 ;;
609;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
610;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
611;; CODE PAGE: Common
612;; STATE: Ctrl Case
613;; KEYBOARD TYPES: XT
614;; TABLE TYPE: Translate
615;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
616 ;;
617 DW COM_CTRL_K3_END-$ ;; length of state section
618 DB CTRL_CASE ;; State ID
619 DW AT_KB+XT_KB ;; Keyboard Type
620 DB -1,-1 ;; Buffer entry for error character
621 ;; Set Flag Table
622 DW COM_CTRL_K3_T3_END-$ ;; Size of xlat table
623 DB TYPE_2_TAB ;;
624 DB 6 ;; Number of entries
625 DB 12,-1,-1 ;;
626 DB 43,-1,-1 ;;
627 DB 43,28,43 ;; valid ctl + \
628 DB 07,30,07 ;; ctl + number six key
629; DB 13,31,13 ;; ctl - or _
630 DB 16,01,16 ;; A
631 DB 17,26,17 ;; Z
632 DB 30,17,30 ;; Q
633 DB 39,13,39 ;; M
634 DB 44,23,44 ;; W
635 DB 50,-1,-1 ;; U.S. 'M'
636COM_CTRL_K3_T3_END: ;;
637 ;;
638 DW 0 ;;
639 ;;
640COM_CTRL_K3_END: ;;
641 ;;
642 ;;
643;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
644;; CODE PAGE: Common
645;; STATE: Lower Shift Dead Key
646;; KEYBOARD TYPES: All
647;; TABLE TYPE: Flag Table
648;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
649 ;;
650 DW COM_DK_LO_END-$ ;; length of state section
651 DB DEAD_LOWER ;; State ID
652 DW G_KB+AT_KB+XT_KB+P12_KB ;; Keyboard Type
653 DB -1,-1 ;; Buffer entry for error character
654 ;; Set Flag Table
655 DW 1 ;; number of entries
656 DB 26 ;; scan code
657 FLAG CIRCUMFLEX ;; flag bit to set
658 ;;
659 ;;
660COM_DK_LO_END: ;;
661 ;;
662;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
663;*************************************** CNS P12 Addition
664;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
665;; CODE PAGE: Common
666;; STATE: Upper Shift Dead Key
667;; KEYBOARD TYPES: All
668;; TABLE TYPE: Flag Table
669;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
670 ;;
671 DW COM_DK_UP_END-$ ;; length of state section
672 DB DEAD_UPPER ;; State ID
673 DW G_KB+AT_KB+XT_KB+P12_KB ;; Keyboard Type
674 DB -1,-1 ;; Buffer entry for error character
675 ;; Set Flag Table
676 DW 1 ;; number of entries
677 DB 26 ;; scan code
678 FLAG DIARESIS ;; flag bit to set
679 ;;
680COM_DK_UP_END: ;;
681 ;;
682;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
683;; CODE PAGE: Common
684;; STATE: Third Shift Dead Key
685;; KEYBOARD TYPES: G, AT
686;; TABLE TYPE: Flag Table
687;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
688 ;;
689 DW COM_DK_TH_END-$ ;; length of state section
690 DB DEAD_THIRD ;; State ID
691 DW G_KB+AT_KB ;; Keyboard Type
692 DB -1,-1 ;; Buffer entry for error character
693 ;; Set Flag Table
694 DW 3 ;; number of entries
695 DB 40 ;;
696 FLAG ACUTE ;;
697 DB 43 ;;
698 FLAG GRAVE ;;
699 DB 53 ;;
700 FLAG TILDE ;;
701 ;;
702COM_DK_TH_END: ;;
703 ;;
704;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
705;***************************************** CNS P12 Addition *****************
706;NO THRD SHIFT DEAD KEY FOR THE P12
707;***************************************** CNS P12 Addition *****************
708;; CODE PAGE: Common
709;; STATE: Third Shift Dead Key
710;; KEYBOARD TYPES: XT +
711;; TABLE TYPE: Flag Table
712;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
713 ;;
714 DW COM_DK_TH_K1_END-$ ;; length of state section
715 DB DEAD_THIRD ;; State ID
716 DW XT_KB ;; Keyboard Type
717 DB -1,-1 ;; Buffer entry for error character
718 ;; Set Flag Table
719 DW 3 ;; number of entries
720 DB 40 ;;
721 FLAG ACUTE ;;
722 DB 41 ;;
723 FLAG GRAVE ;;
724 DB 53 ;;
725 FLAG TILDE ;;
726 ;;
727COM_DK_TH_K1_END: ;;
728;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
729;********************************************** CNS P12 Addition
730;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
731;; CODE PAGE: Common
732;; STATE: Diaresis Lower Case
733;; KEYBOARD TYPES: All
734;; TABLE TYPE: Translate
735;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
736 ;;
737 DW COM_DI_LO_END-$ ;; length of state section
738 DB DIARESIS_LOWER ;; State ID
739 DW G_KB+P12_KB+AT_KB+XT_KB ;; Keyboard Type
740 DB 249,0 ;; error character = standalone accent
741 ;;
742 DW COM_DI_LO_T1_END-$ ;; Size of xlat table
743 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
744 DB 6 ;; number of scans
745 DB 18,'' ;; scan code,ASCII - e
746 DB 16,'' ;; scan code,ASCII - a
747 DB 24,'' ;; scan code,ASCII - o
748 DB 22,'' ;; scan code,ASCII - u
749 DB 23,'' ;; scan code,ASCII - i
750 DB 21,'' ;; scan code,ASCII - y
751COM_DI_LO_T1_END: ;;
752 ;;
753 DW 0 ;; Size of xlat table - null table
754 ;;
755COM_DI_LO_END: ;; length of state section
756 ;;
757;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
758;********************************************** CNS P12 Addition
759;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
760;; CODE PAGE: Common ;;change **********CNS **************
761;; STATE: Numeric Key Pad
762;; KEYBOARD TYPES: All except the p12
763;; TABLE TYPE: Translate
764;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
765 ;;
766 DW COM_PAD_K1_END-$ ;; length of state section
767 DB NUMERIC_PAD ;; State ID
768 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
769 DB -1,-1 ;; Buffer entry for error character
770 ;;
771 DW COM_PAD_K1_T1_END-$ ;; Size of xlat table
772 DB STANDARD_TABLE ;; xlat options:
773 DB 1 ;; number of entries
774 DB 83,',' ;; decimal seperator = ,
775COM_PAD_K1_T1_END: ;;
776 ;;
777 DW 0 ;; Size of xlat table - null table
778 ;;
779COM_PAD_K1_END: ;;
780 ;;
781;**************************************************** CODE eliminated**********
782;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; NUM PAD altered ********
783;; CODE PAGE: 850 CNS engraved "," out
784;; STATE: Numeric Pad - Divide Sign
785;; KEYBOARD TYPES: G
786;; TABLE TYPE: Translate
787;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
788;; ;;
789;; DW CP850_DIVID_END-$ ;; length of state section
790;; DB DIVIDE_SIGN ;; State ID
791;; DW G_KB+P12_KB ;; Keyboard Type
792;; DB -1,-1 ;; error character = standalone accent
793;; ;;
794;; DW CP850_DIVID_T1_END-$ ;; Size of xlat table
795;; DB TYPE_2_TAB ;; xlat options:
796;; DB 2 ;; number of scans
797;; DB 0E0H,',',0E0H ;; DIVIDE SIGN
798;; DB 51,',',0E0H ;;
799;; CP850_DIVID_T1_END: ;;
800;; ;;
801;; DW 0 ;; Size of xlat table - null table
802;; ;;
803;; CP850_DIVID_END: ;;
804;; ;;
805;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
806;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
807;; CODE PAGE: 850
808;; STATE: Numeric Key Pad - Multiplication
809;; KEYBOARD TYPES: G,
810;; TABLE TYPE: Translate
811;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
812;; ;;
813;; DW CP850_PAD_K1_END-$ ;; length of state section
814;; DB NUMERIC_PAD ;; State ID
815;; DW G_KB ;; Keyboard Type
816;; DB -1,-1 ;; Buffer entry for error character
817;; ;;
818;; DW CP850_PAD_K1_T1_END-$ ;; Size of xlat table
819;; DB STANDARD_TABLE ;; xlat options:
820;; DB 1 ;; number of entries
821;; DB 51,',' ; (removed *** CNS ****) ;; MULTIPLICATION SIGN
822;; CP850_PAD_K1_T1_END: ;;
823;; ;;
824;; DW 0 ;; Size of xlat table - null table
825;; ;;
826;; CP850_PAD_K1_END: ;;
827;; ;;
828;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
829;*********************************************************
830;; CODE PAGE: Common
831;; STATE: Alpha Lower Case
832;; KEYBOARD TYPES: All
833;; TABLE TYPE: Translate
834;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
835 ;;
836 DW COM_AL_LO_END-$ ;; length of state section
837 DB ALPHA_LOWER ;; State ID
838 DW G_KB+P12_KB+AT_KB+XT_KB ;; Keyboard Type
839 DB -1,-1 ;; Buffer entry for error character
840 ;;
841 DW COM_AL_LO_T1_END-$ ;; Size of xlat table
842 DB STANDARD_TABLE ;; xlat options:
843 DB 5 ;; number of entries
844 DB 16,'a' ;; small a
845 DB 17,'z' ;; small z
846 DB 30,'q' ;; small q
847 DB 39,'m' ;; small m
848 DB 44,'w' ;; small w
849COM_AL_LO_T1_END: ;;
850 ;;
851 DW 0 ;; Size of xlat table - null table
852 ;;
853COM_AL_LO_END: ;;
854 ;;
855;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
856;; CODE PAGE: Common
857;; STATE: Alpha Upper Case
858;; KEYBOARD TYPES: All
859;; TABLE TYPE: Translate
860;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
861 ;;
862 DW COM_AL_UP_END-$ ;; length of state section
863 DB ALPHA_UPPER ;; State ID
864 DW G_KB+P12_KB+AT_KB+XT_KB ;; Keyboard Type
865 DB -1,-1 ;; Buffer entry for error character
866 ;;
867 DW COM_AL_UP_T1_END-$ ;; Size of xlat table
868 DB STANDARD_TABLE ;; xlat options:
869 DB 5 ;; number of entries
870 DB 16,'A' ;; caps A
871 DB 17,'Z' ;; caps Z
872 DB 30,'Q' ;; caps Q
873 DB 39,'M' ;; caps M
874 DB 44,'W' ;; caps W
875COM_AL_UP_T1_END: ;;
876 ;;
877 DW 0 ;; Size of xlat table - null table
878 ;;
879COM_AL_UP_END: ;;
880 ;;
881 ;;
882;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
883;; CODE PAGE: Common
884;; STATE: Non-Alpha Lower Case
885;; KEYBOARD TYPES: G,
886;; TABLE TYPE: Translate
887;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
888 ;;
889 DW COM_NA_LO_END-$ ;; length of state section
890 DB NON_ALPHA_LOWER ;; State ID
891 DW G_KB ;P12_KB ;; Keyboard Type
892 DB -1,-1 ;; Buffer entry for error character
893 ;;
894 DW COM_NA_LO_T1_END-$ ;; Size of xlat table
895 DB STANDARD_TABLE ;; xlat options:
896 DB 20 ;; number of entries
897 DB 41,"" ;; superscript 2
898 DB 2,"&" ;;
899 DB 3,"" ;; acute - e
900 DB 4,'"' ;;
901 DB 5,"'" ;;
902 DB 6,"(" ;;
903 DB 8,"" ;; grave - e
904 DB 9,"!" ;;
905 DB 10,"" ;; c - cedilla small
906 DB 11,"" ;;
907 DB 12,")" ;;
908 DB 13,"-" ;;
909 DB 27,"$" ;;
910 DB 40,"" ;; grave - u
911 DB 43,0E6H ;; mu
912 DB 86,'<' ;;
913 DB 50,',' ;;
914 DB 51,';' ;;
915 DB 52,':' ;;
916 DB 53,'=' ;;
917COM_NA_LO_T1_END: ;;
918 ;;
919 DW 0 ;; Size of xlat table - null table
920 ;;
921COM_NA_LO_END: ;;
922 ;;
923 ;;
924;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
925;***************************************** CNS P12 Addition *****************
926;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
927;; CODE PAGE: Common
928;; STATE: Non-Alpha Lower Case
929;; KEYBOARD TYPES: P12
930;; TABLE TYPE: Translate
931;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
932 ;;
933 DW COM_NA_LO_PK1_END-$ ;; length of state section
934 DB NON_ALPHA_LOWER ;; State ID
935 DW P12_KB ;; Keyboard Type
936 DB -1,-1 ;; Buffer entry for error character
937 ;;
938 DW COM_NA_LO_PT1_K1_END-$ ;; Size of xlat table
939 DB STANDARD_TABLE ;; xlat options:
940 DB 21 ;; number of entries
941 DB 41,"" ;; superscript 2
942 DB 2,"&" ;;
943 DB 3,"" ;; acute - e
944 DB 4,'"' ;;
945 DB 5,"'" ;;
946 DB 6,"(" ;;
947 DB 7,"-" ;;
948 DB 8,"" ;; grave - e
949 DB 9,"_" ;;
950 DB 10,"" ;; c - cedilla small
951 DB 11,"" ;;
952 DB 12,")" ;;
953 DB 13,"=" ;;
954 DB 27,"$" ;;
955 DB 40,"" ;; grave - u
956 DB 43,"*" ;;
957 DB 86,'<' ;; +
958 DB 50,',' ;; <
959 DB 51,';' ;; -
960 DB 52,':' ;;
961 DB 53,'!' ;;
962
963COM_NA_LO_PT1_K1_END: ;;
964 ;;
965 DW 0 ;; Size of xlat table - null table
966 ;;
967COM_NA_LO_PK1_END: ;;
968 ;;
969;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
970;***************************************** CNS P12 Addition *****************
971;; CODE PAGE: Common
972;; STATE: Non-Alpha Lower Case
973;; KEYBOARD TYPES:AT
974;; TABLE TYPE: Translate
975;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
976 ;;
977 DW COM_NA_LO_K2_END-$ ;; length of state section
978 DB NON_ALPHA_LOWER ;; State ID
979 DW AT_KB ;; Keyboard Type
980 DB -1,-1 ;; Buffer entry for error character
981 ;;
982 DW COM_NA_LO_T1_K2_END-$ ;; Size of xlat table
983 DB STANDARD_TABLE ;; xlat options:
984 DB 19 ;; number of entries
985 DB 41,"<" ;;
986 DB 2,"&" ;;
987 DB 3,"" ;; acute - e
988 DB 4,'"' ;;
989 DB 5,"'" ;;
990 DB 6,"(" ;;
991 DB 8,"" ;; grave - e
992 DB 9,"!" ;;
993 DB 10,"" ;; c - cedilla small
994 DB 11,"" ;;
995 DB 12,")" ;;
996 DB 13,"-" ;;
997 DB 27,"$" ;;
998 DB 40,"" ;; grave - u
999 DB 43,0E6H ;; mu
1000 DB 50,',' ;;
1001 DB 51,';' ;;
1002 DB 52,':' ;;
1003 DB 53,'=' ;;
1004COM_NA_LO_T1_K2_END: ;;
1005 ;;
1006 DW 0 ;; Size of xlat table - null table
1007 ;;
1008COM_NA_LO_K2_END: ;;
1009;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1010;; CODE PAGE: Common
1011;; STATE: Non-Alpha Lower Case
1012;; KEYBOARD TYPES: XT,
1013;; TABLE TYPE: Translate
1014;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1015 ;;
1016 DW COM_NA_LO_K1_END-$ ;; length of state section
1017 DB NON_ALPHA_LOWER ;; State ID
1018 DW XT_KB ;; Keyboard Type
1019 DB -1,-1 ;; Buffer entry for error character
1020 ;;
1021 DW COM_NA_LO_K1_T1_END-$ ;; Size of xlat table
1022 DB STANDARD_TABLE ;; xlat options:
1023 DB 19 ;; number of entries
1024 DB 2,"&" ;;
1025 DB 3,"" ;; acute - e
1026 DB 4,'"' ;;
1027 DB 5,"'" ;;
1028 DB 6,"(" ;;
1029 DB 8,"" ;;
1030 DB 9,"!" ;;
1031 DB 10,"" ;; c - cedilla small
1032 DB 11,"" ;;
1033 DB 12,")" ;;
1034 DB 13,"-" ;;
1035 DB 27,"$" ;;
1036 DB 40,"" ;; grave - u
1037 DB 41,0E6H ;; mu
1038 DB 43,'<' ;;
1039 DB 50,',' ;;
1040 DB 51,';' ;;
1041 DB 52,':' ;;
1042 DB 53,'=' ;;
1043COM_NA_LO_K1_T1_END: ;;
1044 ;;
1045 DW 0 ;; Size of xlat table - null table
1046 ;;
1047COM_NA_LO_K1_END: ;;
1048 ;;
1049;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1050;; CODE PAGE: Common
1051;; STATE: Non-Alpha Upper Case
1052;; KEYBOARD TYPES: G,
1053;; TABLE TYPE: Translate
1054;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1055 ;;
1056 DW COM_NA_UP_END-$ ;; length of state section
1057 DB NON_ALPHA_UPPER ;; State ID
1058 DW G_KB ;+P12_KB ;; Keyboard Type
1059 DB -1,-1 ;; Buffer entry for error character
1060 ;;
1061 DW COM_NA_UP_T1_END-$ ;; Size of xlat table
1062 DB STANDARD_TABLE ;; xlat options:
1063 DB 20 ;; number of entries
1064 DB 2,'1' ;;
1065 DB 3,'2' ;;
1066 DB 4,'3' ;;
1067 DB 5,'4' ;;
1068 DB 6,'5' ;;
1069 DB 7,'6' ;;
1070 DB 8,'7' ;;
1071 DB 9,'8' ;;
1072 DB 10,'9' ;;
1073 DB 11,'0' ;;
1074 DB 12,0F8H ;; degree symbol
1075 DB 13,"_" ;;
1076 DB 27,"*" ;;
1077 DB 40,'%' ;;
1078 DB 43,'' ;;
1079 DB 86,'>' ;;
1080 DB 50,'?' ;;
1081 DB 51,'.' ;;
1082 DB 52,'/' ;;
1083 DB 53,'+' ;;
1084COM_NA_UP_T1_END: ;;
1085 ;;
1086 DW 0 ;; Size of xlat table - null table
1087 ;;
1088COM_NA_UP_END: ;;
1089;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1090;***************************************** CNS P12 Addition *****************
1091;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1092;; CODE PAGE: Common
1093;; STATE: Non-Alpha Upper Case
1094;; KEYBOARD TYPES: P12
1095;; TABLE TYPE: Translate
1096;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1097 ;;
1098 DW COM_NA_UP_PK1_END-$ ;; length of state section
1099 DB NON_ALPHA_UPPER ;; State ID
1100 DW P12_KB ;; Keyboard Type
1101 DB -1,-1 ;; Buffer entry for error character
1102 ;;
1103 DW COM_NA_UP_PT1_K1_END-$ ;; Size of xlat table
1104 DB STANDARD_TABLE ;; xlat options:
1105 DB 21 ;; number of entries
1106 DB 2,'1' ;;
1107 DB 3,'2' ;;
1108 DB 4,'3' ;;
1109 DB 5,'4' ;;
1110 DB 6,'5' ;;
1111 DB 7,'6' ;;
1112 DB 8,'7' ;;
1113 DB 9,'8' ;;
1114 DB 10,'9' ;;
1115 DB 11,'0' ;;
1116 DB 12,0F8H ;; degree symbol
1117 DB 13,"+" ;; plus sign
1118 DB 27,09CH ;; symbol
1119 DB 40,'%' ;;
1120 DB 41,"" ;; superscript 3
1121 DB 43,0E6H ;; - mu symbol
1122 DB 86,'>' ;;
1123 DB 50,'?' ;;
1124 DB 51,'.' ;;
1125 DB 52,'/' ;;
1126 DB 53,'+' ;;
1127COM_NA_UP_PT1_K1_END: ;;
1128 ;;
1129 DW 0 ;; Size of xlat table - null table
1130 ;;
1131COM_NA_UP_PK1_END: ;;
1132 ;;
1133 ;;
1134;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1135;***************************************** CNS P12 Addition *****************
1136;; CODE PAGE: Common
1137;; STATE: Non-Alpha Upper Case
1138;; KEYBOARD TYPES: XT +
1139;; TABLE TYPE: Translate
1140;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1141 ;;
1142 DW COM_NA_UP_K1_END-$ ;; length of state section
1143 DB NON_ALPHA_UPPER ;; State ID
1144 DW XT_KB ;; Keyboard Type
1145 DB -1,-1 ;; Buffer entry for error character
1146 ;;
1147 DW COM_NA_UP_T1_K1_END-$ ;; Size of xlat table
1148 DB STANDARD_TABLE ;; xlat options:
1149 DB 20 ;; number of entries
1150 DB 41,'' ;;
1151 DB 2,'1' ;;
1152 DB 3,'2' ;;
1153 DB 4,'3' ;;
1154 DB 5,'4' ;;
1155 DB 6,'5' ;;
1156 DB 7,'6' ;;
1157 DB 8,'7' ;;
1158 DB 9,'8' ;;
1159 DB 10,'9' ;;
1160 DB 11,'0' ;;
1161 DB 12,0F8H ;; degree symbol
1162 DB 13,"_" ;;
1163 DB 27,"*" ;;
1164 DB 40,'%' ;;
1165 DB 43,'>' ;;
1166 DB 50,'?' ;;
1167 DB 51,'.' ;;
1168 DB 52,'/' ;;
1169 DB 53,'+' ;;
1170COM_NA_UP_T1_K1_END: ;;
1171 ;;
1172 DW 0 ;; Size of xlat table - null table
1173 ;;
1174COM_NA_UP_K1_END: ;;
1175;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1176 ;;
1177;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1178;; CODE PAGE: Common
1179;; STATE: Non-Alpha Upper Case
1180;; KEYBOARD TYPES: AT
1181;; TABLE TYPE: Translate
1182;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1183 ;;
1184 DW COM_NA_UP_K2_END-$ ;; length of state section
1185 DB NON_ALPHA_UPPER ;; State ID
1186 DW AT_KB ;; Keyboard Type
1187 DB -1,-1 ;; Buffer entry for error character
1188 ;;
1189 DW COM_NA_UP_T1_K2_END-$ ;; Size of xlat table
1190 DB STANDARD_TABLE ;; xlat options:
1191 DB 20 ;; number of entries
1192 DB 41,'>' ;;
1193 DB 2,'1' ;;
1194 DB 3,'2' ;;
1195 DB 4,'3' ;;
1196 DB 5,'4' ;;
1197 DB 6,'5' ;;
1198 DB 7,'6' ;;
1199 DB 8,'7' ;;
1200 DB 9,'8' ;;
1201 DB 10,'9' ;;
1202 DB 11,'0' ;;
1203 DB 12,0F8H ;; degree symbol
1204 DB 13,"_" ;;
1205 DB 27,"*" ;;
1206 DB 40,'%' ;;
1207 DB 43,'' ;;
1208 DB 50,'?' ;;
1209 DB 51,'.' ;;
1210 DB 52,'/' ;;
1211 DB 53,'+' ;;
1212COM_NA_UP_T1_K2_END: ;;
1213 ;;
1214 DW 0 ;; Size of xlat table - null table
1215 ;;
1216COM_NA_UP_K2_END: ;;
1217;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1218;; CODE PAGE: Common
1219;; STATE: Third Shift
1220;; KEYBOARD TYPES: G,
1221;; TABLE TYPE: Translate
1222;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1223 ;;
1224 DW COM_THIRD_END-$ ;; length of state section
1225 DB THIRD_SHIFT ;; State ID
1226 DW G_KB ;+P12_KB ;; Keyboard Type
1227 DB -1,-1 ;; Buffer entry for error character
1228 ;;
1229 DW COM_THIRD_T1_END-$ ;; Size of xlat table
1230 DB STANDARD_TABLE ;; xlat options:
1231 DB 9 ;; number of entries
1232 DB 2,"|" ;;
1233 DB 3,'@' ;;
1234 DB 4,'#' ;;
1235 DB 7,'^' ;;
1236 DB 10,'{' ;;
1237 DB 11,'}' ;;
1238 DB 26,'[' ;;
1239 DB 27,']' ;;
1240 DB 86,'\' ;;
1241COM_THIRD_T1_END: ;;
1242 ;;
1243 DW 0 ;; Last xlat table
1244COM_THIRD_END: ;;
1245 ;;
1246;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1247;******************************************* CNS Addition
1248;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1249;; CODE PAGE: Common
1250;; STATE: Acute Lower Case
1251;; KEYBOARD TYPES: All
1252;; TABLE TYPE: Translate
1253;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1254 ;;
1255 DW COM_AC_LO_END-$ ;; length of state section
1256 DB ACUTE_LOWER ;; State ID
1257 DW P12_KB ;; ;; Keyboard Type
1258 DB 39,0 ;; error character = standalone accent
1259 ;;
1260 DW COM_AC_LO_T1_END-$ ;; Size of xlat table
1261 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1262 DB 1 ;; number of scans
1263 DB 18,'' ;; scan code,ASCII - e
1264COM_AC_LO_T1_END: ;;
1265 ;;
1266 DW 0 ;; Size of xlat table - null table
1267 ;;
1268COM_AC_LO_END: ;;
1269 ;;
1270;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1271;******************************************* CNS Addition
1272;***************************************** CNS P12 Addition *****************
1273;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1274;; CODE PAGE: Common
1275;; STATE: Third Shift
1276;; KEYBOARD TYPES: P12
1277;; TABLE TYPE: Translate
1278;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1279 ;;
1280 DW COM_THIRD_PK1_END-$ ;; length of state section
1281 DB THIRD_SHIFT ;; State ID
1282 DW P12_KB ;; Keyboard Type
1283 DB -1,-1 ;; Buffer entry for error character
1284 ;;
1285 DW COM_THIRD_PT1_K1_END-$ ;; Size of xlat table
1286 DB STANDARD_TABLE ;; xlat options:
1287 DB 11 ;; number of entries
1288 DB 3,'~' ;;
1289 DB 4,'#' ;;
1290 DB 5,'{' ;;
1291 DB 6,'[' ;;
1292 DB 7,'|' ;;
1293 DB 8,'`' ;; grave symbol not a dead key rep
1294 DB 9,'\' ;;
1295 DB 10,'^' ;; circumflex (caret)
1296 DB 11,'@' ;;
1297 DB 12,']' ;;
1298 DB 13,'}' ;;
1299COM_THIRD_PT1_K1_END: ;;
1300 ;;
1301 DW 0 ;; Last xlat table
1302COM_THIRD_PK1_END: ;;
1303 ;;
1304;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1305;***************************************** CNS P12 Addition *****************
1306;; CODE PAGE: Common
1307;; STATE: Third Shift
1308;; KEYBOARD TYPES: XT
1309;; TABLE TYPE: Translate
1310;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1311 ;;
1312 DW COM_THIRD_K1_END-$ ;; length of state section
1313 DB THIRD_SHIFT ;; State ID
1314 DW XT_KB ;; Keyboard Type
1315 DB -1,-1 ;; Buffer entry for error character
1316 ;;
1317 DW COM_THIRD_T1_K1_END-$ ;; Size of xlat table
1318 DB STANDARD_TABLE ;; xlat options:
1319 DB 9 ;; number of entries
1320 DB 2,"|" ;;
1321 DB 3,'@' ;;
1322 DB 4,'#' ;;
1323 DB 7,'^' ;;
1324 DB 10,'{' ;;
1325 DB 11,'}' ;;
1326 DB 26,'[' ;;
1327 DB 27,']' ;;
1328 DB 43,'\' ;;
1329COM_THIRD_T1_K1_END: ;;
1330 ;;
1331 DW 0 ;; Last xlat table
1332COM_THIRD_K1_END: ;;
1333;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1334;; CODE PAGE: Common
1335;; STATE: Third Shift
1336;; KEYBOARD TYPES: AT
1337;; TABLE TYPE: Translate
1338;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1339 ;;
1340 DW COM_THIRD_K2_END-$ ;; length of state section
1341 DB THIRD_SHIFT ;; State ID
1342 DW AT_KB ;; Keyboard Type
1343 DB -1,-1 ;; Buffer entry for error character
1344 ;;
1345 DW COM_THIRD_T1_K2_END-$ ;; Size of xlat table
1346 DB STANDARD_TABLE ;; xlat options:
1347 DB 9 ;; number of entries
1348 DB 2,"|" ;;
1349 DB 3,'@' ;;
1350 DB 4,'#' ;;
1351 DB 7,'^' ;;
1352 DB 10,'{' ;;
1353 DB 11,'}' ;;
1354 DB 26,'[' ;;
1355 DB 27,']' ;;
1356 DB 41,'\' ;;
1357COM_THIRD_T1_K2_END: ;;
1358 ;;
1359 DW 0 ;; Last xlat table
1360COM_THIRD_K2_END: ;;
1361;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1362;; CODE PAGE: Common
1363;; STATE: Grave Lower
1364;; KEYBOARD TYPES: ALL
1365;; TABLE TYPE: Translate
1366;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1367 ;;
1368 DW COM_GR_LO_END-$ ;; length of state section
1369 DB GRAVE_LOWER ;; State ID
1370 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1371 DB 96,0 ;; error character = standalone accent
1372 ;;
1373 DW COM_GR_LO_T1_END-$ ;; Size of xlat table
1374 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1375 DB 5 ;; number of scans
1376 DB 18,'' ;; scan code,ASCII - e
1377 DB 16,'' ;; scan code,ASCII - a
1378 DB 24,'' ;; scan code,ASCII - o
1379 DB 22,'' ;; scan code,ASCII - u
1380 DB 23,'' ;; scan code,ASCII - i
1381COM_GR_LO_T1_END: ;;
1382 ;;
1383 DW 0 ;; Size of xlat table - null table
1384 ;;
1385COM_GR_LO_END: ;; length of state section
1386 ;;
1387;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1388;; CODE PAGE: Common
1389;; STATE: Grave Upper Case
1390;; KEYBOARD TYPES: All
1391;; TABLE TYPE: Translate
1392;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1393 ;;
1394 DW COM_GR_UP_END-$ ;; length of state section
1395 DB GRAVE_UPPER ;; State ID
1396 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1397 DB 96,0 ;; error character = standalone accent
1398 ;;
1399 DW COM_GR_UP_T1_END-$ ;; Size of xlat table
1400 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1401 DB 0 ;; number of scans
1402COM_GR_UP_T1_END: ;;
1403 ;;
1404 DW 0 ;; Size of xlat table - null table
1405 ;;
1406COM_GR_UP_END: ;; length of state section
1407 ;;
1408 ;;
1409;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1410;; CODE PAGE: Common
1411;; STATE: Grave Space Bar
1412;; KEYBOARD TYPES: All
1413;; TABLE TYPE: Translate
1414;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1415 ;;
1416 DW COM_GR_SP_END-$ ;; length of state section
1417 DB GRAVE_SPACE ;; State ID
1418 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1419 DB 96,0 ;; error character = standalone accent
1420 ;;
1421 DW COM_GR_SP_T1_END-$ ;; Size of xlat table
1422 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1423 DB 1 ;; number of scans
1424 DB 57,96 ;; STANDALONE GRAVE
1425COM_GR_SP_T1_END: ;;
1426 ;;
1427 DW 0 ;; Size of xlat table - null table
1428 ;;
1429COM_GR_SP_END: ;; length of state section
1430 ;;
1431;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1432;; CODE PAGE: Common
1433;; STATE: Circumflex Lower
1434;; KEYBOARD TYPES: All
1435;; TABLE TYPE: Translate
1436;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1437 ;;
1438 DW COM_CI_LO_END-$ ;; length of state section
1439 DB CIRCUMFLEX_LOWER ;; State ID
1440 DW G_KB+P12_KB+AT_KB+XT_KB ;; Keyboard Type
1441 DB 94,0 ;; error character = standalone accent
1442 ;;
1443 DW COM_CI_LO_T1_END-$ ;; Size of xlat table
1444 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1445 DB 5 ;; number of scans
1446 DB 16,'' ;; scan code,ASCII - a
1447 DB 18,'' ;; scan code,ASCII - e
1448 DB 24,'' ;; scan code,ASCII - o
1449 DB 22,'' ;; scan code,ASCII - u
1450 DB 23,'' ;; scan code,ASCII - i
1451COM_CI_LO_T1_END: ;;
1452 ;;
1453 DW 0 ;;
1454 ;;
1455COM_CI_LO_END: ;;
1456 ;;
1457;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1458;; CODE PAGE: Common
1459;; STATE: Circumflex Upper
1460;; KEYBOARD TYPES: All
1461;; TABLE TYPE: Translate
1462;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1463 ;;
1464 DW COM_CI_UP_END-$ ;; length of state section
1465 DB CIRCUMFLEX_UPPER ;; State ID
1466 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1467 DB 94,0 ;; error character = standalone accent
1468 ;;
1469 DW COM_CI_UP_T1_END-$ ;; Size of xlat table
1470 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1471 DB 0 ;; number of scans
1472COM_CI_UP_T1_END: ;;
1473 ;;
1474 DW 0 ;;
1475 ;;
1476COM_CI_UP_END: ;;
1477;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1478;; CODE PAGE: Common
1479;; STATE: Circumflex Space Bar
1480;; KEYBOARD TYPES: All
1481;; TABLE TYPE: Translate
1482;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1483 ;;
1484 DW COM_CI_SP_END-$ ;; length of state section
1485 DB CIRCUMFLEX_SPACE ;; State ID
1486 DW G_KB+P12_KB+AT_KB+XT_KB ;; Keyboard Type
1487 DB 94,0 ;; error character = standalone accent
1488 ;;
1489 DW COM_CI_SP_T1_END-$ ;; Size of xlat table
1490 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1491 DB 1 ;; number of scans
1492 DB 57,94 ;; STANDALONE CIRCUMFLEX
1493COM_CI_SP_T1_END: ;;
1494 ;;
1495 DW 0 ;; Size of xlat table - null table
1496 ;;
1497COM_CI_SP_END: ;; length of state section
1498 ;;
1499 ;;
1500;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1501;; CODE PAGE: Common
1502;; STATE: Tilde Space Bar
1503;; KEYBOARD TYPES: All
1504;; TABLE TYPE: Translate
1505;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1506 ;;
1507 DW COM_TI_SP_END-$ ;; length of state section
1508 DB TILDE_SPACE ;; State ID
1509 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1510 DB 126,0 ;; error character = standalone accent
1511 ;;
1512 DW COM_TI_SP_T1_END-$ ;; Size of xlat table
1513 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1514 DB 1 ;; number of scans
1515 DB 57,126 ;; STANDALONE TIDLE
1516COM_TI_SP_T1_END: ;;
1517 ;;
1518 DW 0 ;; Size of xlat table - null table
1519 ;;
1520COM_TI_SP_END: ;; length of state section
1521 ;;
1522;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1523 DW 0 ;; Last State
1524COMMON_XLAT_END: ;;
1525 ;;
1526 ;;
1527 ;;
1528;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1529;;***************************************
1530;; BE Specific Translate Section for 437
1531;;
1532;;***************************************
1533;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1534 ;;
1535 PUBLIC FR1_437_XLAT ;;
1536FR1_437_XLAT: ;;
1537 ;;
1538 DW CP437_XLAT_END-$ ;; length of section
1539 DW 437 ;;
1540;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1541;; CODE PAGE: 437
1542;; STATE: Non-Alpha Lower Case
1543;; KEYBOARD TYPES: All
1544;; TABLE TYPE: Translate
1545;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1546 ;;
1547 DW CP437_NA_LO_END-$ ;; length of state section
1548 DB NON_ALPHA_LOWER ;; State ID
1549 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1550 DB -1,-1 ;; default ignore error state
1551 ;;
1552 DW CP437_NA_LO_T1_END-$ ;; Size of xlat table
1553 DB STANDARD_TABLE ;; xlat options:
1554 DB 1 ;; number of scans
1555 DB 7,15H ;; Section Symbol
1556CP437_NA_LO_T1_END: ;;
1557 ;;
1558 DW 0 ;; Size of xlat table - null table
1559 ;;
1560CP437_NA_LO_END: ;;
1561 ;;
1562;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1563;**************************************** CNS Addition
1564;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1565;; CODE PAGE: 437
1566;; STATE: Non-Alpha Upper Case
1567;; KEYBOARD TYPES: p12
1568;; TABLE TYPE: Translate
1569;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1570 ;;
1571 DW CP437_NA_UP_K1_END-$ ;; length of state section
1572 DB NON_ALPHA_UPPER ;; State ID
1573 DW P12_KB ;; Keyboard Type
1574 DB -1,-1 ;; default ignore error state
1575 ;;
1576 DW CP437_NA_UP_T1_K1_END-$ ;; Size of xlat table
1577 DB STANDARD_TABLE ;; xlat options: **** CNS 12/18
1578 DB 1 ;; number of scans
1579 DB 53,015H ;; Section symbol - 
1580CP437_NA_UP_T1_K1_END: ;;
1581 ;;
1582 DW 0 ;; Size of xlat table - null table
1583 ;;
1584CP437_NA_UP_K1_END: ;;
1585 ;;
1586;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1587;**************************************** CNS Addition
1588;; CODE PAGE: 437
1589;; STATE: Non-Alpha Upper Case
1590;; KEYBOARD TYPES: G,
1591;; TABLE TYPE: Translate
1592;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1593 ;;
1594 DW CP437_NA_UP_END-$ ;; length of state section
1595 DB NON_ALPHA_UPPER ;; State ID
1596 DW G_KB ;+P12_KB ;; Keyboard Type
1597 DB -1,-1 ;; default ignore error state
1598 ;;
1599 DW CP437_NA_UP_T1_END-$ ;; Size of xlat table
1600 DB STANDARD_TABLE ;; xlat options:
1601 DB 1 ;; number of scans
1602 DB 41,00H ;; 3 Superscript
1603CP437_NA_UP_T1_END: ;;
1604 ;;
1605 DW 0 ;; Size of xlat table - null table
1606 ;;
1607CP437_NA_UP_END: ;;
1608 ;;
1609;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1610;***************************************** CNS P12 Addition *****************
1611;***************************************** CNS P12 Addition *****************
1612;; CODE PAGE: CP437
1613;; STATE: Acute Lower Case
1614;; KEYBOARD TYPES: All
1615;; TABLE TYPE: Translate
1616;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1617 ;;
1618 DW CP437_AC_LO_END-$ ;; length of state section
1619 DB ACUTE_LOWER ;; State ID
1620 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1621 DB 39,0 ;; error character = standalone accent
1622 ;;
1623 DW CP437_AC_LO_T1_END-$ ;; Size of xlat table
1624 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1625 DB 5 ;; number of scans
1626 DB 16,'' ;; a acute
1627 DB 18,'' ;; e acute
1628 DB 23,'' ;; i acute
1629 DB 24,'' ;; o acute
1630 DB 22,'' ;; u acute
1631CP437_AC_LO_T1_END: ;;
1632 ;;
1633 DW 0 ;; Size of xlat table - null table
1634 ;;
1635CP437_AC_LO_END: ;;
1636 ;;
1637;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1638;; CODE PAGE: CP437
1639;; STATE: Acute Upper Case
1640;; KEYBOARD TYPES: All
1641;; TABLE TYPE: Translate
1642;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1643 ;;
1644 DW CP437_AC_UP_END-$ ;; length of state section
1645 DB ACUTE_UPPER ;; State ID
1646 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1647 DB 39,0 ;; error character = standalone accent
1648 ;;
1649 DW CP437_AC_UP_T1_END-$ ;; Size of xlat table
1650 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1651 DB 1 ;; number of scans
1652 DB 18,'' ;; scan code,ASCII - e
1653CP437_AC_UP_T1_END: ;;
1654 ;;
1655 DW 0 ;; Size of xlat table - null table
1656 ;;
1657CP437_AC_UP_END: ;;
1658 ;;
1659;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1660;; CODE PAGE: CP437
1661;; STATE: Acute Space Bar
1662;; KEYBOARD TYPES: All
1663;; TABLE TYPE: Translate
1664;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1665 ;;
1666 DW CP437_AC_SP_END-$ ;; length of state section
1667 DB ACUTE_SPACE ;; State ID
1668 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1669 DB 39,0 ;; error character = standalone accent
1670 ;;
1671 DW CP437_AC_SP_T1_END-$ ;; Size of xlat table
1672 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1673 DB 1 ;; number of scans
1674 DB 57,39 ;; scan code,ASCII - SPACE
1675CP437_AC_SP_T1_END: ;;
1676 ;;
1677 DW 0 ;; Size of xlat table - null table
1678 ;;
1679CP437_AC_SP_END: ;;
1680 ;;
1681;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1682;; CODE PAGE: CP437
1683;; STATE: Tilde Lower
1684;; KEYBOARD TYPES: All
1685;; TABLE TYPE: Translate
1686;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1687 ;;
1688 DW CP437_TI_LO_END-$ ;; length of state section
1689 DB TILDE_LOWER ;; State ID
1690 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1691 DB 126,0 ;; error character = standalone accent
1692 ;;
1693 DW CP437_TI_LO_T1_END-$ ;; Size of xlat table
1694 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1695 DB 1 ;; number of scans
1696 DB 49,164 ;; scan code,ASCII - n
1697CP437_TI_LO_T1_END: ;;
1698 ;;
1699 DW 0 ;; Size of xlat table - null table
1700 ;;
1701CP437_TI_LO_END: ;; length of state section
1702 ;;
1703;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1704;; CODE PAGE: CP437
1705;; STATE: Tilde Upper Case
1706;; KEYBOARD TYPES: All
1707;; TABLE TYPE: Translate
1708;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1709 ;;
1710 DW CP437_TI_UP_END-$ ;; length of state section
1711 DB TILDE_UPPER ;; State ID
1712 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1713 DB 126,0 ;; error character = standalone accent
1714 ;;
1715 DW CP437_TI_UP_T1_END-$ ;; Size of xlat table
1716 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1717 DB 1 ;; number of scans
1718 DB 49,165 ;; scan code,ASCII - N
1719CP437_TI_UP_T1_END: ;;
1720 ;;
1721 DW 0 ;; Size of xlat table - null table
1722 ;;
1723CP437_TI_UP_END: ;; length of state section
1724 ;;
1725;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1726;; CODE PAGE: CP437
1727;; STATE: Diaresis Lower Case
1728;; KEYBOARD TYPES: All
1729;; TABLE TYPE: Translate
1730;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1731 ;;
1732 DW CP437_DI_LO_END-$ ;; length of state section
1733 DB DIARESIS_LOWER ;; State ID
1734 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1735 DB 0FEH,0 ;; error character = standalone accent
1736 ;;
1737 DW CP437_DI_LO_T1_END-$ ;; Size of xlat table
1738 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1739 DB 6 ;; number of scans
1740 DB 18,'' ;; scan code,ASCII - e
1741 DB 16,'' ;; scan code,ASCII - a
1742 DB 24,'' ;; scan code,ASCII - o
1743 DB 22,'' ;; scan code,ASCII - u
1744 DB 23,'' ;; scan code,ASCII - i
1745 DB 21,'' ;; scan code,ASCII - y
1746CP437_DI_LO_T1_END: ;;
1747 ;;
1748 DW 0 ;; Size of xlat table - null table
1749 ;;
1750CP437_DI_LO_END: ;; length of state section
1751 ;;
1752;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1753;; CODE PAGE: CP437
1754;; STATE: Diaresis Upper Case
1755;; KEYBOARD TYPES: All
1756;; TABLE TYPE: Translate
1757;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1758 ;;
1759 DW CP437_DI_UP_END-$ ;; length of state section
1760 DB DIARESIS_UPPER ;; State ID
1761 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1762 DB 0FEH,0 ;; error character = standalone accent
1763 ;;
1764 DW CP437_DI_UP_T1_END-$ ;; Size of xlat table
1765 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1766 DB 3 ;; number of scans
1767 DB 16,'' ;; scan code,ASCII - a
1768 DB 24,'' ;; scan code,ASCII - o
1769 DB 22,'' ;; scan code,ASCII - u
1770CP437_DI_UP_T1_END: ;;
1771 ;;
1772 DW 0 ;; Size of xlat table - null table
1773 ;;
1774CP437_DI_UP_END: ;; length of state section
1775 ;;
1776 ;;
1777;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1778;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1779;; CODE PAGE: Common
1780;; STATE: Diaresis Upper Case
1781;; KEYBOARD TYPES: P12
1782;; TABLE TYPE: Translate
1783;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1784 ;;
1785 DW COM_DI_UP_END-$ ;; length of state section
1786 DB DIARESIS_UPPER ;; State ID
1787 DW P12_KB ;; Keyboard Type
1788 DB 249,0 ;; error character = standalone accent
1789 ;;
1790 DW COM_DI_UP_T1_END-$ ;; Size of xlat table
1791 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1792 DB 3 ;; number of scans
1793 DB 16,'' ;; scan code,ASCII - a
1794 DB 24,'' ;; scan code,ASCII - o
1795 DB 22,'' ;; scan code,ASCII - u
1796COM_DI_UP_T1_END: ;;
1797 ;;
1798 DW 0 ;; Size of xlat table - null table
1799 ;;
1800COM_DI_UP_END: ;; length of state section
1801 ;;
1802 ;;
1803;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1804;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1805;; CODE PAGE: Common
1806;; STATE: Diaresis Space Bar
1807;; KEYBOARD TYPES: P12
1808;; TABLE TYPE: Translate
1809;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1810 ;;
1811 DW COM_DI_SP_END-$ ;; length of state section
1812 DB DIARESIS_SPACE ;; State ID
1813 DW P12_KB ;; Keyboard Type
1814 DB 249,0 ;; error character = standalone accent
1815 ;;
1816 DW COM_DI_SP_T1_END-$ ;; Size of xlat table
1817 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1818 DB 1 ;; number of scans
1819 DB 57,249 ;; error character = standalone accent
1820COM_DI_SP_T1_END: ;;
1821 ;;
1822 DW 0 ;; Size of xlat table - null table
1823COM_DI_SP_END: ;; length of state section
1824 ;;
1825;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1826;***************************************** CNS P12 Addition *****************
1827;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1828;; CODE PAGE: 437 ???????????????????May need change....
1829;; STATE: Third Shift
1830;; KEYBOARD TYPES: P12
1831;; TABLE TYPE: Translate
1832;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1833 ;;
1834 DW CP437_THIRD_PEND-$ ;; length of state section
1835 DB THIRD_SHIFT ;; State ID
1836 DW P12_KB ;; Keyboard Type
1837 DB -1,-1 ;; default ignore error state
1838 ;;
1839 DW CP437_THIRD_T1_PEND-$ ;; Size of xlat table
1840 DB STANDARD_TABLE ;; xlat options: *** CNS 12/18
1841 DB 1 ;; number of scans
1842 DB 27,'$' ;; dollar currency symbol
1843CP437_THIRD_T1_PEND: ;;
1844 ;;
1845 DW 0 ;; Size of xlat table - null table
1846 ;;
1847CP437_THIRD_PEND: ;;
1848 ;;
1849;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1850;***************************************** CNS P12 Addition *****************
1851;; CODE PAGE: CP437
1852;; STATE: Diaresis Space Bar
1853;; KEYBOARD TYPES: All
1854;; TABLE TYPE: Translate
1855;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1856; ;;
1857; DW CP437_DI_SP_END-$ ;; length of state section
1858; DB DIARESIS_SPACE ;; State ID
1859; DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1860; DB 0FEH,0 ;; error character = standalone accent
1861; ;;
1862; DW CP437_DI_SP_T1_END-$ ;; Size of xlat table
1863; DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1864; DB 1 ;; number of scans
1865; DB 57,0FEH ;; error character = standalone accent
1866;CP437_DI_SP_T1_END: ;;
1867; ;;
1868; DW 0 ;; Size of xlat table - null table
1869;CP437_DI_SP_END: ;; length of state section
1870; ;;
1871;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1872 DW 0 ;; LAST STATE
1873 ;;
1874CP437_XLAT_END: ;;
1875 ;;
1876;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1877;;***************************************
1878;; BE Specific Translate Section for 850
1879;;***************************************
1880;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1881 ;;
1882 PUBLIC FR1_850_XLAT ;;
1883FR1_850_XLAT: ;;
1884 ;;
1885 DW CP850_XLAT_END-$ ;; length of section
1886 DW 850 ;;
1887 ;;
1888 ;;
1889;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1890;; CODE PAGE: 850
1891;; STATE: Non-Alpha Lower Case
1892;; KEYBOARD TYPES: All
1893;; TABLE TYPE: Translate
1894;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1895 ;;
1896 DW CP850_NA_LO_END-$ ;; length of state section
1897 DB NON_ALPHA_LOWER ;; State ID
1898 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1899 DB -1,-1 ;; default ignore error state
1900 ;;
1901 DW CP850_NA_LO_T1_END-$ ;; Size of xlat table
1902 DB STANDARD_TABLE ;; xlat options:
1903 DB 1 ;; number of scans
1904 DB 7,0F5H ;; Section symbol - 
1905CP850_NA_LO_T1_END: ;;
1906 ;;
1907 DW 0 ;; Size of xlat table - null table
1908 ;;
1909CP850_NA_LO_END: ;;
1910 ;;
1911 ;;
1912;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1913;**************************************** CNS Addition
1914;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1915;; CODE PAGE: 850
1916;; STATE: Non-Alpha Upper Case
1917;; KEYBOARD TYPES: P12
1918;; TABLE TYPE: Translate
1919;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1920 ;;
1921 DW CP850_NA_UP_K1_END-$ ;; length of state section
1922 DB NON_ALPHA_UPPER ;; State ID
1923 DW P12_KB ;; Keyboard Type
1924 DB -1,-1 ;; default ignore error state
1925 ;;
1926 DW CP850_NA_UP_T1_K1_END-$ ;; Size of xlat table
1927 DB STANDARD_TABLE ;; xlat options: ***** CNS 12/18
1928 DB 1 ;; number of scans
1929 DB 53,0F5H ;; Section symbol - 
1930CP850_NA_UP_T1_K1_END: ;;
1931 ;;
1932 DW 0 ;; Size of xlat table - null table
1933 ;;
1934CP850_NA_UP_K1_END: ;;
1935 ;;
1936;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1937;**************************************** CNS Addition
1938;; CODE PAGE: 850
1939;; STATE: Non-Alpha Upper Case
1940;; KEYBOARD TYPES: G,
1941;; TABLE TYPE: Translate
1942;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1943 ;;
1944 DW CP850_NA_UP_END-$ ;; length of state section
1945 DB NON_ALPHA_UPPER ;; State ID
1946 DW G_KB ;P12_KB ;; Keyboard Type
1947 DB -1,-1 ;; default ignore error state
1948 ;;
1949 DW CP850_NA_UP_T1_END-$ ;; Size of xlat table
1950 DB STANDARD_TABLE ;; xlat options:
1951 DB 1 ;; number of scans
1952 DB 41,0FCH ;; 3 Superscript
1953CP850_NA_UP_T1_END: ;;
1954 ;;
1955 DW 0 ;; Size of xlat table - null table
1956 ;;
1957CP850_NA_UP_END: ;;
1958 ;;
1959;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1960;; CODE PAGE: 850
1961;; STATE: Third Shift
1962;; KEYBOARD TYPES: All
1963;; TABLE TYPE: Translate
1964;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1965 ;;
1966 DW CP850_THIRD_END-$ ;; length of state section
1967 DB THIRD_SHIFT ;; State ID
1968 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
1969 DB -1,-1 ;; default ignore error state
1970 ;;
1971 DW CP850_THIRD_T1_END-$ ;; Size of xlat table
1972 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
1973 DB 0 ;; number of scans
1974CP850_THIRD_T1_END: ;;
1975 ;;
1976 DW 0 ;; Size of xlat table - null table
1977 ;;
1978CP850_THIRD_END: ;;
1979 ;;
1980;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1981;***************************************** CNS P12 Addition *****************
1982;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1983;; CODE PAGE: 850
1984;; STATE: Third Shift
1985;; KEYBOARD TYPES: P12
1986;; TABLE TYPE: Translate
1987;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
1988 ;;
1989 DW CP850_THIRD_PEND-$ ;; length of state section
1990 DB THIRD_SHIFT ;; State ID
1991 DW P12_KB ;; Keyboard Type
1992 DB -1,-1 ;; default ignore error state
1993 ;;
1994 DW CP850_THIRD_P1_END-$ ;; Size of xlat table
1995 DB STANDARD_TABLE ;; xlat options: *** CNS 12/18
1996 DB 1 ;; number of scans
1997 DB 27,0CFH ;; international currency symbol
1998CP850_THIRD_P1_END: ;;
1999 ;;
2000 DW 0 ;; Size of xlat table - null table
2001 ;;
2002CP850_THIRD_PEND: ;;
2003 ;;
2004;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2005;***************************************** CNS P12 Addition *****************
2006;; CODE PAGE: CP850
2007;; STATE: Tilde Lower
2008;; KEYBOARD TYPES: All
2009;; TABLE TYPE: Translate
2010;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2011 ;;
2012 DW CP850_TI_LO_END-$ ;; length of state section
2013 DB TILDE_LOWER ;; State ID
2014 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
2015 DB 126,0 ;; error character = standalone accent
2016 ;;
2017 DW CP850_TI_LO_T1_END-$ ;; Size of xlat table
2018 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
2019 DB 3 ;; number of scans
2020 DB 49,164 ;; scan code,ASCII - n
2021 DB 16,0C6H ;; a
2022 DB 24,0E4H ;; o
2023CP850_TI_LO_T1_END: ;;
2024 ;;
2025 DW 0 ;; Size of xlat table - null table
2026 ;;
2027CP850_TI_LO_END: ;; length of state section
2028 ;;
2029;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2030;***************************************** CNS P12 Addition *****************
2031;***************************************** CNS P12 Addition *****************
2032;; CODE PAGE: CP850
2033;; STATE: Tilde Upper Case
2034;; KEYBOARD TYPES: All
2035;; TABLE TYPE: Translate
2036;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2037 ;;
2038 DW CP850_TI_UP_END-$ ;; length of state section
2039 DB TILDE_UPPER ;; State ID
2040 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
2041 DB 126,0 ;; error character = standalone accent
2042 ;;
2043 DW CP850_TI_UP_T1_END-$ ;; Size of xlat table
2044 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
2045 DB 3 ;; number of scans
2046 DB 49,165 ;; scan code,ASCII - N
2047 DB 16,0C7H ;; A
2048 DB 24,0E5H ;; O
2049CP850_TI_UP_T1_END: ;;
2050 ;;
2051 DW 0 ;; Size of xlat table - null table
2052 ;;
2053CP850_TI_UP_END: ;; length of state section
2054 ;;
2055;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2056;***************************************** CNS P12 Addition *****************
2057;***************************************** CNS P12 Addition *****************
2058;; CODE PAGE: CP850
2059;; STATE: Acute Lower Case
2060;; KEYBOARD TYPES: All
2061;; TABLE TYPE: Translate
2062;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2063 ;;
2064 DW CP850_AC_LO_END-$ ;; length of state section
2065 DB ACUTE_LOWER ;; State ID
2066 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
2067 DB 0EFH,0 ;; error character = standalone accent
2068 DW CP850_AC_LO_T1_END-$ ;; Size of xlat table
2069 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
2070 DB 6 ;; number of scans
2071 DB 16,'' ;; a acute
2072 DB 18,'' ;; e acute
2073 DB 23,'' ;; i acute
2074 DB 24,'' ;; o acute
2075 DB 22,'' ;; u acute
2076 DB 21,0ECH ;; y acute ADDED 12/16 CNS **********
2077CP850_AC_LO_T1_END: ;;
2078 ;;
2079 DW 0 ;; Size of xlat table - null table
2080 ;;
2081CP850_AC_LO_END: ;;
2082 ;;
2083;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2084;***************************************** CNS P12 Addition *****************
2085;***************************************** CNS P12 Addition *****************
2086;; CODE PAGE: CP850
2087;; STATE: Acute Upper Case
2088;; KEYBOARD TYPES: All
2089;; TABLE TYPE: Translate
2090;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2091 ;;
2092 DW CP850_AC_UP_END-$ ;; length of state section
2093 DB ACUTE_UPPER ;; State ID
2094 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
2095 DB 0EFH,0 ;; error character = standalone accent
2096 DW CP850_AC_UP_T1_END-$ ;; Size of xlat table
2097 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
2098 DB 6 ;; number of scans
2099 DB 16,0B5H ;; A acute
2100 DB 18,090H ;; E acute
2101 DB 23,0D6H ;; I acute
2102 DB 24,0E0H ;; O acute
2103 DB 22,0E9H ;; U acute
2104 DB 21,0EDH ;; Y acute
2105CP850_AC_UP_T1_END: ;;
2106 ;;
2107 DW 0 ;; Size of xlat table - null table
2108 ;;
2109CP850_AC_UP_END: ;;
2110;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2111;***************************************** CNS P12 Addition *****************
2112;***************************************** CNS P12 Addition *****************
2113;; CODE PAGE: CP850
2114;; STATE: Acute Space Bar
2115;; KEYBOARD TYPES: All
2116;; TABLE TYPE: Translate
2117;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2118 ;;
2119 DW CP850_AC_SP_END-$ ;; length of state section
2120 DB ACUTE_SPACE ;; State ID
2121 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
2122 DB 0EFH,0 ;; error character = standalone accent
2123 ;;
2124 DW CP850_AC_SP_T1_END-$ ;; Size of xlat table
2125 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
2126 DB 1 ;; number of scans
2127 DB 57,0EFH ;; scan code,ASCII - SPACE
2128CP850_AC_SP_T1_END: ;;
2129 ;;
2130 DW 0 ;; Size of xlat table - null table
2131 ;;
2132CP850_AC_SP_END: ;;
2133 ;;
2134;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2135;***************************************** CNS P12 Addition *****************
2136;***************************************** CNS P12 Addition *****************
2137;; CODE PAGE: CP850
2138;; STATE: Diaresis Lower Case
2139;; KEYBOARD TYPES: All
2140;; TABLE TYPE: Translate
2141;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2142 ;;
2143 DW CP850_DI_LO_END-$ ;; length of state section
2144 DB DIARESIS_LOWER ;; State ID
2145 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
2146 DB 249,0 ;; error character = standalone accent
2147 ;;
2148 DW CP850_DI_LO_T1_END-$ ;; Size of xlat table
2149 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
2150 DB 6 ;; number of scans
2151 DB 18,'' ;; scan code,ASCII - e
2152 DB 16,'' ;; scan code,ASCII - a
2153 DB 24,'' ;; scan code,ASCII - o
2154 DB 22,'' ;; scan code,ASCII - u
2155 DB 23,'' ;; scan code,ASCII - i
2156 DB 21,'' ;; scan code,ASCII - y
2157CP850_DI_LO_T1_END: ;;
2158 ;;
2159 DW 0 ;; Size of xlat table - null table
2160 ;;
2161CP850_DI_LO_END: ;; length of state section
2162 ;;
2163;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;
2164;***************************************** CNS P12 Addition *****************
2165;***************************************** CNS P12 Addition *****************
2166;; KEYBOARD TYPES: All
2167;; TABLE TYPE: Translate
2168;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2169
2170 ;;
2171 DW CP850_DI_UP_END-$ ;; length of state section
2172 DB DIARESIS_UPPER ;; State ID
2173 DW G_KB+AT_KB+XT_KB+P12_KB ;; Keyboard Type
2174 DB 249,0 ;; error character = standalone accent
2175 ;;
2176 DW CP850_DI_UP_T1_END-$ ;; Size of xlat table
2177 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
2178 DB 5 ;; number of scans
2179 DB 16,8EH ;; A di
2180 DB 18,0D3H ;; E diaeresis
2181 DB 23,0D8H ;; I diaeresis
2182 DB 24,99H ;; O di
2183 DB 22,9AH ;; U di
2184CP850_DI_UP_T1_END: ;;
2185 ;;
2186 DW 0 ;; Size of xlat table - null table
2187 ;;
2188CP850_DI_UP_END: ;; length of state section
2189 ;;
2190;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2191;***************************************** CNS P12 Addition *****************
2192;***************************************** CNS P12 Addition *****************
2193;; CODE PAGE: CP850
2194;; STATE: Diaeresis Space Bar
2195;; KEYBOARD TYPES: All
2196;; TABLE TYPE: Translate
2197;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2198 ;;
2199 DW CP850_DI_SP_END-$ ;; length of state section
2200 DB DIARESIS_SPACE ;; State ID
2201 DW ANY_KB ;; Keyboard Type
2202 DB 0FEH,0 ;; error character = standalone accent
2203 ;;
2204 DW CP850_DI_SP_T1_END-$ ;; Size of xlat table
2205 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
2206 DB 1 ;; number of scans
2207 DB 57,0F9H ;; scan code,ASCII - SPACE
2208CP850_DI_SP_T1_END: ;;
2209 ;;
2210 DW 0 ;; Size of xlat table - null table
2211 ;;
2212CP850_DI_SP_END: ;;
2213;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2214;***************************************** CNS P12 Addition *****************
2215;***************************************** CNS P12 Addition *****************
2216;; CODE PAGE: 850
2217;; STATE: Grave Upper
2218;; KEYBOARD TYPES: ALL
2219;; TABLE TYPE: Translate
2220;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2221 ;;
2222 DW CP850_GR_UP_END-$ ;; length of state section
2223 DB GRAVE_UPPER ;; State ID
2224 DW G_KB+AT_KB+XT_KB ;; Keyboard Type
2225 DB 96,0 ;; error character = standalone accent
2226 ;;
2227 DW CP850_GR_UP_T1_END-$ ;; Size of xlat table
2228 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
2229 DB 5 ;; number of scans
2230 DB 16,0B7H ;; A grave
2231 DB 18,0D4H ;; E grave
2232 DB 23,0DEH ;; I grave
2233 DB 24,0E3H ;; O grave
2234 DB 22,0EBH ;; U grave
2235CP850_GR_UP_T1_END: ;;
2236 ;;
2237 DW 0 ;; Size of xlat table - null table
2238 ;;
2239CP850_GR_UP_END: ;; length of state section
2240 ;;
2241;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2242;***************************************** CNS P12 Addition *****************
2243;***************************************** CNS P12 Addition *****************
2244;; CODE PAGE: 850
2245;; STATE: Circumflex Upper
2246;; KEYBOARD TYPES: All
2247;; TABLE TYPE: Translate
2248;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2249 ;;
2250 DW CP850_CI_UP_END-$ ;; length of state section
2251 DB CIRCUMFLEX_UPPER ;; State ID
2252 DW G_KB+AT_KB+XT_KB ;;
2253 DB 94,0 ;; error character = standalone accent
2254 ;;
2255 DW CP850_CI_UP_T1_END-$ ;; Size of xlat table
2256 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
2257 DB 5 ;; number of scans
2258 DB 16,0B6H ;; A circumflex
2259 DB 18,0D2H ;; E circumflex
2260 DB 23,0D7H ;; I circumflex
2261 DB 24,0E2H ;; O circumflex
2262 DB 22,0EAH ;; U circumflex
2263CP850_CI_UP_T1_END: ;;
2264 ;;
2265 DW 0 ;; Size of xlat table - null table
2266 ;;
2267CP850_CI_UP_END: ;; length of state section
2268 ;;
2269;***************************************** CNS P12 Addition *****************
2270;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2271;;;; CODE PAGE: 850
2272;;;; STATE: Circumflex Upper
2273;;;; KEYBOARD TYPES: P12
2274;;;;; TABLE TYPE: Translate
2275;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2276 ;;
2277 DW CP850_CI_UP_PEND-$ ;; length of state section
2278 DB CIRCUMFLEX_UPPER ;; State ID
2279 DW P12_KB ;; Keyboard Type
2280 DB 94,0 ;; error character = standalone accent
2281 ;;
2282 DW CP850_CI_UP_T1_PEND-$ ;; Size of xlat table
2283 DB STANDARD_TABLE+ZERO_SCAN ;; xlat options:
2284 DB 5 ;; number of scans
2285 DB 16,0B6H ;; A circumflex
2286 DB 18,0D2H ;; E circumflex
2287 DB 23,0D7H ;; I circumflex
2288 DB 24,0E2H ;; O circumflex
2289 DB 22,0EAH ;; U circumflex
2290 CP850_CI_UP_T1_PEND: ;;
2291 ;;
2292 DW 0 ;; Size of xlat table - null table
2293 ;;
2294 CP850_CI_UP_PEND: ;; length of state section
2295 ;;
2296;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2297;***************************************** CNS P12 Addition *****************
2298
2299 DW 0 ;; LAST STATE
2300;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2301 ;;
2302CP850_XLAT_END: ;;
2303;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
2304 ;;
2305CODE ENDS ;;
2306 END ;;
2307;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
HIC SVNT DRACONES