ORG	0000H		
	MOVLW	0x50 		
	MOVWF	TBLPTRL	
	MOVLW	0x02 		
	MOVWF	TBLPTRH	
	CLRF	TRISB		
B7	TBLRD*+		
	MOVF	TABLAT,W	
	BZ	EXIT		
	MOVWF	PORTB		
	BRA	B7		
EXIT	GOTO	EXIT
	ORG	0x250
MYDATA DB	"USA",0 	
	END