https://wiki.amstrad-cpc.net/index.php?action=history&feed=atom&title=Programming%3ACRC16 2026-09-04T00:13:17Z Revision history for this page on the wiki MediaWiki 1.46.0 https://wiki.amstrad-cpc.net/index.php?title=Programming:CRC16&diff=9413&oldid=prev 2006-08-13T14:06:13Z

<p><a href="/wiki/Category:Programming" title="Category:Programming">Category:Programming</a></p> <table style="background-color: #fff; color: #202122;" data-mw-interface=""> <col class="diff-marker" /> <col class="diff-content" /> <col class="diff-marker" /> <col class="diff-content" /> <tr class="diff-title" lang="en"> <td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">← Older revision</td> <td colspan="2" style="background-color: #fff; color: #202122; text-align: center;">Revision as of 14:06, 13 August 2006</td> </tr><tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l43">Line 43:</td> <td colspan="2" class="diff-lineno">Line 43:</td></tr> <tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>   ret</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>   ret</div></td></tr> <tr><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>&lt;/pre&gt;</div></td><td class="diff-marker"></td><td style="background-color: #f8f9fa; color: #202122; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #eaecf0; vertical-align: top; white-space: pre-wrap;"><div>&lt;/pre&gt;</div></td></tr> <tr><td colspan="2" class="diff-side-deleted"></td><td class="diff-marker" data-marker="+"></td><td style="color: #202122; 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> </table>

PulkoMandy https://wiki.amstrad-cpc.net/index.php?title=Programming:CRC16&diff=9412&oldid=prev 2006-07-17T10:47:02Z

<p>CRC16 calculation</p> <p><b>New page</b></p><div>&#039;&#039;This code is untested and may not work as advertised or at all.&#039;&#039;<br /> <br /> &lt;pre&gt;<br /> CRC16:<br /> ;Borrowed from http://zilog.sh.cvut.cz/~base/misc/z80bits.html<br /> ; and moddified to be a loop<br /> ;The arrow comments show what lines I added or commented out from the original.<br /> ;Inputs: de-&gt;data bc=number of bytes<br /> ;Outputs: hl=CRC16<br /> push bc ;&lt;---&lt;&lt;&lt;<br /> push de ;&lt;---&lt;&lt;&lt;<br /> push af ;&lt;---&lt;&lt;&lt;<br /> ld hl,$FFFF<br /> push bc ;&lt;---&lt;&lt;&lt;<br /> CRC16_Read:<br /> ld a,(de)<br /> inc de<br /> xor h<br /> ld h,a<br /> ld b,8<br /> CRC16_CrcByte:<br /> add hl,hl<br /> jr nc,CRC16_Next<br /> ld a,h<br /> xor $10<br /> ld h,a<br /> ld a,l<br /> xor $21<br /> ld l,a<br /> CRC16_Next:<br /> djnz CRC16_CrcByte<br /> ; dec c ;&gt;&gt;&gt;---&gt;<br /> pop bc ;&lt;---&lt;&lt;&lt;<br /> dec bc ;&lt;---&lt;&lt;&lt;<br /> push bc ;&lt;---&lt;&lt;&lt;<br /> ld a,b ;&lt;---&lt;&lt;&lt;<br /> or c ;&lt;---&lt;&lt;&lt;<br /> jr nz,CRC16_Read<br /> pop bc ;&lt;---&lt;&lt;&lt;<br /> pop af ;&lt;---&lt;&lt;&lt;<br /> pop de ;&lt;---&lt;&lt;&lt;<br /> pop bc ;&lt;---&lt;&lt;&lt;<br /> ret<br /> &lt;/pre&gt;</div>

Octoate