十位键处理子程序-keysw.asm

红外抄表器.rar

;##############个位键处理子程序-KEYSW ############
;入口参数:无
;出口参数:无
;需调用函数:显示机号子程序-DISJIHAO
;说明:会修改JIHAOL的高四位,使之从零到九循环增加
;     EDSCAN定义在个位键处理子程序内
;################################################

KEYSW:MOV A,JIHAOL
	  ANL A,#0F0H			;保留高四位
	  SWAP A
	  INC A
	  CJNE A,#09H,SW00		;
SW00: JNC SW01 			;A>09H则转
	  ADD JIHAOL,#10H		;A<=09H时 十位加一
	  LJMP SW02
SW01: ANL JIHAOL,#0FH		;A>09H时 十位清零
GW02: SETB DISMOD       	;反白显示机号
	  LCALL DISJIHAO
	  LCALL DLY10MS
	  RET