MOV 43H,#00H
MOV 42H,#00H
MOV 41H,75H
MOV 40H,74H；除数
LCALL DIVm_n；调用除法运算子程序
MOV 61H,55H；传送商到目标单元
MOV 60H,54H
RET
其结果便为频率值，在61H60H中
；以下为多字节除法子程序
DIVm_n:;可多字节除,仅需修改CHANG(字节)
;n字节除n字节快速运算
;入口参数：被除数_BCS以上N字节，BCS是最低字节
; 除数_CS以上N字节，CS最低字节
;出口参数：商_沿着被除数的最高字节往上继续存
;放其最低字节，共n字节,余数_则覆盖被除数n字节
;使用寄存器：A，C，R0，R1，R2，R3，R6，R7，位F0
BCS EQU 50H;被除数首地址
CS EQU 40H; 除数首地址
CHANG EQU 4;除数或被除数字节数长度
WEISH EQU CHANG*8;除数或被除数位数
MOV R0,#CS;
MOV R7,#CHANG-1;4-1次相或操作
LOP1: MOV A,@R0
INC R0
ORL A,@R0
JNZ LOP0
DJNZ R7,LOP1
毕业论文http://www.751com.cn
INC R0
DJNZ R7,LOP3
MOV R6,#WEISH;4Byte共32bit
LOP8:
MOV R0,#BCS
MOV R7,#CHANG*2;被除数连商共8Bbyte
LOP4:
MOV A,@R0
RLC A
MOV @R0,A
INC R0
DJNZ R7,LOP4
CLR C
MOV R0,#BCS+CHANG
MOV R1,#CS
MOV R7,#CHANG
LOP5:
MOV A,@R0
SUBB A,@R1
MOV @R0,A
本文来自辣文论文网
DJNZ R7,LOP5
JNC LOP6
MOV F0,C
MOV R0,#BCS+CHANG
MOV R1,#CS
MOV R7,#CHANG
CLR C
LOP7:
MOV A,@R0
ADDC A,@R1
MOV @R0,A
INC R0
INC R1
DJNZ R7,LOP7
MOV C,F0
LOP6:
CPL C
DJNZ R6,LOP8
MOV R0,#BCS
MOV R1,#BCS+CHANG
MOV R7,#CHANG
LOP9:
MOV A,@R0
RLC A
MOV R3,A
MOV A,@R1
MOV @R0,A
MOV A,R3
MOV @R1,A
INC R0
INC R1
DJNZ R7,LOP9
DIVRET:
RET
4、相位的计算
对于功率因素cosφ，必须先求出相位差值φ，然后对φ求余弦即可得出。
首先求φ，由电流和电压脉冲的时间差，被保存在77H、76H中，先求与频率的比值，再乘以360，就是相位差值φ了。
该运算法则为（x/y）*360，由于x总小于y，其做除法的结果小于1，结果以0来体现，这不是我们希望的。经验告诉我们，在设计单片机应用程序的乘除混合运算时，要先做乘法后做除法，这样才能获得较高的准确度。除非我们采用编制浮点运算程序。这里我们用的是定点运算。
我们先做x*360的程序，将360（即十辣进制数0168H）先保存在某两个字节中，编制象视在功率计算的程序那样的那个子程序（SZGL: ），本文来自辣文论文网这里不再重复，设乘法运算结果保存在63H62H61H60H中，再除以75H、74H中的频率参数的机器周期数，其方法是：先传递好被除数和除数参数，再调用除法子程序，然后将结果传送到目的地即可，这里也不再重复，设目的地地址为63H62H。其值为0~359。