led.asm

LED点阵跑马灯控制源代码

	L1 BIT P1.0
	ORG 0000H 
	AJMP START 
	ORG 0010H
START:
	CLR L1			  ;将P10口拉成低电平，L1亮
	CALL DELAY      ;延时越1m
	SETB L1			  ;将P10口拉成高电平，L1灭
	CALL DELAY
	JMP START		  ;跳转到START循环
DELAY:
	MOV R5,#8
DEL2:	MOV R6,#250
DEL1:	MOV R7,#250
	DJNZ R7,$
	DJNZ R6,DEL1
	DJNZ R5,DEL2
	RET
END