LDAA	#$0		
    	STAA  SCI0BDH 
	LDAA	#$0D		
    	STAA  SCI0BDL    	
    	LDAA  #0	   	
    	STAA	SCI0CR1	
    	LDAA  #$0C	   	
    	STAA	SCI0CR2	
	LDAA	#$FF		
	STAA	DDRB		
	LDAA	#$0		
	STAA	DDRA		
	LDAA  #'Y'		
	JSR	TRANS
	LDAA  #'E'		
	JSR	TRANS
	LDAA  #'S'		
	JSR	TRANS
OVER	LDAA  PORTA		
	JSR 	TRANS		
	JSR 	RECV		
	STAA	PORTB 	
	BRA	OVER		
TRANS	
S1	BRCLR	SCI0SR1, mSCI1SR1_TDRE,S1 
	STAA	SCI0DRL	
	RTS			
RECV	
R1	BRCLR	SCI0SR1, mSCI1SR1_RDRF,R1 
	LDAA	SCI0DRL   	
	RTS