HERE:	SETB	 P1.0	
		LCALL DELAY	
		CLR	 P1.0	
		LCALL DELAY
		SJMP	 HERE