（３） 標號： ＮＥＧ功能：多字節(jié)ＢＣＤ碼取補

    入口條件：字節(jié)數(shù)在R7中，操作數(shù)在[R0]中。
    出口信息：結果仍在[R0]中。
    影響資源：PSW、A、R2、R3 堆棧需求： ２字節(jié)

NEG: MOV A R7 ；取（字節(jié)數(shù)減一）至R2中
DEC A
MOV R2 A
MOV A R0 ；保護指針
MOV R3 A
NEG0: CLR C
MOV A #99H
SUBB A @R0 ；按字節(jié)十進制取補
MOV @R0 A ；存回[R0]中
INC R0 ；調整數(shù)據(jù)指針
DJNZ R2 NEG0 ；處理完（R2）字節(jié)
MOV A #9AH ；最低字節(jié)單獨取補
SUBB A @R0
MOV @R0 A
MOV A R3 ；恢復指針
MOV R0 A
RET

    （４） 標號： ＢＲＬＮ功能：多字節(jié)ＢＣＤ碼左移十進制一位（乘十）

    入口條件：字節(jié)數(shù)在R7中，操作數(shù)在[R0]中。
    出口信息：結果仍在[R0]中，移出的十進制最高位在R3中。
    影響資源：PSW、A、R2、R3 堆棧需求： ２字節(jié)

BRLN: MOV A R7 ；取字節(jié)數(shù)至R2中
MOV R2 A
ADD A R0 ；初始化數(shù)據(jù)指針
MOV R0 A
MOV R3 #0 ；工作單元初始化
BRL1: DEC R0 ；調整數(shù)據(jù)指針
MOV A @R0 ；取一字節(jié)
SWAP A ；交換十進制高低位
MOV @R0 A ；存回
MOV A R3 ；取低字節(jié)移出的十進制高位
XCHD A @R0 ；換出本字節(jié)的十進制高位
MOV R3 A ；保存本字節(jié)的十進制高位
DJNZ R2 BRL1 ；處理完所有字節(jié)
RET

   （５） 標號： ＭＵＬＤ功能：雙字節(jié)二進制無符號數(shù)乘法

    入口條件：被乘數(shù)在R2、R3中，乘數(shù)在R6、R7中。
    出口信息：乘積在R2、R3、R4、R5中。
    影響資源：PSW、A、B、R2～R7 堆棧需求： ２字節(jié)

MULD: MOV A R3 ；計算R3乘R7
MOV B R7
MUL AB
MOV R4 B ；暫存部分積
MOV R5 A
MOV A R3 ；計算R3乘R6
MOV B R6
MUL AB
ADD A R4 ；累加部分積
MOV R4 A
CLR A
ADDC A B
MOV R3 A
MOV A R2 ；計算R2乘R7
MOV B R7
MUL AB
ADD A R4 ；累加部分積
MOV R4 A
MOV A R3
ADDC A B
MOV R3 A
CLR A
RLC A
XCH A R2 ；計算R2乘R6
MOV B R6
MUL AB
ADD A R3 ；累加部分積
MOV R3 A
MOV A R2
ADDC A B
MOV R2 A
RET
    （６） 標號： ＭＵＬ２功能：雙字節(jié)二進制無符號數(shù)平方

    入口條件：待平方數(shù)在R2、R3中。
    出口信息：結果在R2、R3、R4、R5中。
    影響資源：PSW、A、B、R2～R5 堆棧需求： ２字節(jié)

MUL2: MOV A R3 ；計算R3平方
MOV B A
MUL AB
MOV R4 B ；暫存部分積
MOV R5 A
MOV A R2 ；計算R2平方
MOV B A
MUL AB
XCH A R3 ；暫存部分積，并換出R2和R3
XCH A B
XCH A R2
MUL AB ；計算2×R2×R3
CLR C
RLC A
XCH A B
RLC A
JNC MU20
INC R2 ；累加溢出量
MU20: XCH A B ；累加部分積
ADD A R4
MOV R4 A
MOV A R3
ADDC A B
MOV R3 A
CLR A
ADDC A R2
MOV R2 A
RET

   （７） 標號： ＤＩＶＤ功能：雙字節(jié)二進制無符號數(shù)除法

    入口條件：被除數(shù)在R2、R3、R4、R5中，除數(shù)在R6、R7中。
    出口信息：OV=0 時，雙字節(jié)商在R2、R3中，OV=1 時溢出。
    影響資源：PSW、A、B、R1～R7 堆棧需求： ２字節(jié)

DIVD: CLR C ；比較被除數(shù)和除數(shù)
MOV A R3
SUBB A R7
MOV A R2
SUBB A R6
JC DVD1
SETB OV ；溢出
RET
DVD1: MOV B #10H ；計算雙字節(jié)商
DVD2: CLR C ；部分商和余數(shù)同時左移一位
MOV A R5
RLC A
MOV R5 A
MOV A R4
RLC A
MOV R4 A
MOV A R3
RLC A
MOV R3 A
XCH A R2
RLC A