https://temlib.org/AtariForumWiki2018/index.php?action=history&feed=atom&title=Fast_Degas_PC1_decompressor_code 2026-10-19T10:32:13Z Revision history for this page on the wiki MediaWiki 1.30.0 https://temlib.org/AtariForumWiki2018/index.php?title=Fast_Degas_PC1_decompressor_code&diff=3985&oldid=prev 2018-06-03T22:52:14Z

<p>2 revisions imported</p> <table class="diff diff-contentalign-left" data-mw="interface"> <tr style="vertical-align: top;" lang="en"> <td colspan="1" style="background-color: white; color:black; text-align: center;">← Older revision</td> <td colspan="1" style="background-color: white; color:black; text-align: center;">Revision as of 22:52, 3 June 2018</td> </tr><tr><td colspan="2" style="text-align: center;" lang="en"><div class="mw-diff-empty">(No difference)</div> </td></tr></table>

AtariWikiSysop https://temlib.org/AtariForumWiki2018/index.php?title=Fast_Degas_PC1_decompressor_code&diff=3984&oldid=prev 2011-10-12T15:44:13Z

<p></p> <table class="diff diff-contentalign-left" data-mw="interface"> <col class="diff-marker" /> <col class="diff-content" /> <col class="diff-marker" /> <col class="diff-content" /> <tr style="vertical-align: top;" lang="en"> <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 15:44, 12 October 2011</td> </tr><tr><td colspan="2" class="diff-lineno" id="mw-diff-left-l72" >Line 72:</td> <td colspan="2" class="diff-lineno">Line 72:</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;"></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;"></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;"></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;"></td></tr> <tr><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: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div><del class="diffchange diffchange-inline">[[Category:Programming]]</del>[[Category:Assembly Language]]</div></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>[[Category:Assembly Language]]</div></td></tr> </table>

Wongck https://temlib.org/AtariForumWiki2018/index.php?title=Fast_Degas_PC1_decompressor_code&diff=3983&oldid=prev 2011-08-30T15:20:03Z

<p>Created page with &quot;GT Turbo posted this source a while ago on the forum. As it works beautifully and is rather fast, here is his &#039;&#039;&#039;Degas PC1 file decompressor routine&#039;&#039;&#039; in 68000 assembler: ---- ...&quot;</p> <p><b>New page</b></p><div>GT Turbo posted this source a while ago on the forum. As it works beautifully and is rather fast, here is his '''Degas PC1 file decompressor routine''' in 68000 assembler:<br /> <br /> ----<br /> a0 points to the PC1 file, a1 to the intended destination screen.<br /> The palette is not extracted with this code but follows the Deags standard, e.q. simply move from 2(a0) 32 bytes into the Shifter color registers.<br /> <br /> ; code by GT Turbo / Cerebral Vortex<br /> Depack_PC1: movem.l d0-d7/a0-a6,-(a7) <br /> <br /> lea 34(a0),a0 ; Debut du pic<br /> <br /> move.w #199,d4 ; 199<br /> <br /> All_lines:<br /> move.l a1,a2 ; Destination<br /> moveq #3,d1 ; 4 Bit planes<br /> <br /> Debut_line:<br /> move.l a2,a3<br /> moveq #0,d3<br /> moveq #1,d5<br /> <br /> Recup_code:<br /> moveq #0,d0<br /> move.b (a0)+,d0<br /> bmi.s Repete_code<br /> <br /> add.b d0,d3<br /> addq.b #1,d3<br /> <br /> Copy:<br /> move.b (a0)+,(a2)<br /> add.w d5,a2<br /> eor.w #6,d5<br /> <br /> dbra d0,Copy<br /> <br /> bra.s End_line<br /> <br /> Repete_code:<br /> neg.b d0<br /> <br /> ; nop<br /> addq.b #1,d3<br /> add.b d0,d3<br /> <br /> move.b (a0)+,d2<br /> <br /> Recopy_code:<br /> move.b d2,(a2)<br /> <br /> add.w d5,a2<br /> eor.w #6,d5<br /> <br /> dbra d0,Recopy_code<br /> <br /> End_line:<br /> cmp.b #40,d3<br /> <br /> bne.s Recup_code<br /> move.l a3,a2<br /> <br /> addq.w #2,a2 ; Plan suivant<br /> <br /> dbra d1,Debut_line<br /> <br /> lea 160(a1),a1 ; Ligne suivante<br /> dbra d4,All_lines<br /> <br /> movem.l (a7)+,d0-d7/a0-a6<br /> rts<br /> <br /> <br /> [[Category:Programming]][[Category:Assembly Language]]</div>

Wongck