下载文档原格式
ORG 0030H
MOV P2,#0FEH ;置数码管选择初值
TEST: ;按键检测程序
MOV P1,#0F0H ;读P1口高四位数据前先置1 MOV A,P1 ;读P1口高四位
ANL A,#0F0H ;将A低四位清零，便于检测是否
;有键按下
CJNE A,#0F0H,L1 ;有键按下就跳到L1
SJMP TEST ;没键按下就重新开始检测
L1: ;行扫描
MOV A,#0FEH ;置行扫描初值
L2:
PUSH ACC ;保存行扫描值
MOV P1,A
MOV A,P1 ;读P1口的值
ANL A,#0F0H
CJNE A,#0F0H,L3 ;该行有键按下，则转到延时程序L3 POP ACC ;没键按下则弹出行扫描值
RL A ;准备下一行扫描
CJNE A,#0EFH,L2 ;4行没扫描完就开始扫描下一行SJMP TEST ;4行扫描完则重新检测按键
L3: ;确定键编码
MOV A,P1 ;读P1口的值
ANL A,#0F0H ;保存列码
MOV R2,A ;将列码存入R2
POP ACC ;弹出行扫描值
ANL A,#0FH ;保存行码
ORL A,R2 ;得到完整的键码
MOV B,A ;将键码存入B
L4: ;检测是否有抖动或者键按住ACALL DELAY ;不放，直到抖动消失或按键MOV P1,#0F0H ;弹起，才显示按下的键所对MOV A,P1 ;应的字形
ANL A,#0F0H
CJNE A,#0F0H,L4
ACALL DISPLAY ;调用键值处理及显示程序SJMP TEST ;显示完后检测下一个按键DELAY: ;40ms延时去抖动子程序
MOV R5,#06H
D1:MOV R6,#0FAH
D2:DJNZ R6,D2
DJNZ R5,D1
RET
DISPLAY: ;键值处理及显示程序
MOV A,#00H ;置键码表偏移量初值
MOV DPTR,#TAB1 ;读入键码表表头地址
L5:
PUSH ACC ;保存偏移量
MOVC A,@A+DPTR ;读出键码
CJNE A,B,L6 ;将检测到的键码与键码表中的比
;较，若不相等，则转到L6 SJMP L7 ;若相等，转到L7
L6:
POP ACC ;弹出偏移量
INC A ;偏移量加1
CJNE A,#0FH,L5 ;若键码表未查完，则比较B与
;下一个键码
RET ;若查完，返回主程序
L7:
MOV DPTR,#TAB2 ;读入字型码表表头地址
POP ACC ;弹出检测到的键码所对应的
;偏移量
MOVC A,@A+DPTR ;得到键码所对应的字型码PUSH ACC ;保存字型码
MOV A,P2 ;暂存数码管选择位
RR A
MOV P2,A ;选择下一个数码管
POP ACC ;弹出字型码
MOV P0,A ;将字型码送数码管显示
RET ;返回主程序
TAB1: DB 0EEH,0DEH,0BEH,7EH,0EDH,0DDH,0BDH,7DH,0EBH,0DBH, 0BBH,7BH,0E7H,0D7H,0B7H,077H
TAB2: DB 28H,7EH,0A2H,62H,74H,61H,21H,7AH,20H,60H,0A9H,0A1 H,0B1H,34H,0ADH,0B0H
END
