key_s.inc

周立功单片机DP51+程序

;参数定义								
SDA	BIT		P1.0
CLK	BIT		P1.1
KDKEY	BIT     	P1.2		;定义键盘检测位
FRIT	EQU     	P1              ;定义P1口

TXDBYTE:
	   PUSH	   PSW
	   PUSH	   ACC	
	   MOV	   R3,#08H
TXDUP:	   RLC	   A
	   MOV	   SDA,C
	   CLR	   CLK
	   SETB	   CLK
	   DJNZ	   R3,TXDUP
	   POP	   ACC
           POP	   PSW
	   RET											

KEY:	
	MOV		A,#00H			
	MOV		R1,#00H		;赋初值
	ACALL		TXDBYTE
	JB		KDKEY,KEY			
	MOV		A,#0FEH		;是，则判断其键值
KEYZHI:	ACALL		TXDBYTE		;是此键吗？
	JNB		KDKEY,KEYRET	;是，则保存退出
	RL		A				;否则检测下一个键
	INC		R1
	CJNE		A,#7FH,KEYZHI	;检测完了吗？
KEYRET:	
	MOV		FRIT,#0FFH
	RET