;闪烁显示等待键入子程序
;功能:R1指向闪烁位地址,等待键入,并返回键值
;占用:A,B,R0,R5
;入口:R1 出口:A
ORG 0150H
CURSOR: MOV R0,#3FH ;R0指向显示缓冲区
CUR_0: MOV B,@R1 ;R1指向闪烁位地址
CUR_1: MOV @R1,B
JNC CUR_3
MOV A,R5
JNB ACC.4,CUR_4 ; 闪烁计数到否
JNB ACC.5,CUR_5
MOV A,R1
XRL A,R0
JNZ CUR_2
MOV @R1,A
SJMP CUR_4
CUR_2: CJNE @R1,#16,CUR_3 ;当前位是否为数字
CUR_3: JNC CUR_4
MOV @R1,#10H ;显示空格
CUR_4: ACALL DISP_0
ACALL T_KB
JNZ CUR_5
INC R5 ;闪烁计数
SJMP CUR_1
CUR_5: ACALL KEY_LD
JZ CUR_1 ;无键,继续
MOV @R1,B ;恢复闪烁处数值
ACALL KB_VUL ;取键值
RET
『本文转载自网络,版权归原作者所有,如有侵权请联系删除』