找回密码
 立即注册

QQ登录

只需一步,快速开始

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

单片机数字温度计(高于10度,低于-3.5度时报警)代码与仿真

[复制链接]
跳转到指定楼层
楼主
(收集加修改)当温度高于10度,低于-3.5度时,报警指示灯(红灯)亮。


单片机源程序如下:
  1. #include<reg51.h>
  2. #define uint unsigned int
  3. #define uchar unsigned char

  4. uchar code lednum[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x40};//数码管字0~9
  5. uint  temp;
  6. uchar g,s,b,q;          //个十百千位
  7. //uchar data disdata[5];
  8. uint  Tvalue;     //温度值
  9. uchar Tflag;      //温度正负标志
  10. char t=0;//温度 ,初始设定0                    

  11. sbit  p0=P0^0;//控制红色报警灯
  12. sbit P34=P3^4;
  13. sbit P35=P3^5;
  14. sbit P36=P3^6;
  15. sbit  DQ=P3^7;//ds18b20与单片机连接口
  16. sbit P17=P1^7;
  17. sbit P24=P2^4;

  18. /*****************延时函数********************/
  19. void delay(uint x)
  20. {  uchar k;
  21.    while(x--)
  22.    for(k=0;k<250;k++) ;
  23. }
  24. /*****************数码管扫描********************/                                          
  25. void ledscan(void)
  26. {   uchar k;
  27.     for(k=0;k<150;k++)
  28.         {                 //显示DS18B20  小数点一位,含负温度显示
  29.                   P1=lednum[g];P2=0x0e;delay(1);P1=0x00;
  30.         P1=lednum[s];P17=1;P2=0x0d;delay(1);P1=0x00;
  31.             P1=lednum[b];P2=0x0b;delay(1);P1=0x00;
  32.             P1=lednum[q];P2=0x07;delay(1);P1=0x00;
  33.          }
  34. }

  35. /******************************DS18B20程序(定义开始)***************************************/
  36. void delay_18B20(unsigned int i)//延时2微秒
  37. {
  38.         while(i--);
  39. }
  40. /*****************ds1820复位****************/
  41. void DS18B20_RST()         
  42. {  unsigned char x=0;
  43.          DQ = 1;           //DQ复位
  44.          delay_18B20(8);   //延时
  45.          DQ = 0;           //DQ拉低
  46.          delay_18B20(80); //精确延时大于480us
  47.          DQ = 1;           //拉高
  48.          delay_18B20(14);
  49.          x=DQ;
  50.          delay_18B20(20);         
  51.    }  
  52. /*****************读数据*******************/  
  53. uchar DS18B20_RD()        
  54.   {  unsigned char i=0;
  55.          unsigned char R_data= 0;
  56.          for (i=8;i>0;i--)
  57.          {    DQ = 0;      //给脉冲信号
  58.                   R_data>>=1;  //
  59.                   DQ = 1;      //给脉冲信号
  60.                   if(DQ)
  61.                   R_data|=0x80;
  62.                   delay_18B20(4);
  63.          }
  64.         return(R_data);
  65.   }
  66. /*******************写数据*******************/
  67.   void DS18B20_WR(uchar W_data)
  68.   {  
  69.      unsigned char i=0;
  70.      for (i=8; i>0; i--)
  71.     {  DQ = 0;
  72.        DQ = W_data&0x01;
  73.        delay_18B20(5);
  74.        DQ = 1;
  75.        W_data>>=1;                //
  76.     }
  77.          delay_18B20(4);
  78. }
  79. /****************读取温度值并转换***************/
  80. read_temp()
  81. {  uchar a,b;
  82.     DS18B20_RST();   
  83.     DS18B20_WR(0xcc);  //*跳过读序列号*/
  84.     DS18B20_WR(0x44);  //*启动温度转换*/
  85.     DS18B20_RST();   
  86.     DS18B20_WR(0xcc);  //*跳过读序列号*/
  87.     DS18B20_WR(0xbe);  //*读取温度*/
  88.     a=DS18B20_RD();
  89.     b=DS18B20_RD();
  90.     Tvalue=b;
  91.     Tvalue<<=8;                  //
  92.     Tvalue=Tvalue|a;
  93.     if(Tvalue<0x0fff)
  94.     Tflag=0;
  95.     else
  96.    {
  97.       Tvalue=~Tvalue+1;
  98.       Tflag=1;
  99.     }
  100.       Tvalue=Tvalue*(0.625);//温度值扩大10倍,精确到1位小数
  101.         return(Tvalue);
  102.   }
  103.   /****************温度值显示***************/
  104. void DS1820disp()
  105. {
  106.           b=Tvalue/100%10;//十位数
  107.           s=Tvalue/10%10;  //个位数
  108.           g=Tvalue%10;      //小数位
  109.               t=b|s;//t中是温度的整数部分
  110.      if(Tflag==0)
  111.              q=Tvalue/1000;    //正温度不显示符号,显示百位数
  112.      else
  113.          q=10;//负温度显示负号:-
  114.                   


  115.    }
  116. /******************************DS18B20程序(定义结束)***************************************/

  117. /*****************主函数********************/
  118. void main()
  119. {   
  120.         P0=0xff;               
  121. ……………………

  122. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
数字温度计.rar (67.52 KB, 下载次数: 36)


评分

参与人数 1黑币 +2 收起 理由
小菜鸡丶 + 2 很给力!

查看全部评分

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

使用道具 举报

沙发
ID:296242 发表于 2018-4-22 17:48 | 只看该作者
有电路图嘛?
回复

使用道具 举报

板凳
ID:64682 发表于 2018-4-25 21:08 | 只看该作者
不错不错,学习的好资料
回复

使用道具 举报

地板
ID:323854 发表于 2018-5-8 15:06 | 只看该作者
非常不错,赞
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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