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'0'		
	RETLW D'1'		
	RETLW D'4'		
	RETLW D'9'		
	RETLW D'16'		
	RETLW D'25'		
	RETLW D'36'		
	RETLW D'49'		
	RETLW D'64'		
	RETLW D'81'		
	END