COUNTREG EQU 0x20	
	CNTVAL EQU D'4'	
	MOVLW	CNTVAL	
	MOVWF	COUNTREG	
	LFSR	0,0x30	
	LFSR	1,0x50	
	LFSR	2,0x60	
	BCF	STATUS,C	
B3	MOVF	POSTINC0,W	
	ADDWFC POSTINC1,W	
	DAW			
	MOVWF	POSTINC2	
	DECF	COUNTREG,F	
	BNZ 	B3