flash lamp.asm

(大杂烩)proteus仿真MCS51一百例

		ORG 0
START:	SETB 	P1.0		;LED熄灭
		LCALL 	DELAY
		CLR 	P1.0		;LED点亮
		LCALL 	DELAY
		LJMP 	START
DELAY: 	MOV 	R5,#20		;延时子程序
D1: 	MOV 	R6,#20
D2: 	MOV 	R7,#248
		DJNZ 	R7,$
		DJNZ 	R6,D2
		DJNZ	R5,D1
		RET
		END