简易DS18B20温度传感器制作元件清单+单片机源程序+Proteus仿真 -

标题: 简易DS18B20温度传感器制作元件清单+单片机源程序+Proteus仿真 [打印本页]

作者: 彼岸花开 时间: 2016-1-15 13:03
标题: 简易DS18B20温度传感器制作元件清单+单片机源程序+Proteus仿真

程序和仿真等所有资料下载：

DS18B20温度传感器制作.zip (75.13 KB, 下载次数: 335)

元器件清单
序号名称数量
1 STC89C51芯片 1
2 芯片座 1
3 12MHz晶振 1
4 30PF电容 2
5 22uF电容 1
6 LCD1602液晶显示屏 1
7 DS18B20 2
10k电阻 1
8 4.7k电阻       2
9 1kΩ电阻 1
10 按键开关（用于单片机最小系统） 1
11 排阻1k 3
12 焊板15cmX9cm 1
13 蜂鸣器 1
14 可调电阻5k 1
15 9013三极管 1
16 导线若干
17 焊丝若干

源程序如下：
#include<reg51.h>
#include <intrins.h>
#define uchar unsigned char
#define uint unsigned int
sbit DQ=P3^3;//ds18b20与单片机连接口
sbit EN=P2^5;
sbit RW=P2^6;
sbit RS=P2^7;
sbit BEEP = P1^3;
uchar code str1[]={" Temperature is "};
uchar code str2[]={"studentNO:       "};
uchar code str3[]={"0346912"};
uchar data disdata[5];
uchar p=0;
uint tvalue;//温度值
uchar tflag;//温度正负标志
//*************************lcd1602程序**************************/
void delay1ms(uint ms)//延时1毫秒
{
      uint i,j;
      for(i=0;i<ms;i++)
      for(j=0;j<114;j++);
}
//*************************报警程序**************************/
void baojing(void)
{
   unsigned int j;
      BEEP=0;
   for (j = 49; j > 0; j--)//响30ms
   {
      BEEP = ~BEEP; //输出频率800Hz
      delay1ms(10); //延时310us
      }
         BEEP=0;
}
void wr_com(uchar com)//写指令//
{
      delay1ms(1);
      RS=0;
      RW=0;
      EN=0;
      P0=com;
      delay1ms(1);
      EN=1;
      delay1ms(1);
      EN=0;
}
void wr_dat(uchar dat)//写数据//
{
      delay1ms(1);
      RS=1;
      RW=0;
      EN=0;
      P0=dat;
      delay1ms(1);
      EN=1;
      delay1ms(1);
      EN=0;
}
void lcd_init()//初始化设置//
{
      wr_com(0x38);delay1ms(5);
      wr_com(0x08);delay1ms(5);
      wr_com(0x01);delay1ms(5);
      wr_com(0x06);delay1ms(5);
      wr_com(0x0c);delay1ms(5);
}
void display(uchar *p)//显示//
{
      while(*p!='\0')
      {
            wr_dat(*p);
            p++;
            delay1ms(1);
      }
}
void init_play()//初始化显示
{
      lcd_init();
      wr_com(0x80);
      display(str2);
      wr_com(0xc0);
      display(str3);
      delay1ms(3000);
      lcd_init();
wr_com(0x80);
      display(str1);
}

/***************************ds18b20程序****************************/
void delay_18B20(uint i)//延时1微秒
{
while(i--);
}
void ds1820rst()/*ds1820复位*/
{

      DQ = 1;       //DQ复位
      delay_18B20(4); //延时
      DQ = 0;       //DQ拉低
      delay_18B20(100); //精确延时大于480us
      DQ = 1;       //拉高
      delay_18B20(30);
}
uchar ds1820rd()/*读数据*/
{
      uchar i=0;
      uchar dat = 0;
      for (i=8;i>0;i--)
      {
            DQ = 0; //给脉冲信号
         dat>>=1;
         DQ = 1; //给脉冲信号
         if(DQ)
         dat|=0x80;
         delay_18B20(10);
      }
return(dat);
}
void ds1820wr(uchar wdata)/*写数据*/
{
      uchar i=0;
      for (i=8; i>0; i--)
      {
            DQ = 0;
            DQ = wdata&0x01;
            delay_18B20(10);
            DQ = 1;
            wdata>>=1;
      }
}
read_temp()/*读取温度值并转换*/
{
      uint a,b;
      ds1820rst();
      ds1820wr(0xcc);//*跳过读序列号*/
      ds1820wr(0x44);//*启动温度转换*/
      ds1820rst();
      ds1820wr(0xcc);//*跳过读序列号*/
      ds1820wr(0xbe);//*读取温度*/
      a=ds1820rd();
      b=ds1820rd();
      tvalue=b;
      tvalue<<=8;
      tvalue=tvalue|a;
if(tvalue<0x08ff)
            tflag=0;
      else
      {
            tvalue=~tvalue+1;
            tflag=1;
      }
      tvalue=tvalue*(0.0625)*10;//温度值扩大10倍，精确到1位小数
      return(tvalue);
}
/*******************************************************************/
void ds1820disp()//温度值显示
{
      uchar flagdat;
      disdata[0]=tvalue/1000+0x30;//百位数
      disdata[1]=tvalue%1000/100+0x30;//十位数
      disdata[2]=tvalue%100/10+0x30;//个位数
      disdata[3]=tvalue%10+0x30;//小数位
      if(tflag==0)
            flagdat=0x20;//正温度不显示符号
      else
      flagdat=0x2d;//负温度显示负号:-

      if(disdata[0]==0x30)
      {
            disdata[0]=0x20;//如果百位为0，不显示
            if(disdata[1]==0x30)
            {
                     disdata[1]=0x20;//如果百位为0，十位为0也不显示
            }
      }
      wr_com(0xc0+4);
      wr_dat(flagdat);//显示符号位
      wr_com(0xc1+4);
      wr_dat(disdata[0]);//显示百位
      wr_com(0xc2+4);
      wr_dat(disdata[1]);//显示十位
      wr_com(0xc3+4);
      wr_dat(disdata[2]);//显示个位
      wr_com(0xc4+4);
      wr_dat(0x2e);//显示小数点
      wr_com(0xc5+4);
      wr_dat(disdata[3]);//显示小数位
      wr_com(0xc6+4);
wr_dat(0x43);
}
//********************主程序***********************************//
void main()
{
BEEP=0;
      init_play();//初始化显示
while(1)
      {
               read_temp();//读取温度
                  ds1820disp();//显示
                     if(read_temp()>252+0x30||read_temp()<203+0x30)          //上限30°C报警，下限25°C报警
                     {  baojing() ;}
                     delay1ms(1)       ;
}}

作者: 917106794 时间: 2016-1-15 13:35
51黑有你更精彩！！！！

作者: fsdch 时间: 2016-1-21 17:06
好资料……

作者: bixiang54 时间: 2016-4-5 21:17
报警上下限的值是怎么算的

作者: WHO 时间: 2016-5-11 14:12
很受用，多谢

作者: 流年莫怜 时间: 2016-6-1 00:00
多谢分享

作者: qazxsw123 时间: 2016-6-16 14:56
下载不了你发的压缩包

作者: a790076742 时间: 2016-6-29 15:36
加上程序仿真没效果

作者: 叶小莫 时间: 2016-7-12 09:08
赞一个

作者: 省123 时间: 2016-8-23 16:29
很受用

作者: WFX777888 时间: 2016-8-30 20:39
谢谢分享资料收藏

作者: 多补钙才能长壮 时间: 2016-10-11 18:37
多谢大神相助

作者: AIRen 时间: 2016-10-31 15:19
这个怎么运行

作者: 一条乐 时间: 2016-11-23 22:37

谢谢，学习、、、

作者: sxzlovelzx 时间: 2016-11-25 10:16
学习了！

作者: sxzlovelzx 时间: 2016-11-25 10:18

谢谢分享资料

作者: 达拉斯布达佩斯 时间: 2017-1-2 13:24
51黑有你更精彩！！！！

作者: wxc19960311 时间: 2017-4-10 16:50
５１有你更精彩，加油

作者: zzxxcc 时间: 2017-4-19 12:16
赞赞赞，

作者: mmx 时间: 2017-5-3 16:41
谢谢分享

作者: 尘封的记忆 时间: 2017-5-7 23:54
感谢，楼主

作者: andxiaohao 时间: 2017-5-8 17:53

多谢楼主分享

作者: Spito 时间: 2017-5-18 09:18
LZ好人多谢分享新入坑

作者: 我只是过于低调 时间: 2017-5-18 10:58
很给力啊

作者: yumiaoyyy 时间: 2017-6-16 19:05

学习了！

作者: 2649660747 时间: 2017-11-5 17:50

烧入程序仿咋无法效果啊

作者: j旺 时间: 2018-6-13 09:36
你有单片机写的这个程序么急

作者: j旺 时间: 2018-6-13 09:37
很赞作者有单片机的程序么

作者: 空心呀 时间: 2018-12-7 12:24
为什么温度27℃时也会报警

作者: xiaozhiTZM 时间: 2018-12-21 19:32
谢谢楼主的分享学习啦

作者: ACHEN0429 时间: 2018-12-27 14:54
受益匪浅

作者: luoyua 时间: 2019-2-24 12:08
51有你更精彩

作者: 李卿 时间: 2019-4-3 09:47
51有你更精彩

作者: Oenone 时间: 2019-4-3 10:15
感谢楼主

作者: zzjay 时间: 2019-7-1 14:08
仿真怎么打开

欢迎光临 (http://www.51hei.com/bbs/)