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