https://oldwiki.cpcwiki.eu/index.php?action=history&feed=atom&title=Programming%3ASquare_Root 2026-08-28T15:44:55Z Revision history for this page on the wiki MediaWiki 1.25.1 https://oldwiki.cpcwiki.eu/index.php?title=Programming:Square_Root&diff=14793&oldid=prev 2007-03-10T13:34:45Z

<p></p> <table class='diff diff-contentalign-left'> <col class='diff-marker' /> <col class='diff-content' /> <col class='diff-marker' /> <col class='diff-content' /> <tr style='vertical-align: top;'> <td colspan='2' style="background-color: white; color:black; text-align: center;">← Older revision</td> <td colspan='2' style="background-color: white; color:black; text-align: center;">Revision as of 13:34, 10 March 2007</td> </tr><tr><td colspan="2" class="diff-lineno" id="L26" >Line 26:</td> <td colspan="2" class="diff-lineno">Line 26:</td></tr> <tr><td class='diff-marker'>&#160;</td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div> ret</div></td><td class='diff-marker'>&#160;</td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div> ret</div></td></tr> <tr><td class='diff-marker'>&#160;</td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>&lt;/pre&gt;</div></td><td class='diff-marker'>&#160;</td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>&lt;/pre&gt;</div></td></tr> <tr><td colspan="2">&#160;</td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;"></ins></div></td></tr> <tr><td colspan="2">&#160;</td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div><ins style="font-weight: bold; text-decoration: none;">[[Category:Programming]]</ins></div></td></tr> <!-- diff cache key wikidb:diff:version:1.11a:oldid:14792:newid:14793 --> </table>

CPCLER https://oldwiki.cpcwiki.eu/index.php?title=Programming:Square_Root&diff=14792&oldid=prev 2007-03-10T13:33:31Z

<p></p> <p><b>New page</b></p><div>Square Root of 16bit value by Ricardo Bittencourt<br /> <br /> &lt;pre&gt;<br /> ;Square root of 16-bit value<br /> ;In: HL = value<br /> ;Out: D = result (rounded down)<br /> <br /> .Sqr16 ld de,#0040<br /> ld a,l<br /> ld l,h<br /> ld h,d<br /> or a<br /> ld b,8<br /> .Sqr16_Loop<br /> sbc hl,de<br /> jr nc,Sqr16_Skip<br /> add hl,de<br /> .Sqr16_Skip<br /> ccf<br /> rl d<br /> add a,a<br /> adc hl,hl<br /> add a,a<br /> adc hl,hl<br /> djnz Sqr16_Loop<br /> ret<br /> &lt;/pre&gt;</div>

CPCLER