200+

RM51单片机实验板配套实验例程库

;****************************************************************
;*      ★★★          无线遥控解码实验          ★★★        *
;* (电子驿站单片机实验板、开发板配套例程，程序转载请著明出处。) *
;*  E-mail:[e-mail]   QQ留言：451338254  476485321    *
;*  编程：ourmpu  http://www.ourmpu.com/ 更多例程请登陆网站     *
;****************************************************************
;*  按压遥控手柄的解锁按钮，P1.4发光二极管点亮，继电器吸合      *
;*  按压遥控手柄的上锁按钮，P1.5发光二极管点亮，继电器落下      *
;*  按压遥控手柄的搜索按钮"S"，P1.6发光二极管点亮               *
;*  按压遥控手柄的响铃按钮，P1.7发光二极管点亮                  *
;*  当解码正确以后，蜂鸣器发出声音提示。                        *
;****************************************************************

	ORG	0000H
	AJMP	MAIN
		
	ORG	0033H
		
;---------------------------------------------------------

MAIN:	JB	P1.0,P10H
	JB	P1.1,P11H
	JB	P1.2,P12H
	JB	P1.3,P13H
	AJMP	MAIN
P10H:	CLR	P1.5	;上锁按钮有效，点亮上锁状态指示灯P1.5
	SETB	P3.6	;继电器落下
	SETB	P1.4
	SETB	P1.7
	SETB	P1.6
	ACALL	SOUND
	JB	P1.0,$
	AJMP	MAIN
P11H:	CLR	P1.7
	SETB	P1.5
	SETB	P1.6
	SETB	P1.4
	ACALL	SOUND
	JB	P1.1,$
	AJMP	MAIN
P12H:	CLR	P1.4	;开锁按钮有效，点亮P1.4发光二极管
	CLR	P3.6	;继电器吸合，开锁
	SETB	P1.5
	SETB	P1.6
	SETB	P1.7
	ACALL	SOUND
	JB	P1.2,$
	AJMP	MAIN
P13H:	CLR	P1.6	
	SETB	P1.4
	SETB	P1.5
	SETB	P1.7
	ACALL	SOUND
	JB	P1.3,$
	AJMP	MAIN

;******* 按键音效延时(50ms)子程序 *******
SOUND:	MOV	R7,#228
SDL1:	CPL	p3.7
	MOV	R6,#0FFH
SDL0:	DJNZ	R6,SDL0
	DJNZ	R7,SDL1
	RET

	END