在前面,我們學習了DS18B20新型數字溫度傳感器的基礎理論知識,對DS18B20的特性及應用有了較全面的了解,本課我們就結合S51增強型實驗板,ISP編程器來學習DS18B20的應用軟件編程,做DS18B20測溫實驗,DIY一個我們自己的數字溫度計,通過本實驗的學習,熟練掌握DS18B20的開發,相信你也可以自己的智能溫控系統!
首先介紹實驗的硬件設備:S51增強型單片機實驗板 + ISP編程器 + DS18B20溫度傳感器
(已焊接好并經過測試,免去初學者因焊接不好損壞DS18B20的風險,采用屏蔽線焊接,熱縮管絕緣保護,防插反接頭,抗干擾能力強,測溫精度更高,插入實驗板即可使用)
注:如圖中所示,實驗板的第5位數碼管可以顯示溫度的符號“℃”,做溫度實驗更加直觀。將配套溫度傳感器插入DS18B20實驗接口,完成溫度傳感器的硬件連接。
圖2: ISP編程器套件
DS18B20測溫實驗原理圖見下面圖3
圖3
新建Keil工程ds18sy.UV2,輸入下面的DS18B20測溫實驗源程序,編譯得到HEX格式目標文件ds18sy.hex。
》》》 點擊下載DS18B20測溫實驗目標程序ds18sy.hex 》》》
》》》 點擊下載DS18B20測溫實驗源程序 》》》
;--------- 下面是DS18B20測溫實驗源程序 ---------
ORG0000H
START:MOVSP,#60H ;開機初始化
MOVP0,#0FFH
MOVP1,#0FEH
MOVP2,#0FFH
MOVP3,#0FFH
MAIN: LCALL GET_TEMPER ;調用讀溫度子程序
LCALL DISP ;調用數碼管顯示子程序
AJMPMAIN ;重復循環
;------ 讀DS18B20傳感器的溫度值 ------
GET_TEMPER:
SETBP3.3
LCALL RST18B20 ;復位DS18B20
JB 00H,DSS2
RET
DSS2: MOV A,#0CCH;跳過ROM匹配
LCALL WR18B20
MOV A,#44H ;向DS18B20發出溫度轉換命令
LCALL WR18B20
LCALL RST18B20 ;準備讀溫度前先復位DS18B20
MOV A,#0CCH;跳過ROM匹配
LCALL WR18B20
MOV A,#0BEH;向DS18B20發出讀溫度命令
LCALL WR18B20
LCALL RE18B20;讀出溫度數據
RET
;------ DS18B20復位初始化程序 ------
RST18B20:
SETBP3.3
NOP
CLR P3.3
MOV R0,#06BH;主機發出復位低脈沖
MOV R1,#03H
DSR1: DJNZR0,DSR1
MOV R0,#6BH
DJNZR1,DSR1
SETBP3.3;拉高數據線
NOP
NOP
NOP
MOV R0,#25H
DSR2: JNB P3.3,DSR3;等待DS18B20回應
DJNZR0,DSR2
LJMPDSR4
DSR3: SETB00H;置標志位,表示DS1820存在
LJMPDSR5
DSR4: CLR 00H ;清標志位,表示DS1820不存在
LJMPDSR7
DSR5: MOV R0,#06BH
DSR6: DJNZR0,DSR6;延時一段時間
DSR7: SETBP3.3
RET
;------ 寫DS18B20的子程序 ------
WR18B20:
MOV R2,#8
CLR C
WR1:CLR P3.3
MOV R3,#6
DJNZR3,$
RRC A
MOV P3.3,C
MOV R3,#23
DJNZR3,$
SETBP3.3
NOP
DJNZR2,WR1
SETBP3.3
RET
;------ 從DS18B20中讀溫度數據程序 ------
RE18B20:
MOV R4,#2
MOV R1,#2FH
RE00: MOV R2,#8
RE01: CLR C
SETBP3.3
NOP
NOP
CLR P3.3
NOP
NOP
NOP
SETBP3.3
MOV R3,#09
RE10: DJNZR3,RE10
MOV C,P3.3
MOV R3,#23
RE20: DJNZR3,RE20
RRC A
DJNZR2,RE01
MOV @R1,A
DEC R1
DJNZR4,RE00
RET
;-------- 顯示子程序 --------
DISP: MOV A,2FH
MOV C,70H
RRC A
MOV C,71H
RRC A
MOV C,72H
RRC A
MOV C,73H
RRC A
MOV 2FH,A
MOV A,2FH
MOV B,#10
DIV AB
MOV 30H,A
MOV 31H,B
MOV A,30H
MOV DPTR,#SGTB
MOVCA,@A+DPTR
MOV P0,A;顯示溫度“十位”值
CLR P2.2
SETBP2.0
SETBP2.1
SETBP2.3
SETBP2.4
LCALL YS4722U
MOV A,31H
MOV DPTR,#SGTB
MOVCA,@A+DPTR
MOV P0,A;顯示溫度“個位”值
CLR P2.3
SETBP2.0
SETBP2.1
SETBP2.2
SETBP2.4
LCALL YS4722U
MOV A,#01000110B
MOV P0,A;顯示溫度符號“ ℃”
CLR P2.4
SETBP2.0
SETBP2.1
SETBP2.2
SETBP2.3
LCALL YS4722U
RET
;************* 8位共陽數碼管顯示器字型碼表 *****************
SGTB: DB 0C0H,0F9H,0A4H,0B0H,99H,92H,82H,0F8H,80H,90H
DB 88H,83H,0C6H,0A1H,86H,8EH,89H,0A3H,8CH,0C8H
YS4722U:
MOV R4,#10 ;延時子程序
Y3: MOV R5,#216
DJNZR5,$
DJNZR4,Y3
RET
END
-
傳感器
+關注
關注
2553文章
51392瀏覽量
756593 -
DS18B20
+關注
關注
10文章
780瀏覽量
81115 -
編程器
+關注
關注
9文章
398瀏覽量
42424
發布評論請先 登錄
相關推薦
評論