本文檔的主要內(nèi)容詳細(xì)介紹的是DS18B20數(shù)字溫度傳感器的源代碼。
; FLAG1: 標(biāo)志位,為“1”時(shí)表示檢測(cè)到DS18B20
; DQ: DS18B20的數(shù)據(jù)總線接腳
; TEMPER_NUM:保存讀出的溫度數(shù)據(jù)
; 本程序僅適合單個(gè)DS18B20和51單片機(jī)的連接,晶振為12MHZ左右
TEMPER_L EQU 36H
TEMPER_H EQU 35H
DQ BIT P1.7
; DS18B20初始化程序
;//*****************************************//
INIT_1820:
SETB DQ
NOP
CLR DQ
MOV R0,#06BH
TSR1:
DJNZ R0,TSR1 ; 延時(shí)
SETB DQ
MOV R0,#25H
TSR2:
JNB DQ,TSR3
DJNZ R0,TSR2
LJMP TSR4 ; 延時(shí)
TSR3:
SETB FLAG1 ; 置標(biāo)志位,表示DS1820存在
LJMP TSR5
TSR4:
CLR FLAG1 ; 清標(biāo)志位,表示DS1820不存在
LJMP TSR7
TSR5:
MOV R0,#06BH
TSR6:
DJNZ R0,TSR6 ; 延時(shí)
TSR7:
SETB DQ
RET
;//*****************************************//
; 重新寫DS18B20暫存存儲(chǔ)器設(shè)定值
;//*****************************************//
RE_CONFIG:
JB FLAG1,RE_CONFIG1 ; 若DS18B20存在,轉(zhuǎn)RE_CONFIG1
RET
RE_CONFIG1:
MOV A,#0CCH ; 發(fā)SKIP ROM命令
LCALL WRITE_1820
MOV A,#4EH ; 發(fā)寫暫存存儲(chǔ)器命令
LCALL WRITE_1820
MOV A,#00H ; TH(報(bào)警上限)中寫入00H
LCALL WRITE_1820
MOV A,#00H ; TL(報(bào)警下限)中寫入00H
LCALL WRITE_1820
MOV A,#1FH ; 選擇9位溫度分辨率
LCALL WRITE_1820
RET
;//*****************************************//
; 讀出轉(zhuǎn)換后的溫度值
;//*****************************************//
GET_TEMPER:
SETB DQ ; 定時(shí)入口
LCALL INIT_1820
JB FLAG1,TSS2
RET ; 若DS18B20不存在則返回
TSS2:
MOV A,#0CCH ; 跳過ROM匹配
LCALL WRITE_1820
MOV A,#44H ; 發(fā)出溫度轉(zhuǎn)換命令
LCALL WRITE_1820
LCALL INIT_1820
MOV A,#0CCH ; 跳過ROM匹配
LCALL WRITE_1820
MOV A,#0BEH ; 發(fā)出讀溫度命令
LCALL WRITE_1820
LCALL READ_1820
MOV TEMPER_NUM,A ; 將讀出的溫度數(shù)據(jù)保存
RET
;//*****************************************//
; 讀DS18B20的程序,從DS18B20中讀出一個(gè)字節(jié)的數(shù)據(jù)
;//*****************************************//
READ_1820:
MOV R2,#8
RE1:
CLR C
SETB DQ
NOP
NOP
CLR DQ
NOP
NOP
NOP
SETB DQ
MOV R3,#7
DJNZ R3,$
MOV C,DQ
MOV R3,#23
DJNZ R3,$
RRC A
DJNZ R2,RE1
RET
;//*****************************************//
; 寫DS18B20的程序
;//*****************************************//
WRITE_1820:
MOV R2,#8
CLR C
WR1:
CLR DQ
MOV R3,#6
DJNZ R3,$
RRC A
MOV DQ,C
MOV R3,#23
DJNZ R3,$
SETB DQ
NOP
DJNZ R2,WR1
SETB DQ
RET
;//*****************************************//
; 讀DS18B20的程序,從DS18B20中讀出兩個(gè)字節(jié)的溫度數(shù)據(jù)
;//*****************************************//
READ_18200:
MOV R4,#2 ; 將溫度高位和低位從DS18B20中讀出
MOV R1,#36H ; 低位存入36H(TEMPER_L),高位存入35H(TEMPER_H)
RE00:
MOV R2,#8
RE01:
CLR C
SETB DQ
NOP
NOP
CLR DQ
NOP
NOP
NOP
SETB DQ
MOV R3,#7
DJNZ R3,$
MOV C,DQ
MOV R3,#23
DJNZ R3,$
RRC A
DJNZ R2,RE01
MOV @R1,A
DEC R1
DJNZ R4,RE00
RET
;//*****************************************//
; 將從DS18B20中讀出的溫度數(shù)據(jù)進(jìn)行轉(zhuǎn)換
;//*****************************************//
TEMPER_COV:
MOV A,#0F0H
ANL A,TEMPER_L ; 舍去溫度低位中小數(shù)點(diǎn)后的四位溫度數(shù)值
SWAP A
MOV TEMPER_NUM,A
MOV A,TEMPER_L
JNB ACC.3,TEMPER_COV1 ; 四舍五入去溫度值
INC TEMPER_NUM
TEMPER_COV1:
MOV A,TEMPER_H
ANL A,#07H
SWAP A
ORL A,TEMPER_NUM
MOV TEMPER_NUM,A ; 保存變換后的溫度數(shù)據(jù)
LCALL BIN_BCD
RET
;//*****************************************//
; 將16進(jìn)制的溫度數(shù)據(jù)轉(zhuǎn)換成壓縮BCD碼
;//*****************************************//
BIN_BCD:
MOV DPTR,#TEMP_TAB
MOV A,TEMPER_NUM
MOVC A,@A+DPTR
MOV TEMPER_NUM,A
RET
TEMP_TAB:
DB 00H,01H,02H,03H,04H,05H,06H,07H
DB 08H,09H,10H,11H,12H,13H,14H,15H
DB 16H,17H,18H,19H,20H,21H,22H,23H
DB 24H,25H,26H,27H,28H,29H,30H,31H
DB 32H,33H,34H,35H,36H,37H,38H,39H
DB 40H,41H,42H,43H,44H,45H,46H,47H
DB 48H,49H,50H,51H,52H,53H,54H,55H
DB 56H,57H,58H,59H,60H,61H,62H,63H
DB 64H,65H,66H,67H,68H,69H,70H
;//*****************************************//
-
溫度傳感器
+關(guān)注
關(guān)注
48文章
2881瀏覽量
155629 -
51單片機(jī)
+關(guān)注
關(guān)注
273文章
5696瀏覽量
122748 -
DS18B20
+關(guān)注
關(guān)注
10文章
776瀏覽量
80576
發(fā)布評(píng)論請(qǐng)先 登錄
相關(guān)推薦
評(píng)論