JISAN:CLR C
       CLR FUSU_BIT;初始化負數標志位.
       MOV A,H_TEMP;判斷是零上還是零下
       JNB ACC.7,ZHENSU
       SETB FUSU_BIT;是零下?度  標志位為1

;如果為零下時的轉換(正數的補碼為本身,負數的補碼:取反加1)
       MOV A,L_TEMP
       CPL A
       INC A
       MOV L_TEMP,A
       MOV A,H_TEMP
       CPL A
       MOV H_TEMP,A

ZHENSU:CLR C
       MOV A,H_TEMP;整數部分
       SWAP A;高低四位互換
       MOV R7,A
       MOV A,L_TEMP
       ORL A,#00FH;去掉低四位(把后四位變為0)
       SUBB A,#00FH
       SWAP A;把高四位換到低四位
       ADDC A,R7

       MOV ZHENGSHU,A


       MOV B,#10
       DIV AB
       MOV SW,A
       MOV GW,B

XIAOSU:CLR C
       MOV A,L_TEMP;小數部分
       ORL  A,#11110000B
       CLR C
       SUBB A,#11110000B
       MOV L_TEMP,A
       MOV DOT,A

       MOV B,#6
       CLR C
       MUL AB
       MOV B,#10
       DIV AB
       MOV DSW,A
       MOV DGW,B

       RET

;------------------------
;溫度計算子程序
;------------------------

FORMULA: ; 按公式：T實際=(T整數-0.25)+( M每度-M剩余)/ M每度
;計算出實際溫度，整數部分和小數部分分別存于ZHENGSHU單元和DOT單元

;將61H中的低4位移入60H中的高4位，得到溫度的整數部分，并存于ZHENGSHU單元
;將2EH中的低4位移入2FH中的高4位，得到溫度的整數部分，并存于ZHENGSHU單元
;2F 2E 2D 2C 2B 2A 29 28
;60 61 62 63 64 65 66 67
;MOV 29H,2EH;61H
;MOV ZHENGSHU,A

; ( M每度-M剩余)/ M每度,小數值存于A中
MOV A,28H;67h
SUBB A,29H;66h
MOV B,#64H
MUL AB
MOV R4,B
MOV R5,A
MOV R7,28H;67H
LCALL DIV457
MOV A,R3


;再減去0.25，實際應用中減去25
SUBB A,#19H
MOV DOT,A ;小數部分存于DOT中
MOV A,ZHENGSHU
SUBB A,#00H ;整數部分減去來自小數部分的借位
MOV ZHENGSHU,A
MOV C,77H
JNC ZHENG ;是否為負數
CPL A
INC A
MOV DIS_1,#2DH ; 零度以下時,第一位顯示"-"號
MOV ZHENGSHU,A
ZHENG:
MOV DIS_1,#2BH ; 零度以上時,第一位顯示"+"號
RET
;------------------------
;雙字節除以單字節子程序
;------------------------
DIV457: CLR C
MOV A,R4
SUBB A,R7
JC DV50
SETB OV ;商溢出
RET
DV50: MOV R6,#8 ;求平均值（R4R5／R7－→R3）
DV51: MOV A,R5
RLC A
MOV R5,A
MOV A,R4
RLC A
MOV R4,A
MOV F0,C
CLR C
SUBB A,R7
ANL C,/F0
JC DV52
MOV R4,A
DV52: CPL C
MOV A,R3
RLC A
MOV R3,A
DJNZ R6,DV51
MOV A,R4 ;四舍五入
ADD A,R4
JC DV53
SUBB A,R7
JC DV54
DV53: INC R3
DV54: CLR OV
RET
;---------------------
;轉換成非壓縮的BCD碼
;---------------------
BCD1: MOV A,ZHENGSHU
MOV B,#0AH
DIV AB
ORL A,#00110000B ;轉換成ASCII碼
MOV DIS_2,A
MOV DIS_3,B
MOV A,DIS_3
ORL A,#00110000B ;轉換成ASCII碼
mov DIS_3,A

MOV A,DOT
MOV B,#0AH
DIV AB
ORL A,#00110000B ;轉換成ASCII碼
MOV DIS_4,A
MOV DIS_5,B
MOV A,DIS_5
ORL A,#00110000B ;轉換成ASCII碼
mov DIS_5,A

RET
;----------------------
;串口顯示數據子程序
;----------------------

DISPLAY:
CLR TI
MOV A,DIS_1
MOV SBUF,A
JNB TI,$ ;發送給PC,通過串口調試助手顯示+/-

CLR TI
MOV A,DIS_2
MOV SBUF,A
JNB TI,$ ;發送給PC,通過串口調試助手顯示整數第一位

CLR TI
MOV A,DIS_3
MOV SBUF,A
JNB TI,$ ;發送給PC,通過串口調試助手顯示整數第二位

CLR TI
MOV A,#2EH
MOV SBUF,A
JNB TI,$ ;發送給PC,通過串口調試助手顯示小數點

CLR TI
MOV A,DIS_4
MOV SBUF,A
JNB TI,$ ;發送給PC,通過串口調試助手顯示小數第一位

CLR TI
MOV A,DIS_5
MOV SBUF,A
JNB TI,$ ;發送給PC,通過串口調試助手顯示小數第一位

       CLR TI
       MOV A,#0A1H
       MOV SBUF,A
       JNB TI,$
       CLR TI
       MOV A,#0E6H
       MOV SBUF,A
       JNB TI,$ ;發送符號℃至串口

CLR TI
MOV A,#0DH;換行
MOV SBUF,A
JNB TI,$ ;發送給PC,通過串口調試助手顯示
;ajmp eee

CLR TI
MOV A,#0AH;換行
MOV SBUF,A
JNB TI,$ ;發送給PC,通過串口調試助手顯示
RET