【文章內容簡介】 。設置為A口輸入，B口輸出,C口輸出OUT 46H,ALMOV DI,OFFSET X+3 。DI指向X的高位KKK: CALL KEY 。掃描按鍵JMP KKK。以下為按鍵掃描子程序，程序返回后，在變量H和L中存放當前按鍵的行列號KEY PROCCHECK: CALL DISP 。等待按鍵按下的同時進行顯示MOV AL,0F0H 。所有行輸出低電平OUT 44H,ALIN AL,40HCMP AL,0FFH 。讀列值JZ CHECK 。若都為高電平則無鍵按下，等待MOV CX,50LOOP $ 。延時消抖IN AL,DX 。重讀列值CMP AL,0FFHJZ CHECK 。無鍵按下一直等待MOV H,0 。有鍵按下，先把行列號變量清0MOV L,0MOV BL,01HMOV BH,0FEH 。掃描法讀鍵值：從第一行開始測試，即PC0輸出低電平NEXT: MOV AL,BHOUT 44H,ALNEXTH: IN AL,40H 。讀列值，判斷是第幾列有鍵按下TEST AL,BL 。從第一列開始判斷JZ WAIT0ROL BL,1CMP BL,10H 。當前行狀態(tài)下沒有列有鍵按下，則轉為對下一行的測試JZ NEXTLINC H 。每判斷一列，列號加1JMP NEXTH 。再對下一列進行判斷NEXTL: MOV H,0MOV BL,01HROL BH,1 。對下一行測試，讓下一個PC口輸出低電平CMP BH,0EFHJZ EXITINC LJMP NEXTWAIT0: IN AL,40H 。若有鍵按下，則等該按鍵松開后再計算鍵值CMP AL,0FFHJNZ WAIT0MOV CX,50LOOP $ 。延時消抖IN AL,40HCMP AL,0FFHJNZ WAIT0CALL KEYVALUE 。調計算鍵值子程序EXIT: RETKEY ENDP。以下為計算鍵值子程序,通過行列號計算鍵值（鍵值=行號*4+列號）鍵值存放在DL寄存器中KEYVALUE PROCMOV DL,LMOV DH,HSHL DL,1SHL DL,1 。列號乘4ADD DL,DHCMP DL,9 。按下的是數字鍵JNG NUM_CALLCMP DL,14JL CONT_CALL 。按下的是運算鍵CMP DL,14JZ OUTP_CALL 。按下的是等于鍵CMP DL,15JZ CLR_CALL 。按下的是清除鍵NUM_CALL: CALL NUMBER 。調數字鍵處理子程序JMP EXIT1CONT_CALL: MOV S,DL 。存放運算鍵的鍵值MOV E,0CALL COUNT 調運算鍵處理子程序，計算第一個加數JMP EXIT1OUTP_CALL: CALL OUTP 。調等號鍵處理子程序JMP EXIT1CLR_CALL: CALL CLEAR 。調清除鍵處理子程序EXIT1: RETKEYVALUE ENDP。以下為清除鍵處理子程序，按下清除鍵后，X變量全部清0CLEAR PROCMOV X[3],0MOV X[2],0MOV X[1],0MOV X[0],0CALL BITPRETCLEAR ENDP。以下為等號鍵處理子程序，該子程序負責將第二個運算數據的數值計算出來存入X2變量。并根據運算符號，調用相應的運算子程序OUTP PROCPUSH AXPUSH DXPUSH BXINC ECALL COUNT 。調運算鍵處理子程序，計算第二個運算數據CMP S,10JZ ADD_CALL 。運算符為加號，則調用加法子程序CMP S,11JZ SUB_CALL 。運算符為減號，則調用減法子程序CMP S,12JZ MUL_CALL 。運算符為乘號，則調用乘法子程序CMP S,13CALL DIVP 。運算符為除號，則調用除法子程序JMP STORE1ADD_CALL: CALL ADDPJMP STORE1SUB_CALL: CALL SUBPJMP STORE1MUL_CALL: CALL MULPSTORE1: MOV AX,Y 。以下程序將各運算子程序返回的運算結果，按位分解，送入X變量MOV DX,0MOV BX,1000DIV BXMOV X[0], ALMOV AX,DXMOV BL,100DIV BLMOV X[1],ALMOV AL,AHMOV AH,0MOV BL,10DIV BLMOV X[2],ALMOV X[3],AHPOP BXPOP DXPO