PersonalCorpus 版 (精华区)

入口条件：字节数在R7中，被加数在[R0]中，加数在[R1]中。
出口信息：和在[R0]中，最高位进位在CY中。
影响资源：PSW、A、R2 堆栈需求： ２字节

BCDA: vOV A,R7 ；取字节数至R2中
vOV R2,A
ADD A,R0 ；初始化数据指针
vOV R0,A
vOV A,R2
ADD A,R1
vOV R1,A
CLR C

BCD1: DeC R0 ；调整数据指针
DeC R1
vOV A,@R0
ADDC A,@R1 ；按字节相加
DA A ；十进制调整
vOV @R0,A ；和存回[R0]中
DJNZ R2,BCD1 ；处理完所有字节
Ret





;