flnorm.asm

来自「pic单片机常用的汇编程序,很有用的,分成各个小模块」· 汇编 代码 · 共 26 行

;********************FLNORM********************
;本程序实现浮点数左规格式化。
;入口参数：浮点数在ARGBH1:ARGBL1:EXP1中。
;出口参数：结果在ARGBH1:ARGBL1:EXP1中。
;占用资源：W,STATUS,023H,024H,025H,两重堆栈。

           IFNDEF       FLNORM1
            #DEFINE     FLNORM1
                        
FLNORM      MOVF        ARGBH1,F
            BTFSS       STATUS,Z
            GOTO        C_NORM
            MOVF        ARGBL1,F
            BTFSC       STATUS,Z
            RETURN                  ;为0则直接返回
C_NORM      BTFSC       ARGBH1,6
            RETURN
            BCF         STATUS,C
            RLF         ARGBL1,F
            RLF         ARGBH1,F
            BCF         ARGBH1,7
            BTFSC       STATUS,C
            BSF         ARGBH1,7    ;保证符号位不变
            DECF        EXP1,F
            GOTO        C_NORM
           ENDIF