COUNTREG EQU 0x10	
	CNTVAL EQU D'5'	
	MOVLW	 CNTVAL	
	MOVWF	 COUNTREG	
	LFSR	 0,0x30	
	LFSR	 1,0x60	
B3	MOVF	 POSTINC0,W	
	MOVWF	 POSTINC1	
	DECF	 COUNTREG,F	
	BNZ 	 B3