als1=0x136;
AN1=0x1732;
pj0=0x39;
*pj0=jm; //阶码 =3
p1=0x3a; //查看高低位在哪个寄存器中,别错。
*p1=als1;
pj0=0x33;
*pj0=jma2; //阶码=4
p1=0x34;
*p1=AN1;
MFAD();
AN1=FTB6();
jma2=ftbjm();
=========================
MFAD: MOV R0,#39H;
MOV A,@R0
MOV @R0,A
INC R0
MOV A,@R0
MOV @R0,A
INC R0
MOV A,@R0
MOV @R0,A
DEC R0
DEC R0
LCALL BTOF
MOV R0,#33H;
MOV A,@R0
MOV @R0,A
INC R0
MOV A,@R0
MOV @R0,A
INC R0
MOV A,@R0
MOV @R0,A
DEC R0
DEC R0
LCALL BTOF ; ;将其转换成二进制浮点操作数
MOV R0,#33H
MOV R1,#39H;;指向二进制浮点操作数
LCALL FADD ;;进行浮点加法运算
LCALL FTOB ;;将结果转换成BCD码浮点数
RET
其他部分与“MCS-51浮点运算子程序库及其使用说明”一样的
|