51單片機數碼管顯示DS18B20溫度傳感器+聲光報警 Proteus仿真圖+完整程序

ID:202308 · 發表于 2017-7-10 21:10

這是我的課程設計

單片機源程序如下:

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

復制代碼

所有資料51hei提供下載:

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

ID:108622 · 發表于 2017-10-18 06:17

有沒有0下溫度

ID:342112 · 發表于 2018-6-7 21:59

樓主，求兩個18B20的程序，就在這個圖的基礎上，兩個溫度同時顯示

ID:151845 · 發表于 2018-6-11 14:43

為什么解壓不了？

ID:288393 · 發表于 2018-11-27 23:01

學習一下，看看

ID:288393 · 發表于 2018-11-27 23:05

這個怎么確定能不能用

ID:313455 · 發表于 2018-12-20 13:11

謝謝樓主

ID:187094 · 發表于 2018-12-28 10:15

實在是太感謝了

ID:457097 · 發表于 2018-12-28 14:14

謝謝樓主

ID:434420 · 發表于 2019-1-3 15:18

感覺幫到我了

ID:321495 · 發表于 2019-1-13 20:30

真棒真棒，急需仿真

ID:468274 · 發表于 2019-1-20 16:07

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

ID:19315 · 發表于 2019-1-23 16:53

這個程序值得學習，很有參考考

ID:484809 · 發表于 2019-3-5 13:20

可以吧后面的程序補上來么。。。

ID:46381 · 發表于 2019-3-8 20:07

好東西，謝謝分享�。�！

ID:46381 · 發表于 2019-3-8 20:08

謝謝分享！�。。。。。。。。。。。。。。。。�！

ID:489294 · 發表于 2019-3-21 02:35

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

ID:497521 · 發表于 2019-3-24 21:06

這個程序值得學習，謝謝！

ID:488831 · 發表于 2019-3-25 13:04

陳鵬飛15 發表于 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 · 發表于 2019-3-28 22:45

感謝你，學習了

ID:498978 · 發表于 2019-4-2 18:58

仿真圖不能用Altium designer打開嗎

ID:490858 · 發表于 2019-4-3 19:52

你好我想問一下，為什么低于25度，數碼管就會閃爍

ID:424725 · 發表于 2019-5-4 13:50

謝謝分享�。W習一下

ID:503018 · 發表于 2019-5-11 16:11

樓主，求兩個18B20的程序，就在這個圖的基礎上，兩個溫度同時顯示，，，同時也是非常感謝

ID:532628 · 發表于 2019-5-11 23:47

為什么編碼cope到keil里編譯知識有錯

ID:539393 · 發表于 2019-5-16 11:03

對我幫助很大

ID:540467 · 發表于 2019-5-17 17:48

這個程序有錯誤嗎

ID:489680 · 發表于 2019-5-23 14:53

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

ID:549887 · 發表于 2019-5-29 11:04

感謝作者的分享

ID:538101 · 發表于 2019-5-29 21:36

學習學習

ID:551121 · 發表于 2019-5-30 15:51

感謝樓主的分享

ID:520050 · 發表于 2019-6-25 17:16

可以共享嗎？

ID:611687 · 發表于 2019-10-24 19:55

真厲害！

ID:640789 · 發表于 2019-11-13 08:10

感謝分享

ID:646042 · 發表于 2019-11-20 20:21

謝謝樓主

ID:628216 · 發表于 2019-11-28 15:08

謝謝分享

ID:651497 · 發表于 2019-11-28 15:41

做的很棒哦

ID:647470 · 發表于 2019-12-21 17:35

陳鵬飛15 發表于 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 · 發表于 2020-3-11 18:03

下載下來仔細看看

ID:699690 · 發表于 2020-3-29 00:36

謝謝樓主的分析

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

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

51單片機數碼管顯示DS18B20溫度傳感器+聲光報警 Proteus仿真圖+完整程序

評分