首页 > 其他分享 >01 [51单片机 PROTEUS仿真设计]基于温度传感器的恒温控制系统

01 [51单片机 PROTEUS仿真设计]基于温度传感器的恒温控制系统

时间:2024-09-23 11:49:25浏览次数:11  
标签:温度传感器 ++ void 51 dat LCD 01 模块 温度

目 录

一、主要功能

二、硬件资源

三、程序编程

四、实现现象

一、主要功能

基于51单片机,具有晶振电路、复位电路、DS18B20温度传感器、LED灯和蜂鸣器灯光报警模块、LCD1602显示模块、L298N驱动电机散热模块和按键模块。

主要功能:

系统开始运行,显示屏显示最大温度阈值和最小温度阈值,并且通过DS18B20温度传感器读取当前温度值显示出来,和显示当前的状态。可以通过按键来增减温度上限阈值和温度下限阈值,如果当前温度在阈值之内,显示状态位正常;温度超过最大阈值,灯光报警模块启动,散热模块启动,驱动电机转动,实现降温功能;温度低于最小阈值,灯光报警模块启动,加热模块启动,告知人们正在加热升温。

主要实现要求:

1、温度采集

2、温度上下限调值

3、超值报警,具有加热和降温功能

4、LCD1602液晶显示温度、状态

二、硬件资源

1、51单片机最小系统

2、电机模块

3、按键模块

4、蜂鸣器和LED灯模块

5、LCD1602显示模块

6、DS18B20温度传感器模块

三、程序编程

/*****************************************************************************************************************************
                CSDN 夜间去看海制作
			    
*******************************************************************************************************************************/
#include <REGX52.H>
#include<intrins.h>
#include<stdio.h>
#include "Delay.h"
#include "LCD1602.h"
#define uchar unsigned char
#define uint unsigned  int

sbit led = P1^7;			  //LED灯引脚
sbit P22 = P2^5;			  //蜂鸣器引脚
sbit DS=P2^4;                 //DS18B20温度传感器
sbit Motor1_IN1 = P2^0;	      //电机IN口
sbit Motor1_IN2 = P2^1;
sbit Motor1_EN =  P2^3;       //电机使能端
sbit key1=P3^2;
sbit key2=P3^3;
sbit key3=P3^4;
sbit key4=P3^5;

unsigned char count;
typedef unsigned char u8;
typedef unsigned int  u16;
static flag=1,flag1=1;
static int n1=1;
static uint temp;
static float ftemp = 0.0f;//温度转变
uint temp;
static unsigned char num;
static int maxnumber=60,minnumber=30;
int i=0;
static int c,temp1;

void tmpchange();
uint tmp();
void beep_warning(uint);

void Time0_Init()          //定时器初始化
{
TMOD = 0x01;           //定时器0工作在方式1    
IE   = 0x82;
TH0  = 0xfe;
TL0  = 0x33;     //11.0592MZ晶振,0.5ms
TR0=1;                 //定时器开始
EA=1;
}



void Time0_Int() interrupt 1 //中断程序
{
   TH0  = 0xfe;             //重新赋值
   TL0  = 0x33;
    num++;
	if(num==200)
	{
	    tmpchange();        //让18b20开始转换温度
	    temp = tmp();       //读取温度
	    ftemp = temp/10.0f; //转换温度
		num=0;
	}
}



void dsreset(void)            //发出命令
{
  uint i;
  DS=0;		              
  i=103;				   //将总线拉低480us~960us

  while(i>0)i--;
  DS=1;					   //然后拉高总线,若DS18B20做出反应会将在15us~60us后将总线拉低
  i=4;					   //15us~60us等待
  while(i>0)i--;
  //while(DS);
}
bit tmpreadbit(void)          //读取数据
{
   uint i;
   bit dat;
   DS=0;i++;          //i++ for delay
   DS=1;i++;i++;
   dat=DS;
   i=8;while(i>0)i--;
   return (dat);
}
uchar tmpread(void)           //读取数据
{
  uchar i,j,dat;
  dat=0;
  for(i=1;i<=8;i++)
  {
    j=tmpreadbit();
    dat=(j<<7)|(dat>>1);   //读出的数据最低位在最前面,这样刚好一个字节在DAT里
  }
  return(dat);
}
void tmpwritebyte(uchar dat)  //传输数据给DS18B20
{
  uint i;
  uchar j;
  bit testb;
  for(j=1;j<=8;j++)
  {
    testb=dat&0x01;
    dat=dat>>1;
    if(testb)     //write 1
    {
      DS=0;
      i++;i++;
      DS=1;
      i=8;while(i>0)i--;
    }
    else
    {
      DS=0;       //write 0
      i=8;while(i>0)i--;
      DS=1;
      i++;i++;
    }
  }
}
void tmpchange(void)          //DS18B20开始工作
{
  dsreset();
  Delay(1);
  tmpwritebyte(0xcc);  
  tmpwritebyte(0x44);  
}					  
uint tmp()                    //获得温度
{
  float tt;
  uchar a,b;
  dsreset();
  Delay(1);
  tmpwritebyte(0xcc);
  tmpwritebyte(0xbe);
  a=tmpread();//低八位
  b=tmpread();//高八位
  temp=b;
  temp<<=8;             //two byte  compose a int variable
  temp=temp|a;
  tt=temp*0.0625; //算出来的是测到的温度,数值可到小数点后两位
  temp=tt*10+0.5; //为了显示温度后的小数点后一位并作出四舍五入,因为取值运算不能取小数点后的数
  return temp;
}

void beep_warning(uint ftemp) //温度传感器蜂鸣器警报并且电机转动
{
	if(ftemp>maxnumber)
	{
		P22=1;			 //蜂鸣器报警
		Motor1_IN1 = 1;	      //电机IN口
        Motor1_IN2 = 0;
        Motor1_EN =  1;		//打开
		LCD_ShowString(2,11,"zt:gw");
	}
	else if(ftemp<minnumber)
	{
	 P22=1;					//蜂鸣器报警
	 led=1;					//打开加热模块
	 Motor1_EN =  0;		//关掉
	 LCD_ShowString(2,11,"zt:dw");
	}
	else 
	{
	  Motor1_EN =  0;
	 P22=0;
	 led=0;
	 LCD_ShowString(2,11,"zt:zc");
	}
}


void main()					  //主函数
{	
    led=0;
	P22=0;			    //蜂鸣器关掉
	LCD_Init();         //显示屏初始化
	LCD_ShowString(1,1,"max:");//显示最高温度
	LCD_ShowString(1,9,"min:");//显示最低温度
	LCD_ShowString(2,1,"wendu:");
	LCD_ShowString(2,11,"zt:zc");
    Time0_Init();
	ET0=1;
	EA=1;
	while(1)
	{
	 if(key1==0)                 
	 {
	  Delay(150);
	  if(key1==0)
	  {
	   maxnumber++;
	  }
	 }
	 if(key2==0)
	  {
	  Delay(150);
	  if(key2==0)
	  {
	   maxnumber--;
	  }
	 }
	 	 if(key3==0)                  
	 {
	  Delay(150);
	  if(key3==0)
	  {
	   minnumber++;
	  }
	 }
	 if(key4==0)
	  {
	  Delay(150);
	  if(key4==0)
	  {
	  minnumber--;
	  }
	 }
	   	LCD_ShowNum(2,7,ftemp,2); //第一行显示温度
		LCD_ShowString(2,9,"C "); 
	   LCD_ShowNum(1,5,maxnumber,3);
	   LCD_ShowNum(1,13,minnumber,3);
	 beep_warning(ftemp); //温度超出报警,舵机转动	
	}
}

四、实现现象

编辑

此为开机状态,当前温度位47°,上限为60°,下限为30°;

编辑 调节温度到61°,此时散热模块启动,灯光报警;

其他效果看B站演示视频:

<iframe allowfullscreen="true" data-mediaembed="bilibili" frameborder="0" id="YSR5qUjD-1726746850626" src="https://player.bilibili.com/player.html?aid=356440952"></iframe>

基于51单片机的DS18B20恒温控制系统

源程序和仿真文件:

链接:https://pan.baidu.com/s/1Z7oXxJIf4ab9y6bYM50gDw
提取码:40m4
–来自百度网盘超级会员V4的分享

标签:温度传感器,++,void,51,dat,LCD,01,模块,温度
From: https://blog.csdn.net/zyjishuyuan/article/details/142369054

相关文章

  • 代码审计Day01——输入
    安全的本质安全问题的本质是信息问题,一切的安全方案设计的基础,都是建立在信任关系上的。是否信任普通用户的输入-->前台漏洞是否信任管理员用户的输入-->后台漏洞是否信任升级包、离线升级、在线升级、自动化升级-->供应链攻击不信任任何输入-->对输入进行检测(实际上就是把信......
  • 1014.最佳观光组合
    给你一个正整数数组values,其中values[i]表示第i个观光景点的评分,并且两个景点i和j之间的距离为j-i。一对景点(i<j)组成的观光组合的得分为values[i]+values[j]+i-j,也就是景点的评分之和减去它们两者之间的距离。返回一对观光景点能取得的最高分。示例......
  • [INS-35180] Unable to check for available memory
    Linux平台安装Oracle19c的时候遇到了下面错误“[INS-35180]Unabletocheckforavailablememory”,如图所示:具体的错误信息如下所示:Additional Information:Exception details  - PRVG-1901 : failed to setup CVU remote execution framework directory "/t......
  • day01
    JAXApublicclass文件位置{​//主入口publicstaticvoidmain(string[]args){}}字面量//整数System.out..printIn(666);//小数System.out..printIn(6.93);//字符串System.out..printIn(“哈喽”);//字符System.out..printIn(‘哈喽’);//布尔System......
  • SQLSTATE[HY000] [2013] Lost connection to MySQL server at 'reading initial commu
    错误信息 SQLSTATE[HY000][2013]LostconnectiontoMySQLserverat'readinginitialcommunicationpacket',systemerror:111 表示在尝试与MySQL服务器建立连接时出现了问题,具体来说是在读取初始通信包时失去了与MySQL服务器的连接,系统错误码为111,这通常表示连接被拒绝......
  • CF2013 F2
    CF2013F2首先你需要知道F1的做法。我将会给出一个\(O(n\sqrtn)\)的,求出整棵树任意节点答案的方法。对于路径上的点\(p_1\simp_m\),终点\(p_m\),起点\(p_1\),设\(p_i\)所经不在路径上的最远长度为\(d_i\)。那么根据F1的结论,我们是通过移动两个指针\(l,r\),不断判......
  • P1969 [NOIP2013 提高组] 积木大赛
    [NOIP2013提高组]积木大赛题目背景NOIP2013提高组D2T1题目描述春春幼儿园举办了一年一度的“积木大赛”。今年比赛的内容是搭建一座宽度为$n$的大厦,大厦可以看成由$n$块宽度为$1$的积木组成,第$i$块积木的最终高度需要是$h_i$。在搭建开始之前,没有任何积木(可以看......
  • P5019 [NOIP2018 提高组] 铺设道路
    [NOIP2018提高组]铺设道路题目背景NOIP2018提高组D1T1题目描述春春是一名道路工程师,负责铺设一条长度为$n$的道路。铺设道路的主要工作是填平下陷的地表。整段道路可以看作是$n$块首尾相连的区域,一开始,第$i$块区域下陷的深度为$d_i$。春春每天可以选择一段连续......
  • win2012自动清理文件
    环境windowsserver2012r2设置方法编写脚本,建文件,bat后缀@echooffset"SrcDir=G:\文件夹"REM指定目录路径set"DaysAgo=30"REM指定天数,这里设置为30天forfiles/p"%SrcDir%"/s/m*.*/d-%DaysAgo%/c"cmd/cdel/f/q@path"设置计划任务右键创建新任务依次填......
  • CF2013E prefix gcd
    给n个数,随意排序,所有前缀的gcd的和的最小值。只想到gcd变化是log次的,所以枚举每个作为开头,然后找让gcd变小的接上。可是这样是\(O(n^2)\).注意,最小的数要放最前面。假设\(x,a_1,a_2....\)和\(a_1,a_2,x...\).(x是最小的)我们有\(x+gcd(a_1,x)\leqa_1\),因为gcd的求法是\(a_......