3.5.3多字节开方.txt

来自「MCS51-ASM 单片机源码系列之 第三章 十进制（BCD码）数运算 」· 文本 代码 · 共 87 行

TSQRT:
CLR		A
MOV	R0,A                
MOV	R6,A
MOV	R7,A
MOV	R1,#06H         
MOV	R2,80H
MOV	R3,00H
LOOP:
CLR		C
MOV	R4,#01H
MOV	R5,#00H
LOOP1:
MOV	A,R4
ADD		A,R4
DA		A				
MOV	R6,A
MOV	A,R5
ADDC	A,R5
DA		A					
MOV	R7,A
CLR		C
MOV	A,#9AH
SUBB	A,#01H
ADD		A,R6
DA		A					
CPL		C
MOV	R6,A
MOV	A,#9AH
SUBB	A,#00H
ADD		A,R7
DA		A					
CPL		C
MOV	R7,A
JNC		C,LOOP2
INC		R0
CLR		A
ADD		A,R6
DA		A					
MOV	R0,A
LOOP2:
CLR		C
MOV	A,#9AH
SUBB	A,R6
ADD		A,R3
DA		A					
CPL		C
MOV	R3,A
MOV	A,#9AH
SUBB	A,R7
ADD		A,R2
DA		A					
CPL		C
MOV	R2,A
MOV	A,#9AH
SUBB	A,R0
ADD		,R1
DA		A					
CPL		C
MOV	R1,A
JC		C,LOOP3
CLR		C
MOV	A,R4
ADD		A,#01H
DA		A					
MOV	R4,A					
MOV	A,R5
ADDC	A,#00H
DA		A					
MOV	R5,A
SJMP	LOOP1
LOOP3:	
CLR		C
MOV	A,#9AH
MOV	A,#01H
ADD		A,R4
DA		A					
CPL		C
MOV	R4,A					
MOV	A,#9AH
SUBB	A,#00H
ADD		A,R5
DA		A					
CPL		C
MOV	R6,A
RET