keys.inc

来自「RS232串口C语言应用程序 基于51单片机」· INC 代码 · 共 32 行

;参数定义								
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		R1,#00H		;赋初值
	MOV		A,#0FEH		;是，则判断其键值
KEYZHI:	ACALL		TXDBYTE		;是此键吗？
	JNB		KDKEY,KEYRET	;是，则保存退出
	RL		A		;否则检测下一个键
	INC		R1
	CJNE		A,#7FH,KEYZHI	;检测完了吗？
KEYRET:	
	MOV		FRIT,#0FFH
	RET