十年專注單片機方案開發的方案公司英銳恩，分享定點數轉浮點數的程序。英銳恩現提供服務產品涉及主控芯片：8位單片機、16位單片機、32位單片機及各類運算放大器等。
定點數轉換成浮點數
本子程序的功能是將雙字節定點整數（十六進制）轉換為3字節浮點數，其轉換數值范圍：-32768～32767，入口條件和出口條件如下：
入口條件：ACCBHI、ACCBLO
出口條件：ACCBHI、ACCBLO、EXPB
以下為定點整數轉換成浮點數的程序清單。
LIST p=16f877
INCLUDE p16f877.inc
ACCBLO EQU 23 ；存放定點整數和轉換后浮點數的尾數
ACCBHI EQU 24
EXPB EQU 25 ；存放轉換后浮點數的階碼
ACCCLO EQU 26 ；臨時寄存器
ACCCHI EQU 27 ；臨時寄存器
ACCDLO EQU 28 ；臨時寄存器
ACCDHI EQU 29 ；臨時寄存器
SIGN EQU 2B ；存放被轉換數的符號
ORG 0X0000
START GOTO MAIN
ORG 0X0100
；*********雙字節定點整數到浮點數轉換子程序***********
DtoF CLRF SIGN ；根據被轉換數確定結果的符號，對負數取補
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進行規格化
BTFSS SIGN，7 ；結果為負？
GOTO DtoF1
CALL NEG_B ；是，求補
DtoF1 RETURN
；**************浮點數規格化子程序**************
F_norm MOVF ACCBHI ；ACCB＝0？
BTFSS STATUS，Z
GOTO C_norm
MOVF ACCBLO
BTFSC STATUS，Z
RETLW 0 ；是，不需規格化，返回
C_norm BTFSC ACCBHI，7 ；否。ACCB為負？
GOTO C_norm2
C_norm1 BTFSC ACCBHI，6 ；為正。規格化完畢？
RETLW 0 ；ACCBHI.6=1，規格化結束
CALL SHFTSL ；否。ACCB左移
DECF EXPB ；EXPB減1
GOTO C_norm1 ；重新判斷規格化完畢否？
C_norm2 BTFSS ACCBHI，6 ；ACCB為負。規格化完畢否？
RETLW 0 ；ACCBHI.6=0，規格化結束
BCF STATUS，C
CALL SHFTSL ；否，ACCB左移
BSF ACCBHI，7 ；加符號
DECF EXPB ；EXPB減1
GOTO C_norm2 ；重新判斷規格化完畢否？
SHFTSL BCF STATUS ，C ；ACCB左移子程序
RLF ACCCLO
RLF ACCCHI
RLF ACCBLO
RLF ACCBHI
RETLW 0
【校驗舉例1】 19531（十進制）
化為十六進制數：4C4BH
結果：4C4B0FH
【校驗舉例2】 2622（十進制）
化為十六進制數： 0A3EH
結果：51F00CH
【例程】
MAIN MOVLW 0X4B ；被轉換數4C4BH送ACCB
MOVWF ACCBLO
MOVLW 0X4C
MOVWF ACCBHI
CALL DtoF ；調用定點數至浮點數轉換子程序
END
.png)
2.png)
