Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- c2p halftone table at the end
- pcstart
- jmp init
- ;usec2p
- ; move.l d0,a6
- ; move.l (a6),d4
- ; move.l d1,a6
- ; or.l (a6),d4
- ; move.l d2,a6
- ; move.l (a6),d5
- ; move.l d3,a6
- ; or.l (a6),d5
- ; movep d4,0(a0)
- ; movep d5,161(a0)
- ; CODe that calculate c2phalftone data
- ; once the value calculated in debugger
- ; it cost less byte to put the data directly in dc.l
- ; then no need for the code below and the c2ptable
- ;
- ; and the code is deprecated but i need to keep this routine for the futur
- init
- move.l #$55555555,d2
- move.l d2,d3
- not.l d3
- lea c2ptable,a0
- lea mem,a1
- moveq #15,d7
- move.l (a0)+,d0
- toto
- move.l (a0)+,d1
- move.l d0,(a1)+
- move.l d0,d4
- and.l d2,d4
- move.l d1,d5
- and.l d3,d5
- or.l d4,d5
- move.l d5,(a1)+
- move.l d1,d0
- dbf d7,toto
- illegal
- c2ptable DC.L $00000000
- DC.L $FF000000
- DC.L $00FF0000
- DC.L $FFFF0000
- DC.L $0000FF00
- DC.L $FF00FF00
- DC.L $00FFFF00
- DC.L $FFFFFF00
- DC.L $000000FF
- DC.L $FF0000FF
- DC.L $00FF00FF
- DC.L $FFFF00FF
- DC.L $0000FFFF
- DC.L $FF00FFFF
- DC.L $00FFFFFF
- DC.L $FFFFFFFF
- mem
- c2phalftone
- dc.l $00000000
- dc.l $AA000000
- dc.l $FF000000
- dc.l $55AA0000
- dc.l $00FF0000
- dc.l $AAFF0000
- dc.l $5555AA00
- dc.l $0000FF00
- dc.l $AA00FF00
- dc.l $FF00FF00
- dc.l $55AAFF00
- dc.l $00FFFF00
- dc.l $AAFFFF00
- dc.l $FFFFFF00
- dc.l $555555AA
- dc.l $000000FF
- dc.l $AA0000FF
- dc.l $FF0000FF
- dc.l $55AA00FF
- dc.l $00FF00FF
- Dc.l $AAFF00FF
- DC.L $FFFF00FF
- DC.L $5555AAFF
- DC.L $0000FFFF
- DC.L $AA00FFFF
- DC.L $FF00FFFF
- DC.L $55AAFFFF
- DC.L $00FFFFFF
- DC.L $AAFFFFFF
- DC.L $FFFFFFFF
- dc.l $FFFFFFFF ; repeated to have 32 value
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement