【正文】 TEST AL,80H JNZ KEY_1 CALL KEY9 JMP STTK KEY_1: TEST AL,40H JNZ KEY_A CALL KEY1 JMP STTK 15 KEY_A: MOV AL,0FBH OUT 61H,AL IN AL,62H TEST AL,80H JNZ KEY_2 CALL KEYA JMP STTK KEY_2: TEST AL,40H JNZ KEY_B CALL KEY2 JMP STTK KEY_B: MOV AL,0F7H OUT 61H,AL IN AL,62H TEST AL,80H JNZ KEY_3 CALL KEYB JMP STTK KEY_3: TEST AL,40H JNZ KEY_C CALL KEY3 JMP STTK KEY_C: MOV AL,0EFH OUT 61H,AL IN AL,62H TEST AL,80H JNZ KEY_4 CALL KEYC JMP STTK 16 KEY_4: TEST AL,40H JNZ KEY_D CALL KEY4 JMP STTK KEY_D: MOV AL,0DFH OUT 61H,AL IN AL,62H TEST AL,80H JNZ KEY_5 CALL KEYD JMP STTK KEY_5: TEST AL,40H JNZ KEY_D CALL KEY5 JMP STTK KEY_E: MOV AL,0BFH OUT 61H,AL IN AL,62H TEST AL,80H JNZ KEY_6 CALL KEYE JMP STTK KEY_6: TEST AL,40H JNZ KEY_F CALL KEY6 JMP STTK KEY_F: MOV AL,07FH OUT 61H,AL IN AL,62H 17 TEST AL,80H JNZ KEY_7 CALL KEYF JMP STTK KEY_7: TEST AL,40H JNZ KEY_71 CALL KEY7 JMP STTK KEY_71:JMP STTK KEY9: CMP BH,00H ；按鍵 9處理子程序 JZ KEY9_1 ；未按過符號鍵，不清零 CALL CLEAR ；已按過符號鍵，清零 KEY9_1:CALL LP1 ；低 4 位字節(jié)前移 MOV AL,6FH ；最低字節(jié)輸入一個數(shù)據(jù) MOV [SI+4],AL MOV AL,09H MOV [DI+4],AL CALL DISP ；顯示 RET ；返回 KEY8: CMP BH,00H ；按鍵 8處理子程序 JZ KEY8_1 CALL CLEAR KEY8_1:CALL LP1 MOV AL,7FH MOV [SI+4],AL MOV AL,08H MOV [DI+4],AL CALL DISP RET 18 KEY7: CMP BH,00H ；按鍵 7處理子程序 JZ KEY7_1 CALL CLEAR KEY7_1:CALL LP1 MOV AL,07H MOV [SI+4],AL MOV AL,07H MOV [DI+4],AL CALL DISP RET KEY6: CMP BH,00H ；按鍵 6處理子程序 JZ KEY6_1 CALL CLEAR KEY6_1:CALL LP1 MOV AL,7DH MOV [SI+4],AL MOV AL,06H MOV [DI+4],AL CALL DISP RET KEY5: CMP BH,00H ；按鍵 5處理子程序 JZ KEY5_1 CALL CLEAR KEY5_1:CALL LP1 MOV AL,6DH MOV [SI+4],AL MOV AL,05H MOV [DI+4],AL CALL DISP 19 RET KEY4: CMP BH,00H ；按鍵 4處理子程序 JZ KEY4_1 CALL CLEAR KEY4_1:CALL LP1 MOV AL,66H MOV [SI+4],AL MOV AL,04H MOV [DI+4],AL CALL DISP RET KEY3: CMP BH,00H ；按鍵 3處理子程序 JZ KEY3_1 CALL CLEAR KEY3_1:CALL LP1 MOV AL,4FH MOV [SI+4],AL MOV AL,03H MOV [DI+4],AL CALL DISP RET KEY2: CMP BH,00H ；按鍵 2處理子程序 JZ KEY2_1 CALL CLEAR KEY2_1:CALL LP1 MOV AL,5BH MOV [SI+4],AL MOV AL,02H