200+

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

;****************************************************************
;*      ★★★          无线遥控解码实验          ★★★        *
;* (电子驿站单片机实验板、开发板配套例程，程序转载请著明出处。) *
;*  E-mail:[e-mail]   QQ留言：451338254 476485321     *
;*  编程：ourmpu  http://www.ourmpu.com/   更多例程请登陆网站   *
;****************************************************************
;*  按压遥控手柄上的ABCD四个按键，则解码成功后，对应的P1.4、    *
;*  P1.5、P1.6、P1.7四个发光二极管会进行自锁跳变，蜂鸣器发出声  *
;*  音提示。按压按键A时，继电器也同步进行吸合翻转动作           *
;****************************************************************

	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:	CPL	P1.5
	ACALL	SOUND
	JB	P1.0,$
	AJMP	MAIN
P11H:	CPL	P1.7
	ACALL	SOUND
	JB	P1.1,$
	AJMP	MAIN
P12H:	CPL	P1.4
	CPL	P3.6
	ACALL	SOUND
	JB	P1.2,$
	AJMP	MAIN
P13H:	CPL	P1.6
	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