51單片機(jī)數(shù)碼管顯示DS18B20溫度傳感器+聲光報(bào)警 Proteus仿真圖+完整程序

ID:202308 · 發(fā)表于 2017-7-10 21:10

這是我的課程設(shè)計(jì)

單片機(jī)源程序如下:

#include <reg52.h>
#define uint unsigned int
#define uchar unsigned char //宏定義
sbit DQ=P3^7; //定義DS18B20 的 I/O
sbit DIAN = P0^5; //顯示小數(shù)點(diǎn)用
sbit LED=P1^6;
sbit BEEP=P1^7;
uchar x=0; //計(jì)數(shù)器
signed char m; //溫度值全局變量
uchar n; //溫度值全局變量
uint z;
uint c;
uint gaowen=35; //高溫報(bào)警溫度，默認(rèn)值為35
uint diwen=0; //低溫報(bào)警溫度，默認(rèn)值0
uchar code LEDData[]={0x5F,0x44,0x9D,0xD5,0xC6,0xD3,0xDB,
0x47,0xDF,0xD7,0xCF,0xDA,0x9B,0xDC,0x9B,0x8B};
/*****延時(shí)子程序*****/
void Delay_DS18B20(int num)
{
while(num--) ;
}
/*****初始化DS18B20*****/
void Init_DS18B20(void)
{
unsigned char x=0;
DQ = 1; //DQ復(fù)位
Delay_DS18B20(8); //稍做延時(shí)
DQ = 0; //單片機(jī)將DQ拉低
Delay_DS18B20(80); //精確延時(shí)，大于480us
DQ = 1; //拉高總線
Delay_DS18B20(14);
x = DQ; //稍做延時(shí)后，如果x=0則初始化成功，x=1則初始化失敗
Delay_DS18B20(20);
}
/*****讀一個(gè)字節(jié)*****/
unsigned char ReadOneChar(void)
{
unsigned char i=0;
unsigned char dat = 0;
for (i=8;i>0;i--)
{
DQ = 0; //給脈沖信號(hào)
dat>>=1;
DQ = 1; //給脈沖信號(hào)
if(DQ)
dat|=0x80;
Delay_DS18B20(4);
}
return(dat);
}
/*****寫一個(gè)字節(jié)*****/
void WriteOneChar(unsigned char dat)
{
unsigned char i=0;
for (i=8; i>0; i--)
{
DQ = 0;
DQ = dat&0x01;
Delay_DS18B20(5);
DQ = 1;
dat>>=1;
}
}
/*****讀取溫度*****/
unsigned int ReadTemperature(void)
{
unsigned char a=0;
unsigned char b=0;
unsigned int t=0;
float tt=0;
Init_DS18B20();
WriteOneChar(0xCC); //跳過讀序號(hào)列號(hào)的操作
WriteOneChar(0x44); //啟動(dòng)溫度轉(zhuǎn)換
Init_DS18B20();
WriteOneChar(0xCC); //跳過讀序號(hào)列號(hào)的操作
WriteOneChar(0xBE); //讀取溫度寄存器
a=ReadOneChar(); //讀低8位
b=ReadOneChar(); //讀高8位
t=b; //高8位轉(zhuǎn)移到t
t<<=8; //t數(shù)據(jù)左移8位
t=t|a; //將t和a按位或，得到一個(gè)16位的數(shù)
tt=t*0.0625; //將t乘以0.0625得到實(shí)際溫度值
//（溫度傳感器設(shè)置12位精度，最小分辨率是0.0625）
t= tt*10+0.5; //放大10倍（將小數(shù)點(diǎn)后一位顯示出來）輸出并四舍五入
return(t); //返回溫度值
}
/*****延時(shí)子程序*****/
void Delay(uint num)
{
while( --num );
}
/*****讀取溫度*****/
void check_wendu(void)
{
uint a,b;
c=ReadTemperature(); //獲取溫度值
a=c/100; //計(jì)算得到十位數(shù)字
b=c/10-a*10; //計(jì)算得到個(gè)位數(shù)字
m=c/10; //計(jì)算得到整數(shù)位
if(m<=0) //如果溫度小于0，限制顯示為0
{
m=0;
}
n=c-a*100-b*10; //計(jì)算得到小數(shù)位
}
/*****顯示開機(jī)初始化等待畫面*****/
void Disp_init(void)
{
P0 = ~0x80; //顯示-
P2 = 0x7F;
Delay(200);
P2 = 0xDF;
Delay(200);
P2 = 0xF7;
Delay(200);
P2 = 0xFD;
Delay(200);
P2 = 0xFF; //關(guān)閉顯示
}
/*****顯示溫度子程序*****/
void Disp_Temperature(void)
{
P0 = ~0x98; //顯示c
P2 = 0x7F;
Delay(1000);
P2=0xff; //關(guān)閉顯示
P0=~LEDData[n]; //顯示小數(shù)位
P2 = 0xDF;
Delay(1000);
P2=0xff; //關(guān)閉顯示
P0 =~LEDData[m%10]; //顯示個(gè)位
DIAN = 0; //顯示小數(shù)點(diǎn)
P2 = 0xF7;
Delay(1000);
P2=0xff; //關(guān)閉顯示
P0 =~LEDData[m/10]; //顯示十位
P2 = 0xFD;
Delay(1000);
P2 = 0xff; //關(guān)閉顯示
}
/*****主函數(shù)*****/
void main(void)
{
LED=0; //默認(rèn)關(guān)閉報(bào)警
BEEP=0; //默認(rèn)關(guān)閉蜂鳴器
check_wendu();
……………………
…………限于本文篇幅余下代碼請(qǐng)從51黑下載附件…………

復(fù)制代碼

所有資料51hei提供下載:

51單片機(jī)數(shù)碼管顯示DS18B20溫度傳感器聲光報(bào)警 Proteus仿真圖完整程序.zip (95.51 KB, 下載次數(shù): 1005)

ID:108622 · 發(fā)表于 2017-10-18 06:17

有沒有0下溫度

ID:342112 · 發(fā)表于 2018-6-7 21:59

樓主，求兩個(gè)18B20的程序，就在這個(gè)圖的基礎(chǔ)上，兩個(gè)溫度同時(shí)顯示

ID:151845 · 發(fā)表于 2018-6-11 14:43

為什么解壓不了？

ID:288393 · 發(fā)表于 2018-11-27 23:01

學(xué)習(xí)一下，看看

ID:288393 · 發(fā)表于 2018-11-27 23:05

這個(gè)怎么確定能不能用

ID:313455 · 發(fā)表于 2018-12-20 13:11

謝謝樓主

ID:187094 · 發(fā)表于 2018-12-28 10:15

實(shí)在是太感謝了

ID:457097 · 發(fā)表于 2018-12-28 14:14

謝謝樓主

ID:434420 · 發(fā)表于 2019-1-3 15:18

感覺幫到我了

ID:321495 · 發(fā)表于 2019-1-13 20:30

真棒真棒，急需仿真

ID:468274 · 發(fā)表于 2019-1-20 16:07

uchar code LEDData[]={0x5F,0x44,0x9D,0xD5,0xC6,0xD3,0xDB,0x47,0xDF,0xD7,0xCF,0xDA,0x9B,0xDC,0x9B,0x8B};
請(qǐng)問這是數(shù)碼管0—F的顯示代碼嗎？共陰極和共陽極代碼都對(duì)不上啊

ID:19315 · 發(fā)表于 2019-1-23 16:53

這個(gè)程序值得學(xué)習(xí)，很有參考考

ID:484809 · 發(fā)表于 2019-3-5 13:20

可以吧后面的程序補(bǔ)上來么。。。

ID:46381 · 發(fā)表于 2019-3-8 20:07

好東西，謝謝分享！！！

ID:46381 · 發(fā)表于 2019-3-8 20:08

謝謝分享！！！！！！！！！！！！！！！！！！！

ID:489294 · 發(fā)表于 2019-3-21 02:35

謝謝樓主!!!!!!!!!!!!!

ID:497521 · 發(fā)表于 2019-3-24 21:06

這個(gè)程序值得學(xué)習(xí)，謝謝！

ID:488831 · 發(fā)表于 2019-3-25 13:04

陳鵬飛15 發(fā)表于 2019-1-20 16:07
uchar code LEDData[]={0x5F,0x44,0x9D,0xD5,0xC6,0xD3,0xDB,0x47,0xDF,0xD7,0xCF,0xDA,0x9B,0xDC,0x9B,0x ...

u8 code smgduan[17]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71};//顯示0~F的值

ID:500275 · 發(fā)表于 2019-3-28 22:45

感謝你，學(xué)習(xí)了

ID:498978 · 發(fā)表于 2019-4-2 18:58

仿真圖不能用Altium designer打開嗎

ID:490858 · 發(fā)表于 2019-4-3 19:52

你好我想問一下，為什么低于25度，數(shù)碼管就會(huì)閃爍

ID:424725 · 發(fā)表于 2019-5-4 13:50

謝謝分享！！學(xué)習(xí)一下

ID:503018 · 發(fā)表于 2019-5-11 16:11

樓主，求兩個(gè)18B20的程序，就在這個(gè)圖的基礎(chǔ)上，兩個(gè)溫度同時(shí)顯示，，，同時(shí)也是非常感謝

ID:532628 · 發(fā)表于 2019-5-11 23:47

為什么編碼cope到keil里編譯知識(shí)有錯(cuò)

ID:539393 · 發(fā)表于 2019-5-16 11:03

對(duì)我?guī)椭艽?/td>

ID:540467 · 發(fā)表于 2019-5-17 17:48

這個(gè)程序有錯(cuò)誤嗎

ID:489680 · 發(fā)表于 2019-5-23 14:53

想問一下R1~R4的作用是什么為什么不能去掉

ID:549887 · 發(fā)表于 2019-5-29 11:04

感謝作者的分享

ID:538101 · 發(fā)表于 2019-5-29 21:36

學(xué)習(xí)學(xué)習(xí)

ID:551121 · 發(fā)表于 2019-5-30 15:51

感謝樓主的分享

ID:520050 · 發(fā)表于 2019-6-25 17:16

可以共享嗎？

ID:611687 · 發(fā)表于 2019-10-24 19:55

真厲害！

ID:640789 · 發(fā)表于 2019-11-13 08:10

感謝分享

ID:646042 · 發(fā)表于 2019-11-20 20:21

謝謝樓主

ID:628216 · 發(fā)表于 2019-11-28 15:08

謝謝分享

ID:651497 · 發(fā)表于 2019-11-28 15:41

做的很棒哦

ID:647470 · 發(fā)表于 2019-12-21 17:35

陳鵬飛15 發(fā)表于 2019-1-20 16:07
uchar code LEDData[]={0x5F,0x44,0x9D,0xD5,0xC6,0xD3,0xDB,0x47,0xDF,0xD7,0xCF,0xDA,0x9B,0xDC,0x9B,0x ...

他P0口的接線沒有按順序來

ID:706009 · 發(fā)表于 2020-3-11 18:03

下載下來仔細(xì)看看

ID:699690 · 發(fā)表于 2020-3-29 00:36

謝謝樓主的分析

帳號(hào)		自動(dòng)登錄	找回密碼
密碼			立即注冊(cè)

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

51單片機(jī)數(shù)碼管顯示DS18B20溫度傳感器+聲光報(bào)警 Proteus仿真圖+完整程序

評(píng)分