MYREG	EQU 0x20
	CLRF	TRISB		
AGAIN	BTFSS	MYREG,7	
	BRA	OVER		
	MOVLW	A'Y'		
	MOVWF	PORTB		
	MOVLW	A'E'		
	MOVWF	PORTB		
	MOVLW	A'S'		
	MOVWF	PORTB		
	GOTO	AGAIN		
OVER	MOVLW	A'N'		
	MOVWF	PORTB		
	MOVLW	A'O'		
	MOVWF	PORTB		
	GOTO	AGAIN