Question

单片机实验 二进制到BCD转换

程序如下：
; 将 A 中的二进制数拆为3个 BCD 码, 并存入 Result 开始的3个单元
Result equ 20h

org 0
ljmp Start

org 0100h
BinToBCD:

ret

Start:
mov sp, #40h
mov a, #123
call BinToBCD
ljmp $

end

Answer 1

因不太清楚这是哪个单片机和它所对应的具体汇编语法，但是基本的思路是：
提取出a中这个三位数，具体方法：用取余的方法，即把a中的数先除以#100得到百位上的系数（也即百位所对的BCD码），然后存到以Result为地址的三个存储单元中的一个。再把a中的数先除以#10得到十位上的系数和余数（也分别为十位和个位所对的BCD码），然后分别存到以Result为地址的三个存储单元中的另外两个单元。

Answer 2

51汇编不熟,给你写个C的吧(转非压缩的BCD),加上注释,你自己改成51汇编吧.

int i = 100; // i 用来做被除数,初值"100".
int idx = 0; // idx 用来确定存储位置的偏移,初值"0".
while( i ) // 循环条件,被除数不为"0",则继续循环.
{
Result[idx] = A / i; // Result 第 idx 偏移位置保存 A 整除 i 的值.
A -= Result[idx]*i; // A 的值 减 Result 第 idx 偏移位置 * i 的值.
i/=10; // 将 i 的值除以"10"
idx++; // Result的偏移值 加"1".
}

以上的思想是
A 整除 100 作为 百位上的BCD
(A-百位上的值) 整除 10 作为 十位上的BCD
(A-百位上的值和十位上的值) 作为个们上的BDC.

Answer 3

Result equ 20h

org 0
ljmp Start

org 0100h
BinToBCD:
MOV R0, #Result ;目的地址.
MOV B, #10
DIV AB ;除以10
MOV @R0, B ;B中是余数，即个位数.
INC R0 ;修改地址.
MOV B, #10
XCH A, B
DIV AB ;再除以10
MOV @R0, B ;B中是余数，即十位数.
INC R0 ;修改地址.
MOV @R0, A ;存百位数.

ret
Start:
mov sp, #40h
mov a, #123
call BinToBCD
ljmp $