XCH A R0
RET
(3) 標(biāo)號(hào): NEG功能:多字節(jié)BCD碼取補(bǔ)
入口條件:字節(jié)數(shù)在R7中,操作數(shù)在[R0]中。
出口信息:結(jié)果仍在[R0]中。
影響資源:PSW、A、R2、R3 堆棧需求: 2字節(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
(4) 標(biāo)號(hào): BRLN功能:多字節(jié)BCD碼左移十進(jìn)制一位(乘十)
入口條件:字節(jié)數(shù)在R7中,操作數(shù)在[R0]中。
出口信息:結(jié)果仍在[R0]中,移出的十進(jìn)制最高位在R3中。
影響資源:PSW、A、R2、R3 堆棧需求: 2字節(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 ;調(diào)整數(shù)據(jù)指針
MOV A @R0 ;取一字節(jié)
SWAP A ;交換十進(jìn)制高低位
MOV @R0 A ;存回
MOV A R3 ;取低字節(jié)移出的十進(jìn)制高位
XCHD A @R0 ;換出本字節(jié)的十進(jìn)制高位
MOV R3 A ;保存本字節(jié)的十進(jìn)制高位
DJNZ R2 BRL1 ;處理完所有字節(jié)
RET
(5) 標(biāo)號(hào): MULD功能:雙字節(jié)二進(jìn)制無(wú)符號(hào)數(shù)乘法
入口條件:被乘數(shù)在R2、R3中,乘數(shù)在R6、R7中。
出口信息:乘積在R2、R3、R4、R5中。
影響資源:PSW、A、B、R2~R7 堆棧需求: 2字節(jié)
MULD: MOV A R3 ;計(jì)算R3乘R7
MOV B R7
MUL AB
MOV R4 B ;暫存部分積
MOV R5 A
MOV A R3 ;計(jì)算R3乘R6
MOV B R6
MUL AB
ADD A R4 ;累加部分積
MOV R4 A
CLR A
ADDC A B
MOV R3 A
MOV A R2 ;計(jì)算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 ;計(jì)算R2乘R6
MOV B R6
MUL AB
ADD A R3 ;累加部分積
MOV R3 A
MOV A R2
ADDC A B
MOV R2 A
RET
(6) 標(biāo)號(hào): MUL2功能:雙字節(jié)二進(jìn)制無(wú)符號(hào)數(shù)平方
入口條件:待平方數(shù)在R2、R3中。
出口信息:結(jié)果在R2、R3、R4、R5中。
影響資源:PSW、A、B、R2~R5 堆棧需求: 2字節(jié)
MUL2: MOV A R3 ;計(jì)算R3平方
MOV B A
MUL AB
MOV R4 B ;暫存部分積
MOV R5 A
MOV A R2 ;計(jì)算R2平方
MOV B A
MUL AB
XCH A R3 ;暫存部分積,并換出R2和R3
XCH A B
XCH A R2
MUL AB ;計(jì)算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
(7) 標(biāo)號(hào): DIVD功能:雙字節(jié)二進(jìn)制無(wú)符號(hào)數(shù)除法
入口條件:被除數(shù)在R2、R3、R4、R5中,除數(shù)在R6、R7中。
出口信息:OV=0 時(shí),雙字節(jié)商在R2、R3中,OV=1 時(shí)溢出。
影響資源:PSW、A、B、R1~R7 堆棧需求: 2字節(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 ;計(jì)算雙字節(jié)商
DVD2: CLR C ;部分商和余數(shù)同時(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