浮点数乘法.txt

来自「单片机浮点数运算子程序」· 文本 代码 · 共 50 行

FMUL:   LCALL  FMLD
	MOV  A,R6
	MOV  A,R7
	XRL  A,R7
	MOV  C,A.7
	MOV  38H,C   ;计算并暂存积的符号
	LCALL DMUL   ;调用定点无符号双字节乘法子程序
	MOV  A,R7
	MOV  C,A.7
	MOV  F0,C    ;f0为规格化时第一次左移输入值
	MOV  A,@A     ;计算阶码
	ADD  A,@R1
	MOV  R6,A
	SETB C
	LCALL FSDT
	MOV  A,R6
	MOV  C,38H  ;回送积的符号
	MOV  A.7,C
DUML:   MOV  A,R3
	MOV  B,R5
	MUL  AB
	MOV  R7,B
	MOV  A,R3
	MOV  B,R4
	MUL  AB
	ADD  A,R7
	MOV  R7,A
	CLR  A
	ADDC A,B
	MOV  R3,A
 	MOV  A,R2
	MOV  B,R5
	MUL  AB
	ADD  A,R7
	MOV  R7,A
	MOV  A,R3
	ADDC A,B
	MOV  R3,A
	MOV  F0,C
	MOV  A,R2
	MOV  B,R4
	MUL  AB
	ADD  A,R3
	MOV  R3,A
	CLR A
        ADDC A,B
	MOV  C,F0
	ADDC A,#0
	RET