CopyMem lsr.w #1,d0 bcc.b .nobyte move.b (a0)+,(a1)+ .nobyte lsr.w #1,d0 bcc.b .noword move.w (a0)+,(a1)+ .noword subq.w #1,d0 bmi.b .exit .copy move.l (a0)+,(a1)+ dbf d0,.copy .exit rts