找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 17270|回复: 35
打印 上一主题 下一主题
收起左侧

简易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)        ;
}}


评分

参与人数 5黑币 +73 收起 理由
新手,请赐教 + 5 赞一个!
ssfc + 5
stand + 5 很给力!
fsdch + 8 共享资料的黑币奖励!
admin + 50 共享资料的黑币奖励!

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏15 分享淘帖 顶5 踩
回复

使用道具 举报

沙发
ID:94642 发表于 2016-1-15 13:35 | 只看该作者
51黑有你更精彩!!!!
回复

使用道具 举报

板凳
ID:70785 发表于 2016-1-21 17:06 | 只看该作者
好资料……
回复

使用道具 举报

地板
ID:112336 发表于 2016-4-5 21:17 | 只看该作者
报警上下限的值是怎么算的
回复

使用道具 举报

5#
ID:118329 发表于 2016-5-11 14:12 | 只看该作者
很受用,多谢
回复

使用道具 举报

6#
ID:124367 发表于 2016-6-1 00:00 | 只看该作者
多谢分享
回复

使用道具 举报

7#
ID:126990 发表于 2016-6-16 14:56 | 只看该作者
下载不了 你发的压缩包
回复

使用道具 举报

8#
ID:128435 发表于 2016-6-29 15:36 | 只看该作者
加上程序仿真没效果
回复

使用道具 举报

9#
ID:130113 发表于 2016-7-12 09:08 | 只看该作者
赞一个
回复

使用道具 举报

10#
ID:121697 发表于 2016-8-23 16:29 | 只看该作者
很受用
回复

使用道具 举报

11#
ID:63317 发表于 2016-8-30 20:39 来自手机 | 只看该作者
谢谢分享资料收藏
回复

使用道具 举报

12#
ID:142352 发表于 2016-10-11 18:37 | 只看该作者
多谢大神相助
回复

使用道具 举报

13#
ID:145342 发表于 2016-10-31 15:19 | 只看该作者
这个怎么运行
回复

使用道具 举报

14#
ID:113123 发表于 2016-11-23 22:37 | 只看该作者

谢谢,学习、、、
回复

使用道具 举报

15#
ID:150072 发表于 2016-11-25 10:16 | 只看该作者
学习了!
回复

使用道具 举报

16#
ID:150072 发表于 2016-11-25 10:18 | 只看该作者

谢谢分享资料
回复

使用道具 举报

17#
ID:158995 发表于 2017-1-2 13:24 | 只看该作者
51黑有你更精彩!!!!
回复

使用道具 举报

18#
ID:186936 发表于 2017-4-10 16:50 | 只看该作者
51有你更精彩,加油
回复

使用道具 举报

19#
ID:136183 发表于 2017-4-19 12:16 | 只看该作者
赞赞赞,
回复

使用道具 举报

20#
ID:196104 发表于 2017-5-3 16:41 | 只看该作者
谢谢分享
回复

使用道具 举报

21#
ID:192975 发表于 2017-5-7 23:54 | 只看该作者
感谢,楼主
回复

使用道具 举报

22#
ID:186074 发表于 2017-5-8 17:53 | 只看该作者

多谢楼主分享
回复

使用道具 举报

23#
ID:190995 发表于 2017-5-18 09:18 | 只看该作者
LZ好人多谢分享  新入坑
回复

使用道具 举报

24#
ID:194729 发表于 2017-5-18 10:58 | 只看该作者
很给力啊
回复

使用道具 举报

25#
ID:211933 发表于 2017-6-16 19:05 | 只看该作者

学习了!
回复

使用道具 举报

26#
ID:241667 发表于 2017-11-5 17:50 | 只看该作者

烧入程序仿咋无法效果啊
回复

使用道具 举报

27#
ID:350841 发表于 2018-6-13 09:36 | 只看该作者
你有单片机写的这个 程序么  急
回复

使用道具 举报

28#
ID:350841 发表于 2018-6-13 09:37 | 只看该作者
很赞  作者有单片机的程序么
回复

使用道具 举报

29#
ID:259278 发表于 2018-12-7 12:24 | 只看该作者
为什么温度27℃时也会报警
回复

使用道具 举报

30#
ID:441855 发表于 2018-12-21 19:32 | 只看该作者
谢谢楼主的分享  学习啦
回复

使用道具 举报

31#
ID:450739 发表于 2018-12-27 14:54 | 只看该作者
受益匪浅
回复

使用道具 举报

32#
ID:462433 发表于 2019-2-24 12:08 | 只看该作者
51有你更精彩
回复

使用道具 举报

33#
ID:503802 发表于 2019-4-3 09:47 | 只看该作者
51有你更精彩
回复

使用道具 举报

34#
ID:138199 发表于 2019-4-3 10:15 | 只看该作者
感谢楼主
回复

使用道具 举报

35#
ID:453180 发表于 2019-7-1 14:08 | 只看该作者
仿真怎么打开
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表