ncmul.asm

上课老师给的8086仿真器

	ORG 01D0H
	MOV SP,#50H
	MOV DPTR,#7000H
	MOVX A,@DPTR
	MOV R2,A
	INC DPTR
	MOVX A,@DPTR
	MOV R3,A
	INC DPTR
	MOVX A,@DPTR
	MOV R6,A
	INC DPTR
	MOVX A,@DPTR
	MOV R7,A
NCMUL:	MOV A,R3
	MOV B,R7
	MUL AB
	XCH A,R7
	MOV R5,B
	MOV B,R2
	MUL AB
	ADD A,R5
	MOV R4,A
	CLR A
	ADDC A,B
	MOV R5,A
	MOV A,R6
	MOV B,R3
	MUL AB
	ADD A,R4
	XCH A,R6
	XCH A,B
	ADDC A,R5
	MOV R5,A
	MOV PSW.5,C
	MOV A,R2
	MUL AB
	ADD A,R5
	MOV R5,A
	CLR A
	MOV ACC.0,C
	MOV C,PSW.5
	ADDC A,B
	MOV R4,A
	INC DPTR
	MOV A,R4
	MOVX @DPTR,A
	INC DPTR
	MOV A,R5
	MOVX @DPTR,A
	INC DPTR
	MOV A,R6
	MOVX @DPTR,A
	INC DPTR
	MOV A,R7
	MOVX @DPTR,A
	MOV R0,#7EH
	MOV A,#0FFH
	MOV R4,#06H
NCMUL1: MOV @R0,A
	DEC R0
	MOV 7EH,#8CH	      ;DISP P
	DJNZ R4,NCMUL1
NCMUL2: LCALL DISPD
	SJMP NCMUL2
DISPD:	SETB 0D4H
	MOV R1,#7EH
	MOV R2,#20H
	MOV R3,#00H
DISPD1: MOV DPTR,#0FF21H
	MOV A,R2
	MOVX @DPTR,A
	MOV A,@R1
	MOV DPTR,#0FF22H
	MOVX @DPTR,A
DISPD2: DJNZ R3,DISPD2
	DEC R1
	CLR C
	MOV A,R2
	RRC A
	MOV R2,A
	JNZ DISPD1
	MOV A,#0FFH
	MOV DPTR,#0FF22H
	MOVX @DPTR,A
	CLR 0D4H
	RET
	END