EDA365欢迎您登录！
您需要 登录 才可以下载或查看，没有帐号？注册
x
MCS-51单片机实用子程序库39 G% T2 j8 C. v$ p
* a7 K; t$ _$ T/ M4 t- i D& [
Q# D; x' Y7 N(15) 标号： FRCP 功能：浮点倒数函数 入口条件：操作数在[R0]中。 出口信息：OV=0时，结果仍在[R0]中，OV=1时，溢出。 影响资源：PSW、A、B、R2～R7、位1EH、1FH 堆栈需求： 5字节 FRCP: MOV A,@R0 MOV C,ACC.7 MOV 1FH,C ;保存数符 MOV C,ACC.6 ;绝对值传送到第二工作区 MOV ACC.7,C MOV R5,A INC R0 MOV A,@R0 MOV R6,A INC R0 MOV A,@R0 MOV R7,A DEC R0 DEC R0 ORL A,R6 JNZ RCP SETB OV ;零不能求倒数，设立溢出标志 RET RCP: MOV A,R6 JB ACC.7,RCP2;操作数格式化否? CLR C ;格式化之 MOV A,R7 RLC A MOV R7,A MOV A,R6 RLC A MOV R6,A DEC R5 SJMP RCP RCP2: MOV R2,#1 ;将数值1.00传送到第一工作区 MOV R3,#80H MOV R4,#0 LCALL DIV3 ;调用工作区浮点除法，求得倒数 LJMP MOV0 ;回传结果
0 k. s- }* l0 C$ x: J | 
/1 
发表于 2019-3-7 13:19
收藏
淘帖
支持！
反对！