送你一个算法
;******************************************************
;******************************************************
;无符号数双字节除法
;功能:(R2R3R4R5)/(R6R7)=(R4R5)......(R2R3)
NDIV: PUSH R0
PUSH R1
NDIV1: MOV A,R3
CLR C
SUBB A,R7
MOV a,r2
SUBB A,R6
JNC NDVE1
MOV B,#10H
NDVL1: CLR C
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
XCH A,R2
MOV F0,C
CLR C
SUBB A,R7
MOV R1,A
MOV A,R2
SUBB A,R6
JB F0,NDVM1
JC NDVD1
NDVM1: MOV R2,A
MOV A,R1
MOV R3,A
INC R5
NDVD1: DJNZ B,NDVL1
CLR F0
POP R1
POP R0
RET
NDVE1: SETB F0 ;溢出
POP R1
POP R0
RET
;******************************************************
发表时间:2003年5月19日9:56:50