l847f6: swap    d3
        add.w   d5,d3
        add.w   d3,d4
        rol.w   #3,d3
        add.w   d4,d3
        rol.w   #5,d4
        add.w   d3,d4
        rol.w   #4,d4
        rol.w   d5,d3
            add.w   d4,d3
        movea.l a0,a2
        bsr.s   L84820
        subq.l  #1,a0
        move.b  (a2),d0
        subi.b  #$20,d0
        move.b  d0,(a2)
        ror.w   #5,d3
        bsr.s   L84820
        subq.l  #1,a0
        ror.w   #5,d3

L84820:
        move.w  d3,d0
        andi.w  #$7c,d0
        lea L84830(pc,d0.w),a1
    l8482a: move.b  (a1)+,(a0)+
        bne.s   l8482a
        rts


L84830:
        dc.b    $65,$6e,$0,$0,$6c,$61,$0,$0,$63,$61,$6e,$0,$62,$65,$0,$0
        dc.b    $61,$6e,$64,$0,$70,$68,$69,$0,$65,$74,$68,$0,$6f,$6c,$0,$0
        dc.b    $76,$65,$0,$0,$68,$6f,$0,$0,$61,$0,$0,$0,$6c,$69,$61,$0
        dc.b    $61,$6e,$0,$0,$61,$72,$0,$0,$75,$72,$0,$0,$6d,$69,$0,$0
        dc.b    $69,$6e,$0,$0,$74,$69,$0,$0,$71,$75,$0,$0,$73,$6f,$0,$0
        dc.b    $65,$64,$0,$0,$65,$73,$73,$0,$65,$78,$0,$0,$69,$6f,$0,$0
        dc.b    $63,$65,$0,$0,$7a,$65,$0,$0,$66,$61,$0,$0,$61,$79,$0,$0
        dc.b    $77,$61,$0,$0,$64,$61,$0,$0,$61,$63,$6b,$0,$67,$72,$65,$0