闪烁显示等待键入MCS51单片机子程序举例

;闪烁显示等待键入子程序

;功能：R1指向闪烁位地址，等待键入，并返回键值

;占用：A，B，R0，R5

;入口：R1出口：A

ORG0150H

CURSOR:MOVR0,#3FH;R0指向显示缓冲区

CUR_0:MOVB,@R1;R1指向闪烁位地址

CUR_1:MOV@R1,B

JNCCUR_3

MOVA,R5

JNBACC.4,CUR_4;闪烁计数到否

JNBACC.5,CUR_5

MOVA,R1

XRLA,R0

JNZCUR_2

MOV@R1,A

SJMPCUR_4

CUR_2:CJNE@R1,#16,CUR_3;当前位是否为数字

CUR_3:JNCCUR_4

MOV@R1,#10H;显示空格

CUR_4:ACALLDISP_0

ACALLT_KB

JNZCUR_5

INCR5;闪烁计数

SJMPCUR_1

CUR_5:ACALLKEY_LD

JZCUR_1;无键,继续

MOV@R1,B;恢复闪烁处数值

ACALLKB_VUL;取键值

RET