PIC18的二进制到BCD转换环路

Question

有人可以建议将二进制代码转换为BCD的代码吗？用于MP18的PIC18F458。