设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 51单片机写的恒温箱程序 可控硅0，1控制灯泡亮灭
返回列表 发新帖
查看: 3316|回复: 2
打印 上一主题 下一主题
收起左侧

51单片机写的恒温箱程序 可控硅0，1控制灯泡亮灭

[复制链接]
跳转到指定楼层
楼主
ID:416820 发表于 2019-3-24 11:51 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
具有按键设置，声光报警，显示，自动调节等功能
使用DS18B20测试箱内温度，可控硅0，1控制灯泡亮灭，由此控制温度，具有LCD1602显示，按键设置上下限，声光报警功能。

单片机源程序如下:
  1. #include <reg52.h>
  2. #include "temp.h"
  3. #include "lcd.h"

  5. #define uchar unsigned char
  6. #define uint unsigned int
  7.         
  8. sbit key1=P3^1;//+
  9. sbit key2=P3^0;//-
  10. sbit silicon=P2^1;    //可控硅
  11. sbit BZ=P1^5;         //蜂鸣器
  12. sbit LED=P2^0;        //led标志位
  13.         
  14. uint temp,temps=26;//温度缓存变量,设定温度变量

  16. void delay(uint us)//延时函数
  17. {
  18.         for(;us>0;us--);
  19. }
  20. void keyson()                        //按键扫描程序
  21. {
  22.         if(!key1&&temps<60)
  23.         {
  24.                 delay(30);
  25.                 temps++;
  26.                 while(!key1);
  27.         }
  28.         if(!key2&&temps>0)
  29.         {
  30.                 delay(30);
  31.                 temps--;
  32.                 while(!key2);
  33.         }
  34. }
  35. void display()                //lcd1602显示界面
  36. {
  37.     LcdWriteCom(0x85);//当前温度
  38.                 LcdWriteData('C');
  39.                 LcdWriteData(':');
  40.                 LcdWriteData(temp/10+0x30);
  41.                 LcdWriteData(temp%10+0x30);
  42.                 LcdWriteData(0xdf);
  43.                 LcdWriteData('C');
  44.                 LcdWriteCom(0x80+0x45);//设置温度
  45.                 LcdWriteData('S');
  46.                 LcdWriteData(':');
  47.                 LcdWriteData(temps/10+0x30);
  48.                 LcdWriteData(temps%10+0x30);
  49.                 LcdWriteData(0xdf);
  50.                 LcdWriteData('C');
  51. }

  53. void beep()
  54. {
  55.         uchar k,g;
  56.         for (k=0;k<80;k++)
  57.         {
  58.                 BZ=~BZ;
  59.                 for(g=0;g<200;g++);
  60.         }
  61. }

  63. void main()
  64. {
  65.         uint i,j,flag=1,flag1;//标志位
  66.         LcdInit();                                                                                                                        //lcd1602初始化
  67.         for(i=0;i<60;i++)
  68.         temp=(float)Ds18b20ReadTemp()*0.0625;
  69.         while(1)
  70.         {
  71.                 temp=(float)Ds18b20ReadTemp()*0.0625;               
  72.                 display();                                                                                                                //lcd1602显示界面
  73.                 keyson();                                                                                                                        //按键扫描程序
  74.                 if(temp<temps)
  75.                 {
  76.                         silicon=0;                                                                         //低于设定温度，可控硅打开
  77.                         LED=0;
  78.                         flag=1;
  79.                 }
  80.                 if(temp>=temps)
  81.                 {
  82.                         silicon=1;
  83.                         if(flag==1)flag1=1,flag=0;
  84.                 }
  85.                 if(flag1==1)                                                                            //高于设定温度，可控硅关闭，声光报警
  86.                 {   
  87.                         LED=0;
  88. //                        BZ=0;
  89. //                        delay(40);
  90. //                        BZ=1;
  91.                         beep();
  92.                         delay(1);                                                           
  93.                         j++;
  94.                         if(j>35)flag1=0,j=0;
  95.                 }
  96.                 else        LED=1,BZ=1;                                       
  97.         }
  98. }
复制代码

Keil代码下载:
恒温箱-.zip (55.74 KB, 下载次数: 93)


评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

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

使用道具 举报

沙发
ID:775921 发表于 2020-6-11 10:30 | 只看该作者
优秀，不错
回复

使用道具 举报

板凳
ID:68878 发表于 2022-2-1 09:28 | 只看该作者
谢谢分享 正需要谢谢楼主！！
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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