2051單片機DS18B20數字溫度計C程序

ID:76686 · 發表于 2015-4-11 20:04

這個溫度計使用的單片機是AT89C2051，測量范圍-55到+125度，顯示精度為0.1度，DS18B20數據腳P3.4 ，采用器件默認的12位轉化，最大轉化時間750微秒，顯示采用4位LED共陽顯示測溫值，P1口為段碼輸入,P0~P3為位選。下面是制作好實物圖，電路原理比較簡單，這里就不給出。資料是從網絡上收集整理的。

源代碼下載：

DS18B20數字溫度計C程序.zip (22.71 KB, 下載次數: 283)

程序源代碼：

//***********DS18B20數字溫度計C程序****************//
//*MCU: AT892051 //
//*MCU-crystal: 12M //
//DS18B20的讀寫程序,數據腳P3.4 //
//溫度傳感器18B20匯編程序,采用器件默認的12位轉化 //
//最大轉化時間750微秒,顯示溫度-55到+125度,顯示精度 //
//為0.1度，顯示采用4位LED共陽顯示測溫值 //
//P1口為段碼輸入,P0~P3為位選 //
/***************************************************/
#include "reg51.h"
#include "intrins.h" //_nop_();延時函數用
#define Disdata P1 //段碼輸出口
#define discan P3 //掃描口
#define uchar unsigned char
#define uint unsigned int
sbit DQ=P3^4; //溫度輸入口
sbit DIN=P1^7; //LED小數點控制
uint h;
uint temp;
//
//
//**************溫度小數部分用查表法***********//
uchar code ditab[16]=
{0x00,0x01,0x01,0x02,0x03,0x03,0x04,0x04,0x05,0x06,0x06,0x07,0x08,0x08,0x09,0x09};
//
uchar code dis_7[12]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,0xff,0xbf};
//共陽LED段碼表 "0" "1" "2" "3" "4" "5" "6" "7" "8" "9" "不亮" "-"
uchar code scan_con[4]={0x08,0x04,0x02,0x01}; //列掃描控制字
uchar data temp_data[2]={0x00,0x00}; //讀出溫度暫放
uchar data display[5]={0x00,0x00,0x00,0x00,0x00}; //顯示單元數據，共4個數據和一個運算暫用
//
//
//
/*****************11us延時函數*************************/
//
void delay(uint t)
{
for (;t>0;t--);
}
//
/****************顯示掃描函數***************************/
scan()
{
char k;
for(k=0;k<4;k++) //4位LED掃描控制
{
Disdata=dis_7[display[k]]; //數據顯示
if (k==1){DIN=0;} //小數點顯示
discan=scan_con[k]; //位選
delay(300);
}
return 0;
}
//
//
/****************DS18B20復位函數************************/
ow_reset(void)
{
char presence=1;
while(presence)
{
while(presence)
{
DQ=1;_nop_();_nop_();//從高拉倒低
DQ=0;
delay(50); //550 us
DQ=1;
delay(6); //66 us
presence=DQ; //presence=0 復位成功,繼續下一步
}
delay(45); //延時500 us
presence=~DQ;
}
DQ=1; //拉高電平
return 0;
}
//
//
/****************DS18B20寫命令函數************************/
//向1-WIRE 總線上寫1個字節
void write_byte(uchar val)
{
uchar i;
for(i=8;i>0;i--)
{
DQ=1;_nop_();_nop_(); //從高拉倒低
DQ=0;_nop_();_nop_();_nop_();_nop_(); //5 us
DQ=val&0x01; //最低位移出
delay(6); //66 us
val=val/2; //右移1位
}
DQ=1;
delay(1);
}
//
/****************DS18B20讀1字節函數************************/
//從總線上取1個字節
uchar read_byte(void)
{
uchar i;
uchar value=0;
for(i=8;i>0;i--)
{
DQ=1;_nop_();_nop_();
value>>=1;
DQ=0;_nop_();_nop_();_nop_();_nop_(); //4 us
DQ=1;_nop_();_nop_();_nop_();_nop_(); //4 us
if(DQ)value|=0x80;
delay(6); //66 us
}
DQ=1;
return(value);
}
//
/****************讀出溫度函數************************/
//
read_temp()
{
ow_reset(); //總線復位
delay(200);
write_byte(0xcc); //發命令
write_byte(0x44); //發轉換命令
ow_reset();
delay(1);
write_byte(0xcc); //發命令
write_byte(0xbe);
temp_data[0]=read_byte(); //讀溫度值的第字節
temp_data[1]=read_byte(); //讀溫度值的高字節
temp=temp_data[1];
temp<<=8;
temp=temp|temp_data[0]; // 兩字節合成一個整型變量。
return temp; //返回溫度值
}
//
/****************溫度數據處理函數************************/
//二進制高字節的低半字節和低字節的高半字節組成一字節,這個
//字節的二進制轉換為十進制后,就是溫度值的百、十、個位值,而剩
//下的低字節的低半字節轉化成十進制后,就是溫度值的小數部分
/********************************************************/
work_temp(uint tem)
{
uchar n=0;
if(tem>6348) // 溫度值正負判斷
{tem=65536-tem;n=1;} // 負溫度求補碼,標志位置1
display[4]=tem&0x0f; // 取小數部分的值
display[0]=ditab[display[4]]; // 存入小數部分顯示值
display[4]=tem>>4; // 取中間八位,即整數部分的值
display[3]=display[4]/100; // 取百位數據暫存
display[1]=display[4]%100; // 取后兩位數據暫存
display[2]=display[1]/10; // 取十位數據暫存
display[1]=display[1]%10;
/******************符號位顯示判斷**************************/
if(!display[3])
{
display[3]=0x0a; //最高位為0時不顯示
if(!display[2])
{
display[2]=0x0a; //次高位為0時不顯示
}
}
if(n){display[3]=0x0b;} //負溫度時最高位顯示"-"
return 0;
}
//
//
/****************主函數************************/
main()
{
Disdata=0xff; //初始化端口
discan=0xff;
for(h=0;h<4;h++) //開機顯示"8888"
{display[h]=8;}
ow_reset(); //開機先轉換一次
write_byte(0xcc); //Skip ROM
write_byte(0x44); //發轉換命令
for(h=0;h<100;h++) //開機顯示"8888"
{scan();}
while(1)
{
work_temp(read_temp()); //處理溫度數據
scan(); //顯示溫度值
}
}
//
//***********************結束**************************//

復制代碼

ID:78702 · 發表于 2015-5-26 19:54

智能熱水器控制系統

ID:87141 · 發表于 2015-7-29 09:44

小巧，簡單，不錯。

ID:91475 · 發表于 2015-10-2 00:55

新手過來學習學習

ID:74933 · 發表于 2016-5-3 16:09

很好，適合新手練手。

ID:124480 · 發表于 2016-6-1 15:41

看看，還不錯的樣子

ID:127666 · 發表于 2016-6-22 14:28

過來學習學習

ID:136121 · 發表于 2016-8-6 10:08

能不能提供個原理圖啊，新手

ID:136121 · 發表于 2016-8-6 10:09

gdx 發表于 2016-6-22 14:28
過來學習學習

你有適合這個程序的原理圖嗎

ID:136121 · 發表于 2016-8-6 10:09

moonchen 發表于 2016-5-3 16:09
很好，適合新手練手。

你有適合這個程序的原理圖嗎

ID:99130 · 發表于 2016-8-6 13:56

冒昧說一句，18B20不好控制，樓主給出的圖和程序就算全部都能對的上號，樓主也做成功了，但是不見得別人就能一樣成功完美的工作，因為這貨的程序要求很嚴格，還有硬件也會有誤差，所以慎重選擇。
我用這貨反正是沒成功過，連毛都不顯示，顯示出來的也沒人看得懂。。。

ID:96682 · 發表于 2016-8-6 16:39

越快樂越墮落發表于 2016-8-6 13:56
冒昧說一句，18B20不好控制，樓主給出的圖和程序就算全部都能對的上號，樓主也做成功了，但是不見得別人就 ...

同樣可用的溫度計制作，不見得人人都能制作成功。
DIY 還是要看個人能力

ID:99130 · 發表于 2016-8-7 17:47

wc86110 發表于 2016-8-6 16:39
同樣可用的溫度計制作，不見得人人都能制作成功。
DIY 還是要看個人能力

個人能力是一方面，元件性能也是關鍵。

ID:96320 · 發表于 2016-10-15 21:40

學習學習，自己的程序老有問題，參考樓主的，謝謝

ID:147953 · 發表于 2016-11-15 09:26

感謝樓主

ID:154250 · 發表于 2016-12-15 23:07

很好，學習學習

ID:156955 · 發表于 2016-12-22 19:20

不錯的程序

ID:74649 · 發表于 2017-1-21 07:56

很好，學習學習

ID:29734 · 發表于 2017-3-22 19:26

誰有這程序原理圖，我怎么鏈接完顯示很亂，謝謝大家了

ID:47933 · 發表于 2017-4-3 13:57

確實夠簡潔，初學者很有用

ID:200118 · 發表于 2017-6-9 21:49

謝謝分享

ID:211258 · 發表于 2017-6-14 22:54

謝謝分享，太好了正好需要

ID:260178 · 發表于 2017-12-11 14:45

能給我個資料嗎540371974@qq.com

ID:18797 · 發表于 2019-9-25 10:12

不知為何，溫度顯示不變

ID:18797 · 發表于 2019-9-25 10:14

這個可以深刻理解I2C的工作原理

ID:615501 · 發表于 2019-9-29 09:25

贊，，真不錯

帳號		自動登錄	找回密碼
密碼			立即注冊

久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

2051單片機DS18B20數字溫度計C程序

評分

相關帖子

	沙發無效樓層，該帖已經被刪除

	地板無效樓層，該帖已經被刪除

	5^# 無效樓層，該帖已經被刪除