ORG	0	
	SETF	TRISB		
	CLRF	TRISC		
B1	MOVF	PORTB,W	
	ANDLW	0x0F		
	CALL	XSQR_TABLE	
	MOVWF	PORTC		
	BRA	B1		
XSQR_TABLE
	MULLW	0x2		
	MOVFF	PRODL, WREG	
	ADDWF	PCL		
	RETLW	D'3'		
	RETLW	D'6'		
	RETLW	D'11'		
	RETLW	D'18'		
	RETLW	D'27'		
	RETLW	D'38'		
	RETLW	D'51'		
	RETLW	D'66'		
	RETLW	D'83'		
	RETLW	D'102'	
	END