test7.asm

来自「红外单片机开发基础」· 汇编 代码 · 共 71 行

;=================================================
;
;	多功能红外单片机开发板	配套实验板学习例程
;
;	中国DSP网	
;
;	http://www.chinadsp.cn
;	E-mail:[e-mail]
;=================================================
ORG 0000H 
LJMP START;转入主程序
ORG 0010H 
START:

MAIN:

	MOV	A,#00000011B
	ORL	A,P3
	CPL	A
	JZ		MAIN
	LCALL	DELAY10MS	;去抖动
	MOV	A,#00000011B
	ORL	A,P3
	CPL	A
	JZ		MAIN

	JB		ACC.2,KEY_SW1
	JB		ACC.3,KEY_SW2
	JB		ACC.4,KEY_SW3
	JB		ACC.5,KEY_SW4
	JB		ACC.6,KEY_SW5
	JB		ACC.7,KEY_SW6
	LJMP	MAIN
KEY_SW1:
	CPL	P1.0
	AJMP	KEY_END
KEY_SW2:
	CPL	P1.1
	AJMP	KEY_END
KEY_SW3:
	CPL	P1.2
	AJMP	KEY_END
KEY_SW4:
	CPL	P1.3
	AJMP	KEY_END
KEY_SW5:
	CPL	P1.4
	AJMP	KEY_END
KEY_SW6:	
	CPL	P1.5
	AJMP	KEY_END


KEY_END:
	MOV	A,#00000011B
	ORL	A,P3
	CPL	A
	JNZ	KEY_END
	LJMP	MAIN



DELAY10MS: 
	MOV R4,#20
DELAY10MSA:
	MOV R5,#247
	DJNZ R5,$
	DJNZ R4,DELAY10MSA
RET
END