COUNTREG EQU 0x10		
CNTVAL EQU D'16'		
	MOVLW	 CNTVAL	
	MOVWF	 COUNTREG	
	LFSR	 1,0x60	
B3	CLRF	 POSTINC1	
	DECF	 COUNTREG,F	
	BNZ 	 B3