ex3-11.asm

《单片机原理实用教程——基于Proteus虚拟仿真》一书的配套光盘

QMUL:	MOV A,R3
	MOV B,R7
	MUL AB              ;R3×R7
	XCH A,R7            ;R7=(R3×R7)L
	MOV R5,B            ;R5=(R3×R7)H
	MOV B,R2
	MUL AB              ;R2×R7
	ADD A,R5
	MOV R4,A
	CLR A
	ADDC A,B
	MOV R5,A            ;R5=(R2×R7)H
	MOV A,R6
	MOV B,R3
	MUL AB              ;R3×R6
	ADD A,R4
	XCH A,R6
	XCH A,B
	ADDC A,R5
	MOV R5,A
	MOV F0,C           ;暂存CY
	MOV A,R2           ;R2×R6 
	MUL AB
	ADD A,R5
	MOV R5,A
	CLR A
	MOV ACC.0,C
	MOV C,F0           ;加以前加法的进位
	ADDC A,B
	MOV R4,A
	RET