51單片機實驗板DS18B20測溫程序

/***********************************************
** 實驗名:51單片機實驗板溫度測量（DS18B20）
** 創建人: 謝軍洋
** 描　述:P3.7口輸入，輸出數據。
**------------------------------------------------------------------
** CPU:MCS-51
** 語言：匯編
** Fosc=12M

此次試驗的仿真圖
***************************************************/

GE_BIT EQU 30H
SHI_BIT EQU 31H
BAI_BIT EQU 32H
DI_8BIT EQU 33H
GAO_8BIT EQU 34H
DQ EQU P3.7
ORG 0000H
LJMP START
ORG 0020H
START:
MOV SP,#60H
LCALL ZHUANHUAN ;調用讀溫度子程序
LCALL CHULI
LCALL DISPLAY ;調用數碼管顯示子程序
LJMP START

;-------------------------------------------------
;這是DS18B20復位初始化子程序
INIT_1820:
SETB DQ
NOP
CLR DQ ;主機發出延時537微秒的復位低脈沖
MOV R1,#3
DU_1:
MOV R0,#107
DJNZ R0,$
DJNZ R1,DU_1
SETB DQ ;然后拉高數據線
NOP
NOP
NOP
MOV R0,#25H
DU_2:JNB DQ,DU_3 ;等待DS18B20回應
DJNZ R0,DU_2
LJMP DU_4 ;延時
DU_3:SETB F0 ;置標志位,表示DS1820存在
LJMP DU_5
DU_4:CLR F0 ;清標志位,表示DS1820不存在
LJMP DU_7
DU_5:MOV R0,#117
DU_6:DJNZ R0,DU_6 ;時序要求延時一段時間
DU_7:SETB DQ
RET