BCDHEX: MOV B,#10H DIV AB MOV R4,B MOV B,#10 MUL AB ADD A,R4 RET