|
|
;CODE to be deleted has a double ;; followed by actual asm code....****
; * IBM CONFIDENTIAL * Jan 9 1990 *
;; LATEST CHANGE ALT & CTL
PAGE ,132 TITLE PC DOS 3.3 Keyboard Definition File
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; PC DOS 3.3 - NLS Support - Keyboard Defintion File;; (c) Copyright IBM Corp 198?,...;;;; This file contains the keyboard tables for Spanish.;;;; Linkage Instructions:;; Refer to KDF.ASM.;;;;;; Author: BILL DEVLIN - IBM Canada Laboratory - May 1986;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; INCLUDE KEYBSHAR.INC ;; INCLUDE POSTEQU.INC ;; INCLUDE KEYBMAC.INC ;; ;; PUBLIC UK2_LOGIC ;; PUBLIC UK2_437_XLAT ;; PUBLIC UK2_850_XLAT ;; ;;CODE SEGMENT PUBLIC 'CODE' ;; ASSUME CS:CODE,DS:CODE ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Standard translate table options are a liner search table;; (TYPE_2_TAB) and ASCII entries ONLY (ASCII_ONLY);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;STANDARD_TABLE EQU TYPE_2_TAB+ASCII_ONLY ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;***************************************;; UK State Logic;;***************************************;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; ;;UK2_LOGIC:
DW LOGIC_END-$ ;; length ;; DW 0 ;; special features ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; COMMANDS START HERE ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; OPTIONS: If we find a scan match in;; an XLATT or SET_FLAG operation then;; exit from INT 9.;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; OPTION EXIT_IF_FOUND ;; ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Dead key definitions must come before;; dead key translations to handle;; dead key + dead key.;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; IFF EITHER_ALT,NOT ;; ANDF EITHER_CTL,NOT ;; IFF EITHER_SHIFT ;; SET_FLAG DEAD_UPPER ;; ELSEF ;; SET_FLAG DEAD_LOWER ;; ENDIFF ;; ENDIFF ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ACUTE ACCENT TRANSLATIONS;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;ACUTE_PROC: ;; ;; IFF ACUTE,NOT ;; GOTO DIARESIS_PROC ;; ENDIFF ;; ;; RESET_NLS ;; IFF R_ALT_SHIFT,NOT ;; XLATT ACUTE_SPACE ;; ENDIFF ;; IFF EITHER_CTL,NOT ;; ANDF EITHER_ALT,NOT ;; IFF EITHER_SHIFT ;; IFF CAPS_STATE ;; XLATT ACUTE_LOWER ;; ELSEF ;; XLATT ACUTE_UPPER ;; ENDIFF ;; ELSEF ;; IFF CAPS_STATE ;; XLATT ACUTE_UPPER ;; ELSEF ;; XLATT ACUTE_LOWER ;; ENDIFF ;; ENDIFF ;; ENDIFF ;; ;;INVALID_ACUTE: ;; PUT_ERROR_CHAR ACUTE_LOWER ;; If we get here then either the XLATT BEEP ;; failed or we are ina bad shift state. GOTO NON_DEAD ;; Either is invalid so BEEP and fall ;; through to generate the second char. ;; Note that the dead key flag will be ;; reset before we get here. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; DIARESIS ACCENT TRANSLATIONS;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;DIARESIS_PROC: ;; ;; IFF DIARESIS,NOT ;; GOTO GRAVE_PROC ;; ENDIFF ;; ;; RESET_NLS ;; IFF R_ALT_SHIFT,NOT ;; XLATT DIARESIS_SPACE ;; exist for 437 so beep for ENDIFF ;; IFF EITHER_CTL,NOT ;; ANDF EITHER_ALT,NOT ;; IFF EITHER_SHIFT ;; IFF CAPS_STATE ;; XLATT DIARESIS_LOWER ;; ELSEF ;; XLATT DIARESIS_UPPER ;; ENDIFF ;; ELSEF ;; IFF CAPS_STATE ;; XLATT DIARESIS_UPPER ;; ELSEF ;; XLATT DIARESIS_LOWER ;; ENDIFF ;; ENDIFF ;; ENDIFF ;; ;;INVALID_DIARESIS: ;; PUT_ERROR_CHAR DIARESIS_SPACE ;; standalone accent BEEP ;; Invalid dead key combo. GOTO NON_DEAD ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; GRAVE ACCENT TRANSLATIONS;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;GRAVE_PROC: ;; ;; IFF GRAVE,NOT ;; GOTO CIRCUMFLEX_PROC ;; ENDIFF ;; ;; RESET_NLS ;; IFF R_ALT_SHIFT,NOT ;; XLATT GRAVE_SPACE ;; ENDIFF ;; IFF EITHER_CTL,NOT ;; ANDF EITHER_ALT,NOT ;; IFF EITHER_SHIFT ;; IFF CAPS_STATE ;; XLATT GRAVE_LOWER ;; ELSEF ;; XLATT GRAVE_UPPER ;; ENDIFF ;; ELSEF ;; IFF CAPS_STATE,NOT ;; XLATT GRAVE_LOWER ;; ELSEF ;; XLATT GRAVE_UPPER ;; ENDIFF ;; ENDIFF ;; ENDIFF ;; ;;INVALID_GRAVE: ;; PUT_ERROR_CHAR GRAVE_LOWER ;; standalone accent BEEP ;; Invalid dead key combo. GOTO NON_DEAD ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; CIRCUMFLEX ACCENT TRANSLATIONS;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;CIRCUMFLEX_PROC: ;; ;; IFF CIRCUMFLEX,NOT ;; GOTO NON_DEAD ;; ENDIFF ;; ;; RESET_NLS ;; IFF R_ALT_SHIFT,NOT ;; XLATT CIRCUMFLEX_SPACE ;; ENDIFF ;; IFF EITHER_CTL,NOT ;; ANDF EITHER_ALT,NOT ;; IFF EITHER_SHIFT ;; IFF CAPS_STATE ;; XLATT CIRCUMFLEX_LOWER ;; ELSEF ;; XLATT CIRCUMFLEX_UPPER ;; ENDIFF ;; ELSEF ;; IFF CAPS_STATE,NOT ;; XLATT CIRCUMFLEX_LOWER ;; ELSEF ;; XLATT CIRCUMFLEX_UPPER ;; ENDIFF ;; ENDIFF ;; ENDIFF ;; ;;INVALID_CIRCUMFLEX: ;; PUT_ERROR_CHAR CIRCUMFLEX_LOWER ;; standalone accent BEEP ;; Invalid dead key combo. GOTO NON_DEAD ;; ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; Upper, lower and third shifts;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;NON_DEAD: ;; ;; IFKBD G_KB+P12_KB ;; Avoid accidentally translating ANDF LC_E0 ;; the "/" on the numeric pad of the EXIT_STATE_LOGIC ;; G keyboard ENDIFF ;;;;***BD ADDED FOR ALT, CTRL CASES ;; IFF EITHER_CTL,NOT ;; IFF ALT_SHIFT ;; ALT - case ANDF R_ALT_SHIFT,NOT ;; XLATT ALT_CASE ;; ENDIFF ;; ELSEF ;; IFF EITHER_ALT,NOT ;; CTRL - case XLATT CTRL_CASE ;; ENDIFF ;; ENDIFF ;;;;***BD END OF ADDITION ;; IFF EITHER_ALT,NOT ;; Lower and upper case. Alphabetic ANDF EITHER_CTL,NOT ;; keys are affected by CAPS LOCK. IFF EITHER_SHIFT ;; Numeric keys are not.;;***BD ADDED FOR NUMERIC PAD IFF NUM_STATE,NOT ;; XLATT NUMERIC_PAD ;; ENDIFF ;;;;***BD END OF ADDITION XLATT NON_ALPHA_UPPER ;; IFF CAPS_STATE ;; XLATT ALPHA_LOWER ;; ELSEF ;; XLATT ALPHA_UPPER ;; ENDIFF ;; ELSEF ;;;;***BD ADDED FOR NUMERIC PAD IFF NUM_STATE ;; XLATT NUMERIC_PAD ;; ENDIFF ;;;;***BD END OF ADDITION XLATT NON_ALPHA_LOWER ;; IFF CAPS_STATE ;; XLATT ALPHA_UPPER ;; ELSEF ;; XLATT ALPHA_LOWER ;; ENDIFF ;; ENDIFF ;; ELSEF ;; IFF EITHER_SHIFT,NOT ;; IFKBD XT_KB+AT_KB ;; IFF EITHER_CTL ;; ANDF ALT_SHIFT ;; XLATT THIRD_SHIFT ;; ENDIFF ;; ELSEF ;; IFF EITHER_CTL,NOT ;; ANDF R_ALT_SHIFT ;; XLATT THIRD_SHIFT ;; ENDIFF ;; ENDIFF ;; ENDIFF ;; ENDIFF ;; ;; EXIT_STATE_LOGIC ;; ;;LOGIC_END: ;; ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;***************************************;; UK Common Translate Section;; This section contains translations for the lower 128 characters;; only since these will never change from code page to code page.;; In addition the dead key "Set Flag" tables are here since the;; dead keys are on the same keytops for all code pages.;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; PUBLIC UK2_COMMON_XLAT ;;UK2_COMMON_XLAT: ;; ;; DW COMMON_XLAT_END-$ ;; length of section DW -1 ;; code page ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;***************************************;;***BD - ADDED FOR ALT CASE;;******************************;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; CODE PAGE: Common;; STATE: Alt Case;; KEYBOARD TYPES: All;; TABLE TYPE: Translate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; DW COM_ALT_K2_END-$ ;; length of state section DB ALT_CASE ;; State ID DW ANY_KB ;; Keyboard Type DB -1,-1 ;; Buffer entry for error character ;; DW COM_ALT_K2_T1_END-$ ;; Size of xlat table DB TYPE_2_TAB ;; xlat options: DB 0 ;; number of entries;;***BD THIS ENTRY IS A TEST ENTRY;; DB 53,225,0 ;; TEST ENTRYCOM_ALT_K2_T1_END: ;; ;; DW 0 ;; Size of xlat table - null table ;;COM_ALT_K2_END: ;; ;;;;******************************;;***BD - ADDED FOR CTRL CASE;;******************************;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; CODE PAGE: Common;; STATE: Ctrl Case;; KEYBOARD TYPES: G_KB+P12_KB+AT;; TABLE TYPE: Translate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; DW COM_CTRL_K2_END-$ ;; length of state section DB CTRL_CASE ;; State ID DW G_KB+P12_KB+AT_KB ;; Keyboard Type DB -1,-1 ;; Buffer entry for error character ;; DW COM_CTRL_K2_T1_END-$ ;; Size of xlat table DB TYPE_2_TAB ;; xlat options: DB 2 ;; number of entries;;***BD THIS ENTRY IS A TEST ENTRY;; DB 53,226,0 ;; TEST ENTRY DB 43,-1,-1 ;; invalid slash DB 41,28,41 ;; valid slashCOM_CTRL_K2_T1_END: ;; ;; DW 0 ;; Size of xlat table - null table ;;COM_CTRL_K2_END: ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; CODE PAGE: Common;; STATE: Non-Alpha Lower Case;; KEYBOARD TYPES: G_KB+P12_KB;; TABLE TYPE: Translate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; DW COM_NA_LO_K1_END-$ ;; length of state section DB NON_ALPHA_LOWER ;; State ID DW G_KB+P12_KB ;; Keyboard Type DB -1,-1 ;; Buffer entry for error character ;; DW COM_NA_LO_K1_T1_END-$ ;; Size of xlat table DB STANDARD_TABLE ;; xlat options: DB 2 ;; number of entries DB 40,"'" ;; ' DB 43,'#' ;; #COM_NA_LO_K1_T1_END: ;; ;; DW 0 ;; Size of xlat table - null table ;;COM_NA_LO_K1_END: ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; CODE PAGE: Common;; STATE: Non-Alpha Lower Case;; KEYBOARD TYPES: AT;; TABLE TYPE: Translate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; DW COM_NA_LO_K2_END-$ ;; length of state section DB NON_ALPHA_LOWER ;; State ID DW AT_KB ;; Keyboard Type DB -1,-1 ;; Buffer entry for error character ;; DW COM_NA_LO_K2_T1_END-$ ;; Size of xlat table DB STANDARD_TABLE ;; xlat options: DB 3 ;; number of entries DB 41,"\" ;; \ DB 40,"'" ;; ' DB 43,'#' ;; #COM_NA_LO_K2_T1_END: ;; ;; DW 0 ;; Size of xlat table - null table ;;COM_NA_LO_K2_END: ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; CODE PAGE: Common;; STATE: Non-Alpha Lower Case;; KEYBOARD TYPES: XT_KB;; TABLE TYPE: Translate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; DW COM_NA_LO_K3_END-$ ;; length of state section DB NON_ALPHA_LOWER ;; State ID DW XT_KB ;; Keyboard Type DB -1,-1 ;; Buffer entry for error character ;; DW COM_NA_LO_K3_T1_END-$ ;; Size of xlat table DB STANDARD_TABLE ;; xlat options: DB 2 ;; number of entries DB 40,"'" ;; ' DB 41,'#' ;; # DB 43,'\' ;; #COM_NA_LO_K3_T1_END: ;; ;; DW 0 ;; Size of xlat table - null table ;;COM_NA_LO_K3_END: ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; CODE PAGE: Common;; STATE: Non-Alpha Upper Case;; KEYBOARD TYPES: G_KB+P12_KB+;; TABLE TYPE: Translate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; DW COM_NA_UP_K1_END-$ ;; length of state section DB NON_ALPHA_UPPER ;; State ID DW G_KB+P12_KB ;; Keyboard Type DB -1,-1 ;; Buffer entry for error character ;; DW COM_NA_UP_T1_K1_END-$ ;; Size of xlat table DB STANDARD_TABLE ;; xlat options: DB 5 ;; number of entries DB 41,0AAh ;; � DB 3,'"' ;; " DB 4,09CH ;; � DB 40,'@' ;; at sign DB 43,07EH ;; ~COM_NA_UP_T1_K1_END: ;; ;; DW 0 ;; Size of xlat table - null table ;;COM_NA_UP_K1_END: ;; ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; CODE PAGE: Common;; STATE: Non-Alpha Upper Case;; KEYBOARD TYPES: XT_KB;; TABLE TYPE: Translate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; DW COM_NA_UP_K2_END-$ ;; length of state section DB NON_ALPHA_UPPER ;; State ID DW XT_KB ;; Keyboard Type DB -1,-1 ;; Buffer entry for error character ;; DW COM_NA_UP_T1_K2_END-$ ;; Size of xlat table DB STANDARD_TABLE ;; xlat options: DB 5 ;; number of entries DB 3,'"' ;; " DB 4,09CH ;; � DB 41,07EH ;; ~ DB 40,'@' ;; at sign DB 43,07CH ;; Broken vertical barCOM_NA_UP_T1_K2_END: ;; ;; DW 0 ;; Size of xlat table - null table ;;COM_NA_UP_K2_END: ;; ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; CODE PAGE: Common;; STATE: Non-Alpha Upper Case;; KEYBOARD TYPES: AT_KB;; TABLE TYPE: Translate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; DW COM_NA_UP_K3_END-$ ;; length of state section DB NON_ALPHA_UPPER ;; State ID DW AT_KB ;; Keyboard Type DB -1,-1 ;; Buffer entry for error character ;; DW COM_NA_UP_T1_K3_END-$ ;; Size of xlat table DB STANDARD_TABLE ;; xlat options: DB 5 ;; number of entries DB 41,07Ch ;; � DB 3,'"' ;; " DB 4,09CH ;; � DB 40,'@' ;; at sign DB 43,07EH ;; ~COM_NA_UP_T1_K3_END: ;; ;; DW 0 ;; Size of xlat table - null table ;;COM_NA_UP_K3_END: ;; ;; ;; DW 0 ;; Last StateCOMMON_XLAT_END: ;; ;; ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;***************************************;; UK Specific Translate Section for 437;; 437 IS COMPLETELY COVERED BY THE COMMON TABLE.;;***************************************;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; PUBLIC UK2_437_XLAT ;;UK2_437_XLAT: ;; ;; DW CP437_XLAT_END-$ ;; length of section DW 437 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; CODE PAGE: CP437;; STATE: Third Shift;; KEYBOARD TYPES: G_KB+P12_KB;; TABLE TYPE: Translate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; DW CP437_THIRD_K1_END-$ ;; length of state section DB THIRD_SHIFT ;; State ID DW G_KB+P12_KB ;; Keyboard Type DB -1,-1 ;; Buffer entry for error character ;; DW CP437_THIRD_K1_T1_END-$ ;; Size of xlat table DB STANDARD_TABLE ;; xlat options: DB 1 ;; number of entries DB 41,0DDH ;; Solid vertical bar - graphics blockCP437_THIRD_K1_T1_END: ;; ;; DW 0 ;; Last xlat tableCP437_THIRD_K1_END: ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; CODE PAGE: CP437;; STATE: Non-Alpha Upper Case;; KEYBOARD TYPES: G_KB+P12_KB+;; TABLE TYPE: Translate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; DW CP437_NA_UP_K1_END-$ ;; length of state section DB NON_ALPHA_UPPER ;; State ID DW G_KB+P12_KB ;; Keyboard Type DB -1,-1 ;; Buffer entry for error character ;; DW CP437_NA_UP_T1_K1_END-$ ;; Size of xlat table DB STANDARD_TABLE ;; xlat options: DB 1 ;; number of entries DB 86,07ch ;; vertical barCP437_NA_UP_T1_K1_END: ;; ;; DW 0 ;; Size of xlat table - null table ;;CP437_NA_UP_K1_END: ;; ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; DW 0 ;; LAST STATE ;;CP437_XLAT_END: ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;***************************************;; UK Specific Translate Section for 850;;***************************************;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; PUBLIC UK2_850_XLAT ;;UK2_850_XLAT: ;; ;; DW CP850_XLAT_END-$ ;; length of section DW 850 ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; CODE PAGE: CP850;; STATE: Third Shift;; KEYBOARD TYPES: G_KB+P12_KB;; TABLE TYPE: Translate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; DW CP850_THIRD_K1_END-$ ;; length of state section DB THIRD_SHIFT ;; State ID DW G_KB+P12_KB ;; Keyboard Type DB -1,-1 ;; Buffer entry for error character ;; DW CP850_THIRD_K1_T1_END-$ ;; Size of xlat table DB STANDARD_TABLE ;; xlat options: DB 1 ;; number of entries DB 41,07CH ;; Solid vertical bar - |CP850_THIRD_K1_T1_END: ;; ;; DW 0 ;; Last xlat tableCP850_THIRD_K1_END: ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; CODE PAGE: Common;; STATE: Non-Alpha Upper Case;; KEYBOARD TYPES: G_KB+P12_KB+;; TABLE TYPE: Translate;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; DW CP850_NA_UP_K1_END-$ ;; length of state section DB NON_ALPHA_UPPER ;; State ID DW G_KB+P12_KB ;; Keyboard Type DB -1,-1 ;; Buffer entry for error character ;; DW CP850_NA_UP_T1_K1_END-$ ;; Size of xlat table DB STANDARD_TABLE ;; xlat options: DB 1 ;; number of entries DB 86,0DDh ;; broken verticalCP850_NA_UP_T1_K1_END: ;; ;; DW 0 ;; Size of xlat table - null table ;;CP850_NA_UP_K1_END: ;; ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; DW 0 ;; LAST STATE ;;CP850_XLAT_END: ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;CODE ENDS ;; END ;;
|
