找回密码
 立即注册

QQ登录

只需一步,快速开始

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

18B20测温LCD1602显示Proteus仿真+单片机代码

[复制链接]
跳转到指定楼层
楼主


单片机源程序如下:
  1. #include <REG52.H>
  2. #include "DS18B20.H"
  3. #include "LCD1602.H"

  4. #define uchar unsigned char
  5. #define uint  unsigned int   

  6. sbit keyu=P3^4; //加按键
  7. sbit keyl=P3^5; //减按键
  8. sbit keyh=P3^6; //调节尺度
  9. sbit keym=P3^7; //转换模式

  10. sbit buzz=P2^1;//蜂鸣器接口

  11. void button() //报警蜂鸣器
  12. {
  13.   uchar k=2;
  14.   while(k--)
  15.   {
  16.    buzz=0;delay_50us(200);
  17.    buzz=1;delay_50us(200);
  18.   }
  19. }

  20. void key()                //按键加减标尺
  21. { //尺度
  22.    if(keym==0)//判定
  23.    {
  24.      delay_50us(100);//延时
  25.      if(keym==0)
  26.      {       
  27.        y++;//转换加减的数值
  28.            if(y>=3)y=0;
  29.            switch (y)
  30.            {
  31.            case 0:m=1;break;
  32.            case 1:m=5 ;break;
  33.            case 2:m=10 ;break;
  34.            }
  35.            while(keym==0);//自锁
  36.      }
  37.    }
  38. ///换
  39.    if(keyh==0)//上下限转换按键
  40.    {
  41.      delay_50us(100);
  42.      if(keyh==0)
  43.      {
  44.        o++;
  45.               if(o>=3)o=0;//1为上限选中,2为下限选中,0为隐藏
  46.              while(keyh==0);
  47.      }
  48.    }
  49. /////上限          
  50.    if(keyu==0&o==1)//上限加按键
  51.    {
  52.      delay_50us(100);
  53.      if(keyu==0&o==1)
  54.      {
  55.         u=u+m; while(keyu==0);
  56.      }
  57.    }
  58.    if(keyl==0&o==1) //上限减按键

  59.    {
  60.       delay_50us(100);
  61.       if(keyl==0&o==1)
  62.       {
  63.         u=u-m; while(keyl==0);
  64.       }
  65.    }
  66. //// 下限
  67.    if(keyu==0&o==2)//下限加按键
  68.    {
  69.       delay_50us(100);
  70.       if(keyu==0&o==2)
  71.       {
  72.          l=l+m;while(keyu==0);
  73.       }
  74.    }
  75.    if(keyl==0&o==2)//下限减按键
  76.    {
  77.       delay_50us(100);
  78.       if(keyl==0&o==2)
  79.       {
  80.         l=l-m;while(keyl==0);
  81.       }
  82.    }
  83. }

  84. void  BJ()//温度报警子程序
  85. {
  86.           if(f==1)         //温度大于0的温度比较
  87.          {
  88.                 
  89.                 if(sdata>=u) //温度大于上限,报警
  90.                 {
  91.                  display(sdata);        button();
  92.                 }
  93.                 else if(l>0&sdata<=l)        //温度小于下限,报警
  94.                 {
  95.                  display(sdata);        button();
  96.                 }
  97.                 else          display(sdata);
  98.          }
  99.          else if(f==0)        //温度小于0的温度比较
  100.          {
  101.                     if(l>=0)
  102.                 {
  103.                   display(sdata);        button();
  104.                 }
  105.                 else if(l<0)       
  106.                 {
  107.                     if(sdata>=-l)  //温度于下限,报警
  108.                                 {
  109.                                  display(sdata);        button();
  110.                                 }
  111.                                 else if(sdata<-l)  //温度大于下限不报警
  112.                                 {
  113.                                  display(sdata);
  114.                                 }
  115.                 }
  116.                 else display(sdata);                         
  117.          }
  118. }

  119. void main()
  120. {
  121.   buzz=1;
  122.   display0(); //欢迎,
  123.   display1(); //框架
  124.   while(1)
  125.   {
  126.    display2(); //上下限,尺度
  127.    ReadTemperature();        //测温程序
  128.    fuhao();//负号显示程序
  129.    key();        //按键
  130.    BJ();        //报警程序
  131.   }

  132. }
复制代码

所有资料51hei提供下载:
18B20测温LCD显示.rar (44.26 KB, 下载次数: 75)


评分

参与人数 1黑币 +50 收起 理由
51hei跑堂 + 50 共享资料的黑币奖励!

查看全部评分

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

使用道具 举报

沙发
ID:66287 发表于 2019-5-14 09:45 | 只看该作者

回复

使用道具 举报

板凳
ID:521983 发表于 2019-5-23 10:49 | 只看该作者
不知上下限值是多少?
回复

使用道具 举报

地板
ID:66287 发表于 2019-5-28 08:02 | 只看该作者
上下限值可以键盘手工改变
回复

使用道具 举报

5#
ID:821815 发表于 2021-1-28 11:39 | 只看该作者
如果想控制两路输出,怎么修改
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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