（１） 標(biāo)號(hào)： ＢＣＤＡ 功能：多字節(jié)ＢＣＤ碼加法

給大家介紹一個(gè)單片機(jī)匯編語(yǔ)言寫(xiě)的多字節(jié)BCD碼加法減法子程序

入口條件：字節(jié)數(shù)在R7中，被加數(shù)在［R0］中，加數(shù)在［R1］中。

出口信息：和在［R0］中，最高位進(jìn)位在CY中。

影響資源：PSW、A、R2 堆棧需求： ２字節(jié)

BCDA： MOV A，R7 ；取字節(jié)數(shù)至R2中

MOV R2，A

ADD A，R0 ；初始化數(shù)據(jù)指針

MOV R0，A

MOV A，R2

ADD A，R1

MOV R1，A

CLR C

BCD1： DEC R0 ；調(diào)整數(shù)據(jù)指針

DEC R1

MOV A，@R0

ADDC A，@R1 ；按字節(jié)相加

DA A ；十進(jìn)制調(diào)整

MOV @R0，A ；和存回［R0］中

DJNZ R2，BCD1 ；處理完所有字節(jié)

RET

匯編語(yǔ)言多字節(jié)BCD碼加法減法

（２） 標(biāo)號(hào)： ＢＣＤＢ 功能：多字節(jié)ＢＣＤ碼減法

入口條件：字節(jié)數(shù)在R7中，被減數(shù)在［R0］中，減數(shù)在［R1］中。

出口信息：差在［R0］中，最高位借位在CY中。

影響資源：PSW、A、R2、R3 堆棧需求： ６字節(jié)

BCDB： LCALL NEG1 ；減數(shù)［R1］十進(jìn)制取補(bǔ)

LCALL BCDA ；按多字節(jié)ＢＣＤ碼加法處理

CPL C ；將補(bǔ)碼加法的進(jìn)位標(biāo)志轉(zhuǎn)換成借位標(biāo)志

MOV F0，C ；保護(hù)借位標(biāo)志

LCALL NEG1 ；恢復(fù)減數(shù)［R1］的原始值

MOV C，F(xiàn)0 ；恢復(fù)借位標(biāo)志

RET

NEG1： MOV A，R0 ；［R1］十進(jìn)制取補(bǔ)子程序入口

XCH A，R1 ；交換指針

XCH A，R0

LCALL NEG ；通過(guò)［R0］實(shí)現(xiàn)［R1］取補(bǔ)

MOV A，R0

XCH A，R1 ；換回指針

XCH A，R0

RET

（３） 標(biāo)號(hào)： ＮＥＧ 功能：多字節(jié)ＢＣＤ碼取補(bǔ)

匯編語(yǔ)言多字節(jié)BCD碼加法減法

入口條件：字節(jié)數(shù)在R7中，操作數(shù)在［R0］中。

出口信息：結(jié)果仍在［R0］中。

影響資源：PSW、A、R2、R3 堆棧需求： ２字節(jié)

NEG： MOV A，R7 ；取（字節(jié)數(shù)減一）至R2中

DEC A

MOV R2，A

MOV A，R0 ；保護(hù)指針

MOV R3，A

NEG0： CLR C

MOV A，#99H

SUBB A，@R0 ；按字節(jié)十進(jìn)制取補(bǔ)

MOV @R0，A ；存回［R0］中

INC R0 ；調(diào)整數(shù)據(jù)指針

DJNZ R2，NEG0 ；處理完（R2）字節(jié)

MOV A，#9AH ；最低字節(jié)單獨(dú)取補(bǔ)

SUBB A，@R0

MOV @R0，A

MOV A，R3 ；恢復(fù)指針

MOV R0，A

RET