;取键值程序
;功能:等待键入,并刷新显示,并返回键值放A
;占用:PSW,A,DPTR,R0,R2,R3,R4,R6,R7
;入口:无 出口:A
ORG 0190H
WAT_KB: MOV R0,#3FH
WAT_0: ACALL DISP_0 ;刷新显示器
ACALL T_KB
JZ WAT_0 ;无键,循环
ACALL KEY_LD ;延时消抖,刷新显示
JZ WAT_0 ;无键,循环
KB_VUL: CLR A
CPL A
MOV DPTR,#PORT_B
MOVX @DPTR,A ;关显示
MOV R2,#0FEH
MOV R4,#0
KB_1: MOV DPTR,#PORT_A
MOV A,R2
MOVX @DPTR,A ;扫描键盘
INC DPTR
INC DPTR
MOVX A,@DPTR ;读键盘
CPL A
ANL A,#0FH ;屏蔽无效位
JNZ KB_2 ;有键,转键分析
INC R4
MOV A,R2
JNB ACC.7,WAT_0 ;无键,返回
RL A
MOV R2,A
SJMP KB_1 ;无键,扫描下一行
KB_2: RRC A
JC KB_3 ;有键,转取键值
XCH A,R4 ;取下一行
ADD A,#8
XCH A,R4
SJMP KB_2 ;无键,循环
KB_3: MOV R2,#21
KB_4: ACALL DISP_0
ACALL T_KB
JZ KB_5 ;刷新显示,等键释放
DJNZ R2,KB_4
KB_5: MOV DPTR,#KEY_TB
MOV A,R4
MOVC A,@A+DPTR ;取键值
RET
KEY_LD: ACALL DISP_0
ACALL DISP_0
ACALL T_KB
RET
KEY_TB: DB 07H,08H,09H,0AH ;7,8,9,A
DB 1CH,1DH,1EH,11H ;FFIS/FUNC,FFNO/USER,FILL/MODE,空
DB 04H,05H,06H,0BH ;4,5,6,B
DB 1AH,1BH,1FH,10H ;COMP/DEC,MOVE/HEX,OFST/HIST,MON
DB 01H,02H,03H,0CH ;1,2,3,C
DB 18H,19H,14H,15H ;BP/BTOP,BT/BENT,EXEC,SCAL
DB 00H,0FH,0EH,0DH ;0,F,E,D
DB 16H,17H,12H,13H ;NEXT/+,LAST/-,TRAC,STEP
上一篇:80C51与液晶显示模块LCM
下一篇:闪烁显示等待键入MCS51单片机子程序举例