十年專注單片機方案開發(fā)的方案公司英銳恩，分享定點數(shù)轉(zhuǎn)浮點數(shù)的程序。英銳恩現(xiàn)提供服務(wù)產(chǎn)品涉及主控芯片：8位單片機、16位單片機、32位單片機及各類運算放大器等。

定點數(shù)轉(zhuǎn)換成浮點數(shù)
本子程序的功能是將雙字節(jié)定點整數(shù)（十六進制）轉(zhuǎn)換為3字節(jié)浮點數(shù)，其轉(zhuǎn)換數(shù)值范圍：-32768～32767，入口條件和出口條件如下：
入口條件：ACCBHI、ACCBLO
出口條件：ACCBHI、ACCBLO、EXPB
以下為定點整數(shù)轉(zhuǎn)換成浮點數(shù)的程序清單。
    LIST            p=16f877
    INCLUDE        p16f877.inc
    ACCBLO         EQU     23        ；存放定點整數(shù)和轉(zhuǎn)換后浮點數(shù)的尾數(shù)
    ACCBHI         EQU     24
    EXPB         EQU     25        ；存放轉(zhuǎn)換后浮點數(shù)的階碼
    ACCCLO         EQU     26        ；臨時寄存器
    ACCCHI         EQU     27        ；臨時寄存器
    ACCDLO         EQU     28        ；臨時寄存器
    ACCDHI         EQU     29        ；臨時寄存器
    SIGN         EQU     2B        ；存放被轉(zhuǎn)換數(shù)的符號

ORG            0X0000
START    GOTO        MAIN
    ORG            0X0100
；*********雙字節(jié)定點整數(shù)到浮點數(shù)轉(zhuǎn)換子程序***********
DtoF    CLRF         SIGN            ；根據(jù)被轉(zhuǎn)換數(shù)確定結(jié)果的符號，對負數(shù)取補
    BTFSS         ACCBHI，7
    GOTO         INTF1
    BSF             SIGN，7
    CALL         NEG_B
INTF1    MOVLW         .15            ；初始化EXPB
    MOVWF         EXPB
    CLRF         ACCCHI
    CLRF         ACCCLO
    CALL         F_norm        ；對ACCB進行規(guī)格化
    BTFSS         SIGN，7        ；結(jié)果為負？
    GOTO         DtoF1
    CALL         NEG_B        ；是，求補
DtoF1    RETURN   
；**************浮點數(shù)規(guī)格化子程序**************
F_norm     MOVF         ACCBHI        ；ACCB＝0？
    BTFSS         STATUS，Z
    GOTO         C_norm
    MOVF         ACCBLO
    BTFSC         STATUS，Z

 RETLW         0            ；是，不需規(guī)格化，返回
C_norm    BTFSC        ACCBHI，7    ；否。ACCB為負？
     GOTO        C_norm2   
C_norm1    BTFSC         ACCBHI，6    ；為正。規(guī)格化完畢？
    RETLW         0            ；ACCBHI.6=1，規(guī)格化結(jié)束
    CALL         SHFTSL        ；否。ACCB左移
    DECF         EXPB        ；EXPB減1
    GOTO         C_norm1        ；重新判斷規(guī)格化完畢否？
C_norm2    BTFSS        ACCBHI，6    ；ACCB為負。規(guī)格化完畢否？
    RETLW        0            ；ACCBHI.6=0，規(guī)格化結(jié)束
    BCF            STATUS，C   
    CALL        SHFTSL        ；否，ACCB左移
    BSF            ACCBHI，7    ；加符號
    DECF        EXPB        ；EXPB減1

 GOTO        C_norm2        ；重新判斷規(guī)格化完畢否？
SHFTSL      BCF             STATUS ，C    ；ACCB左移子程序   
    RLF             ACCCLO       
    RLF             ACCCHI
    RLF             ACCBLO
    RLF             ACCBHI
    RETLW         0
【校驗舉例1】 19531（十進制）
化為十六進制數(shù)：4C4BH
結(jié)果：4C4B0FH
【校驗舉例2】 2622（十進制）
化為十六進制數(shù)： 0A3EH
結(jié)果：51F00CH
【例程】
MAIN        MOVLW        0X4B        ；被轉(zhuǎn)換數(shù)4C4BH送ACCB
    MOVWF        ACCBLO
    MOVLW        0X4C
    MOVWF        ACCBHI
        CALL        DtoF            ；調(diào)用定點數(shù)至浮點數(shù)轉(zhuǎn)換子程序
    END