View source for Programming:Precalculated square

This article describes an algorithm which precalculates the square from 0*0 to 255*255 and the routine to get the correct square value from the table.

== Initialisation ==

Precalculate the square table.
<pre>
INITSQ		LD DE, 1	;1st odd number
		LD HL, 0	;HL = 1st square number
		LD B, H		;counter = 256
		LD IX, SQTAB	;startaddress of the square table
SQLOOP		LD (IX), L	;Lowbyte to table
		INC IX
		LD (IX), H	;Highbyte to table
		INC IX
		ADD HL, DE	;add odd number
		INC DE		;next odd number
		INC DE
		DJNZ SQLOOP	;256 times
		RET
</pre>

== Get square from the table ==

'''Input:''' A = ''Factor''

'''Output:''' DE = ''A*A''

<pre>
GETSQ		LD L, A
		LD H, 0		;HL = factor
		ADD HL, HL	;* 2
		LD DE, SQTAB	;+ startaddress of the table
		ADD HL, DE	;= tableaddress
		LD E, (HL)	;E = Lowbyte of the result
		INC HL
		LD D, (HL)	;D = Highbyte of the result
		RET
</pre>

== Table definition ==

<pre>
SQTAB		DS 512		;space for the table
</pre>
[[Category:Programming]]