BCLR	DDRB,%00001000		
	BSET	DDRE,%00100000		
HERE	BRSET PORTB,%00010000,HERE	
	BSET	PORTE,%00100000		
	BCLR	PORTE,%00100000		
	BRA	HERE