16_3_2.asm

来自「51事例原代码 事例多多 应该对初学者很有用」· 汇编 代码 · 共 89 行

	;电子栏杆发射部分汇编语言程序
ORG		0000H
A1:	MOV		DPH,#020H	;检测长时间高电平脉冲,作同步信号
A10:MOV		DPL,#0FFH
A11:JNB		P3.0,A1		;短脉冲,重新检测
	DJNZ	DPL,A11
	DJNZ	DPH,A10
A13:JB		P3.0,A13	;等待低电平
A2:	CLR		P1.1		;长脉冲后第一个低电平,开始从DS4发红外线信号
	CLR		P3.5		;DS3发红外线信号
	NOP					;低电平延时
	NOP
	NOP
	NOP
	NOP
	SETB	P1.1		;DS4停止发红外线信号
	SETB	P3.5		;DS3停止发红外线信号
	NOP					;高电平延时
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP					;26?s
	JNB		P3.0,A2		;重复,直到下一个应答信号
B1:	JB		P3.0,B1		;等待低电平
B2:	CLR		P1.7		;DS2发红外线信号
	CLR		P3.5		;DS3发红外线信号
	NOP					;低电平延时
	NOP
	NOP
	NOP
	NOP
	SETB	P1.7		;DS2停止发红外线信号
	SETB	P3.5		;DS3停止发红外线信号
	NOP					;高电平延时
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP					; 26?s
	JNB		P3.0,B2		;重复,直到下一个应答信号
C1:	JB		P3.0,C1		;等待低电平
C2:	CLR		P1.7		;DS2发红外线信号
	CLR		P1.6		;DS1发红外线信号
	NOP					;低电平延时
	NOP
	NOP
	NOP
	NOP
	SETB	P1.7		;DS2停止发红外线信号
	SETB	P1.6		;DS1停止发红外线信号
	NOP					;高电平延时
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP
	NOP				; 26?s
	JNB		P3.0,C2	;重复,直到下一个应答信号
	AJMP	A1
	END