ORG      0
LOOP:	MOV	A,#0FEH
		MOV	R2,#8
OUTPUT:	MOV	P1,A
		RL	A
		ACALL	DELAY
		DJNZ	R2,OUTPUT
		LJMP	LOOP
DELAY:	MOV	R6,#0
		MOV	R7,#0
DELAYLOOP:              		;延時程序
		DJNZ 	R6,DELAYLOOP
		DJNZ	R7,DELAYLOOP
		RET
		END