IBM PC CONVERTIBLE

04C7 F6 06 0017 R 03 TEST
JZ
XOR
JMP
KB_FLAG,LEFLSHIFT+RIGHLSHIFT ; PORT 60 SHIFT STATE ?
04CC 74 3E XLT90 ; NO, GO WRITE TO PORT 60
04CE 80 36 0017 R 20 KLFLAG,NUM_STATE ; RESET KEYPAD STATE
04D3 EB 37 90
04D6
;
XL T90 ; GO WRITE TO PORT 60
BASE KEYS PROCESSING
SCAN CODE IS NOT IN SPECIAL TABLES. XLATE TO PCl SCAN CODES.
AFTER TRANSLATION THE CURSOR, INSERT, AND DELETE KEYS ARE DETECTED
AND ROUTED TO THE ROUTINE THAT GUARANTEES THE PORT 60 KEYPAD STATE
IS INACTIVE. ALL OTHER KEYS ARE WRITTEN TO PORT 60.
; NOT A FN+KEY OR KEYPAD KEY -- GET KEY'S P60 SC
XLT60 :
AL <=== NMI SC WIO BREAK BIT
04D6 8D IE 0000 E LEA BX,KBNMLTBL SCAN CODE TABLE - NMI TO PCl
04DA 2E: D7
04DC 24 7F
04DE
04DE 3C 48
04EO 73 17
04E2 3C 38
04E4 75 OC
04E6 F6 C2 08
04E9 74 07
04EB OA C4
04ED A2 00B9
04FO BO EO
04F2
04F2
OA C4
04F4
E8 0524 R
04F7 EB 13
04F9
04F9
OA C4
04FB
XLAT KBNMLTBL XLATE NMI SCAN CD TO PCl SCAN CD
AL <=== PCl SC FROM TBL
AND AL, 7 FH CLEAR TYPE BIT
XL T60_l:
CMP
AL,48H CURSOR, INSERT, DELETE
JAE XLT65 YES, JUMP TO PROCESS THESE KEYS
CMP
AL, P60-AL LSC
ALT KEY?
JNE XL T62 NO, JUMP AROUND
AL T KEY
TEST
DL,NMLUL LBIT3 R-ALT KEY?
JZ XLT62 NO, JUMP OUT
OR AL,AH USE NMI SC BREAK BIT
MOV P60_HOLD_BYTE ,AL
QUEUE P60 AL T SC
MOV
AL,HIDNJODCEO SEND HIDDEN CODE TO P60
NOT CURSOR, INSERT, DELETE
XL T62:
OR AL,AH USE NMI SC BREAK BIT
CALL
NUM_STATE_FIX
MAKE NUM_STATE RLCT KEYPAD_STATE
JMP SHORT XL T90
GO WRITE TO PORT 60
CURSOR, INSERT, OR DELETE KEY
XLT65 :
OR AL,AH
; USE NMI SC BREAK BIT
THE CURSOR, FUNCTION+CURSOR, INSERT, AND DELETE KEYS ARE NO LONGER IN
THE KEYPAD AREA OF THE KEYBOARD. WHEN THEIR SCAN CODES ARE WRITTEN TO
PORT 60, THE PORT 60 KEYPAD STATE MUST BE INACTIVE.
A PORT 60 SHIFT STATE TEMPORARILY TOGGLES THE KEYPAD STATE. IF THE
PORT 60 SHIFT STATE IS NOT SET THE P60 KEYPAD STATE IS RESET AND THE
PCl SCAN CODE IS WRITTEN TO PORT 60. IF THE PORT 60 SHIFT STATE
IS SET THE P60 KEYPAD STATE IS SET (IT WILL REVERT TO THE RESET STATE IN
THE PORT 60 PROCESSING) AND THE PCl SCAN CODE IS WRITTEN TO PORT 60.
XLT80 :
04FB 80 OE 0017 R 20 OR
TEST
JNZ
XOR
KB_FLAG,NUM_STATE ; SET P60 KEYPAD STATE
0500 F6 06 0017 R 03
KB_FLAG,LEFLSHIFT+RIGHLSHIFT ; PORT 60 SHIFT STATE ?
0505 75 05
XLT90 ; YES, GO WRITE TO PORT 60
0507 80 36 0017 R 20 KB_FLAG,NUM_STATE ; RESET P60 KEYPAD STATE
THE PCl SCAN CODE IN AL IS WRITTEN TO PORT 60
050C
050C
FA
050D 80 OE 00B4 R 80
0512 E6 60
0514 80 26 00B4 R EF
0519 EB 08
05lB
05lB
80 26 0064 R EF
0520 E9 0319 R
XL T90:
CLI
OR
OUT
AND
JMP
XLT95 :
AND
JMP
; DISABLE INTERRUPTS
KB_NMLCNTL,P60_LOADED ; SET ON PORT 60 ACTIVE STATUS
KLDATA,AL ; WRITE PCl SCAN CODE TO PORT 60
KB_NMLCNTL,NOT XLATE_BUSY RESET BUSY FLAG
SHORT XL noo
KB_NMLCNTL,NOT XLATE_BUSY ; RESET BUSY FLAG
XL no ; REDRIVE XLATE ROUTINE
ROM BIOS 2-43