This what you want?
lea converted_string(pc),a2
move.l d0,d2
moveq #8-1,d3
nextconversion:
rol.l #4,d2
move.l d2,d4
and.l #$f,d4
add.l #"0",d4
cmp.l #"9",d4
bls.s skip_addition
addq.l #7,d4
skip_addition:
move.b d4,(a2)+
dbra d3,nextconversion
converted_string: dcb.b 8+2,0
|