ORG	0
LOOP:	MOV	P1,#0FFH
	MOV	A,P1
	JNZ	LOOP1
	CLR	P3.0
	SJMP	LOOP
LOOP1:	CJNE	A,#0FFH,LOOP2
	SETB	P3.0
	SJMP	LOOP
LOOP2:	MOV	R0,A
	MOV	A,#0FFH
	CLR	C
	SUBB	A,R0
	MOV	R1,A
	SETB	P3.0
LOOP3:	LCALL	DELAY
	DJNZ	R0,LOOP3
	CLR	P3.0
LOOP4:	LCALL	DELAY
	DJNZ	R1,LOOP4
	SJMP	LOOP
DELAY:	MOV	R7,#17
	DJNZ	R7,$
	RET
	END