NAME YCLPROGRAM
;單片機內(nèi)存分配申明!
PUBLIC RW_TEMP
PUBLIC TEMPER_L		;TEMPER_L EQU 29H;用于保存讀出溫度的低8位
PUBLIC TEMPER_H		;TEMPER_H EQU 28H;用于保存讀出溫度的高8位
PUBLIC FLAG1		;FLAG1 EQU 38H;是否檢測到DS18B20標志位
PUBLIC a_bit		;a_bit equ 20h ;數(shù)碼管個位數(shù)存放內(nèi)存位置
PUBLIC b_bit		;b_bit equ 21h ;數(shù)碼管十位數(shù)存放內(nèi)存位置

YCLDATA          SEGMENT       DATA
YCLCODE          SEGMENT       CODE
YCLBIT           SEGMENT       BIT

RSEG YCLDATA
TEMPER_L:	DS 1
TEMPER_H:	DS 1
RSEG YCLBIT
FLAG1:	DBIT 1
a_bit:	DBIT 1
b_bit:	DBIT 1
RSEG YCLCODE
RW_TEMP: 

LCALL GET_TEMPER;調(diào)用讀溫度子程序

;進行溫度顯示,這里我們考慮用網(wǎng)站提供的兩位數(shù)碼管來顯示溫度
;顯示范圍00到99度,顯示精度為1度
;因為12位轉(zhuǎn)化時每一位的精度為0.0625度,我們不要求顯示小數(shù)所以可以拋棄29H的低4位
;將28H中的低4位移入29H中的高4位,這樣獲得一個新字節(jié),這個字節(jié)就是實際測量獲得的溫度
;這個轉(zhuǎn)化溫度的方法可是我想出來的哦~~非常簡潔無需乘于0.0625系數(shù)

RET

; 這是DS18B20復(fù)位初始化子程序
INIT_1820:
SETB P3.3
NOP
CLR P3.3
;主機發(fā)出延時537微秒的復(fù)位低脈沖
MOV R1,#3
TSR1:MOV R0,#107
DJNZ R0,$
DJNZ R1,TSR1
SETB P3.3;然后拉高數(shù)據(jù)線
NOP
NOP
NOP
MOV R0,#25H
TSR2:
JNB P3.3,TSR3;等待DS18B20回應(yīng)
DJNZ R0,TSR2
LJMP TSR4 ; 延時
TSR3:
SETB FLAG1 ; 置標志位,表示DS1820存在
CLR P1.7;檢查到DS18B20就點亮P1.7LED
LJMP TSR5
TSR4:
CLR FLAG1 ; 清標志位,表示DS1820不存在
CLR P1.1
LJMP TSR7

TSR5:
MOV R0,#117
TSR6:
DJNZ R0,TSR6 ; 時序要求延時一段時間
TSR7:
SETB P3.3
RET

; 讀出轉(zhuǎn)換后的溫度值
GET_TEMPER:
SETB P3.3
LCALL INIT_1820;先復(fù)位DS18B20
JB FLAG1,TSS2
CLR P1.2
RET ; 判斷DS1820是否存在?若DS18B20不存在則返回
TSS2:
CLR P1.3;DS18B20已經(jīng)被檢測到!!!!!!!!!!!!!!!!!!
MOV A,#0CCH ; 跳過ROM匹配
LCALL WRITE_1820
MOV A,#44H ; 發(fā)出溫度轉(zhuǎn)換命令
LCALL WRITE_1820

LCALL D1MS

LCALL INIT_1820;準備讀溫度前先復(fù)位

MOV A,#0CCH ; 跳過ROM匹配
LCALL WRITE_1820

MOV A,#0BEH ; 發(fā)出讀溫度命令
LCALL WRITE_1820

LCALL READ_18200; 將讀出的溫度數(shù)據(jù)保存到35H/36H 
CLR P1.4

RET

;寫DS18B20的子程序(有具體的時序要求)
WRITE_1820:
MOV R2,#8;一共8位數(shù)據(jù)
CLR C
WR1:
CLR P3.3
MOV R3,#5
DJNZ R3,$
RRC A
MOV P3.3,C
MOV R3,#21
DJNZ R3,$
SETB P3.3
NOP
DJNZ R2,WR1
SETB P3.3
RET

; 讀DS18B20的程序,從DS18B20中讀出兩個字節(jié)的溫度數(shù)據(jù) 
READ_18200:
MOV R4,#2 ; 將溫度高位和低位從DS18B20中讀出
MOV R1,#TEMPER_L ; 低位存入TEMPER_L,高位存入TEMPER_H
RE00:
MOV R2,#8;數(shù)據(jù)一共有8位
RE01:
CLR C
SETB P3.3
NOP
NOP
CLR P3.3
NOP
NOP
NOP
SETB P3.3

MOV R3,#8
RE10: 
DJNZ R3,RE10

MOV C,P3.3

MOV R3,#21
RE20: 
DJNZ R3,RE20

RRC A
DJNZ R2,RE01
MOV @R1,A
MOV R1,#TEMPER_H ; 低位存入TEMPER_L,高位存入TEMPER_H
DJNZ R4,RE00
RET

;1MS延時
D1MS: MOV R7,#80 
DJNZ R7,$
RET

end