COUNTREG EQU 0x10		
CNTVAL EQU D'16'		
	MOVLW	 CNTVAL	
	MOVWF	 COUNTREG	
	LFSR	 1,0x60	
B2	CLRF	 INDF1	
	INCF	 FSR1L,F	
	DECF	 COUNTREG,F	
	BNZ 	 B2