【正文】 。子程序返回。主程序START: LCALL CLEARMEN 。上電初始化MAIN: LCALL KEYWORK 。調(diào)查鍵子程序 LCALL DISPLAY 。LED顯示一次 AJMP MAIN 。轉(zhuǎn)MAIN循環(huán) NOP 。PC出錯(cuò)處理 NOP 。 AJMP START 。重新初始化。 4*4行列掃描查鍵子程序KEYWORK: MOV P1,0FFH 。 置P1口為輸入狀態(tài) CLR 。掃描第一行(第一行為0) MOV A,P1 。讀入P1口值 ANL A,0F0H 。低四位為0 CJNE A,0F0H,KEYCON 。高四位不為全1(有鍵按下)轉(zhuǎn)KEYCOON SETB 。 掃描第二行(第二行為0) CLR 。 MOV A,P1 。 讀入P1口值 ANL A,0F0H 。 低四位為0 CJNE A,0F0H,KEYCON 。 高四位不為全1(有鍵按下)轉(zhuǎn)KEYCOON SETB 。 掃描第三行(第三行為0) CLR 。 MOV A,P1 。 讀入P1口值 ANL A,0F0H 。 低四位為0 CJNE A,0F0H,KEYCON 。 高四位不為全1(有鍵按下)轉(zhuǎn)KEYCOON SETB 。 掃描第四行(第四行為0) CLR 。 MOV A,P1 。 讀入P1口值 ANL A,0F0H 。 低四位為0 CJNE A,0F0H,KEYCON 。 高四位不為全1(有鍵按下)轉(zhuǎn)KEYCOON SETB 。結(jié)束行掃描 RET 。子程序返回KEYCON: LCALL DL10MS 。消抖處理 MOV A,P1 。再讀入P1口值 ANL A,0F0H 。 低四位為0 CJNE A,0F0H,KEYCHE 。 高四位不為全1,確有鍵按下,轉(zhuǎn)KEYCHEKEYOUT: RET 。干擾,子程序返回KEYCHE: MOV A,P1 。讀P1口值 MOV KEYWORD,A 。放入23H暫存CJLOOP: LCALL DISPLAY 。調(diào)顯示子程序 MOV A,P1 。讀P1口值 ANL A,0F0H 。低四位為0 CJNE A,0F0H,CJLOOP 。高四位為全1(鍵還按著),轉(zhuǎn)CJLOOP等待釋放 MOV R7,00H 。鍵釋放,置R7初值為00H(查表次數(shù)) MOV DPTR,KEYTAB 。取鍵值表首址CHEKEYLOOP: MOV A,R7 。查表次數(shù)入A MOVC A,@A+DPTR 。查表 XRL A,KEYWORD 。查表值與P1口讀入值比較 JZ KEYOK 。為0(相等)轉(zhuǎn)KEYOK INC R7 。不等,查表次數(shù)加1 CJNE R7,10H,CHEKEYLOOP 。查表次數(shù)不超過(guò)16次轉(zhuǎn)CHEKEYLOOP再查 RET 。16次到,退出。KEYOK: MOV A,R7 。查表次數(shù)入A(即鍵號(hào)值) MOV B,A 。放入B RL A 。左移 ADD A,B 。相加(鍵號(hào)乘3處理JMP 3字節(jié)指令) MOV DPTR,KEYFUNTAB 。取鍵功能散轉(zhuǎn)表首址 JMP @A+DPTR 。查表KEYFUNTAB: LJMP KEYFUN00 。 鍵功能散轉(zhuǎn)表。跳至0號(hào)鍵功能程序 LJMP KEYFUN01 。 LJMP KEYFUN02 LJMP KEYFUN03 LJMP KEYFUN04 LJMP KEYFUN05 LJMP KEYFUN06 LJMP KEYFUN07 LJMP KEYFUN08 LJMP KEYFUN09 LJMP KEYFUN10 LJMP KEYFUN11 LJMP KEYFUN12 LJMP KEYFUN13 LJMP KEYFUN14 LJMP KEYFUN15 。 跳至15號(hào)鍵功能程序 RET 。散轉(zhuǎn)出錯(cuò)返回。鍵號(hào)對(duì)應(yīng)P1口數(shù)值表（同時(shí)按下兩鍵為無(wú)效操作）KEYTAB: DB 0EEH,0DEH,0BEH,7EH,0EDH,0DDH,0BDH,7DH DB 0EBH,0DBH,0BBH,7BH,0E7H,0D7H,0B7H,77H,0FFH,0FFH。0號(hào)鍵功能程序KEYFUN00: INC 29H MOV A,29H CLR C CJNE A,02H,FUN00 FUN00: JC FUN00OUT MOV 29H,00H FUN00OUT: MOV A,29H XRL A,01H JNZ F00OUT1 MOV 28H,00H AJMP F00OUT F00OUT1: MOV 28H,08H F00OUT: LCALL DISPUPDAT RET 。01號(hào)鍵功能程序KEYFUN01: INC 28H MOV A,28H CLR C CJNE A,0AH,FUN01 FUN01: JC FUN01OUT MOV 28H,00H FUN01OUT: MOV A,29H XRL A,01H JNZ F01OUT MOV 28H,00H AJMP F001OUT F01OUT: MOV A,28H XRL A,08H JZ F001OUT MOV A,28H XRL A,09H JZ F001OUT MOV 28H,08H F001OUT: LCALL DISPUPDAT RET 。02號(hào)鍵功能程序KEYFUN02: INC 27H MOV A,27H 。 CLR C 。 CJNE A,0AH,FUN02 FUN02: JC FUN02OUT MOV 27H,00H FUN02OUT: LCALL DISPUPDAT RET 。03號(hào)鍵功能程序KEYFUN03: INC 26H 。 MOV A,26H 。 CLR C 。 CJNE A,0AH,FUN03 FUN03: JC FUN03OUT MOV 26H,00H FUN03OUT: LCALL DISPUPDAT RET 。04號(hào)鍵功能程序KEYFUN04: MOV 29H,01H MOV 28H,00H MOV 27H,09H MOV 26H,00H LCALL DISPUPDAT RET。05號(hào)鍵功能程序KEYFUN05: MOV 29H,01H 。 MOV 28H,00H MOV 27H,08H MOV 26H,00H LCALL DISPUPDAT 。 RET。06號(hào)鍵功能程序KEYFUN06: MOV 29H,01H MOV 28H,00H MOV 27H,05H MOV 26H,00H LCALL DISPUPDAT RET。07號(hào)鍵功能程序KEYFUN07: MOV 29H,01H MOV 28H,00H MOV 27H,00H MOV 26H,00H LCALL DISPUPDAT RET。08號(hào)鍵功能程序KEYFUN08: MOV 29H,00H MOV 28H,09H MOV 27H,08H MOV 26H,00H LCALL DISPUPDAT RET。09號(hào)鍵功能程序KEYFUN09: MOV 29H,00H MOV 28H,09H MOV 27H,06H MOV 26H,00H LCALL DISPUPDAT RET。