BCLR	 DDRB,%11111111	
	BSET	 DDRA,%11111111	
	LDAA	 #'N'		
	STAA	 PORTA	
	LDAA	 #$99		
BACK	CMPA 	 PORTB	
	BNE	 BACK		
	LDAA	 #'Y'		
	STAA	 PORTA