S1 to S2 ...ed (68k)

; Input:
;
; d7 = ((szChunkTable)/2)-1
; a0 = Source address
; a1 = Destination address

Convert:
@loop:
        move.b  (a0)+,d0

        move.b  d0,d1
        move.b  d0,d2
        move.b  d0,d3
        move.b  d0,d4
        move.b  d0,d5

        andi.b  #%00000011,d1
        andi.b  #%00011000,d2
        andi.b  #%01100000,d3
        andi.b  #%10000000,d4
        andi.b  #%00000100,d5


        lsr.b   #1,d2
        lsr.b   #1,d3
        lsl.b   #4,d5


        moveq   #0,d6
        or.b    d1,d6
        or.b    d2,d6
        or.b    d3,d6
        or.b    d4,d6
        or.b    d5,d6

        move.b  d6,(a1)+
        move.b  (a0)+,(a1)+
        dbf d7,@loop
        stop