资料编号:162
一:功能介绍
1、采用stm32单片机+LCD1602显示屏+DS18B20+继电器+加热模块+独立按键+蜂鸣器,制作一个基于stm32单片机智能婴儿恒温浴盆洗澡盆Proteus仿真;
2、通过ds18b20温度传感器采集浴盆的水温,显示到LCD1602显示屏上;
3、通过按键设置水温阈值,显示到LCD1602显示屏上;
4、当水温低于设置阈值,打开继电器驱动加热模块进行加热;
5、当水温大于38度(此值程序可调),蜂鸣器进行报警提醒,防止烫伤;
二:仿真演示视频+程序简要讲解(程序有中文注释,新手容易看懂)
162-基于stm32单片机智能婴儿恒温浴盆洗澡盆Proteus仿真+源程序
三:设计软件介绍
本设计使用C语言编程设计,程序代码采用keil5编写,程序有中文注释,新手容易看懂,仿真采用Proteus软件进行仿真,演示视频使用的是Proteus8.9版本;资料包里有相关软件包,可自行下载安装。
四:程序打开方法
特别注意:下载资料包以后一定要先解压! !!(建议解压到桌面上,文件路径太深会导致程序打开异常),解压后再用keil5打开。
程序部分展示,有中文注释,新手容易看懂
int main(void)
{
int t;
short tem,tem1;
GPIO_Configuration();//初始化
Init1602();
IO_out();
delay_init();
RCC_APB2PeriphClockCmd(RCC_APB2Periph_GPIOA, ENABLE);
GPIO_InitTypeDef g;
g.GPIO_Mode = GPIO_Mode_Out_PP;
g.GPIO_Speed = GPIO_Speed_10MHz;
g.GPIO_Pin = GPIO_Pin_8 ;
GPIO_Init(GPIOA,&g);
GPIO_SetBits(GPIOA,GPIO_Pin_8); //输出1
t=DS18B20_DQ_IN;
while(t){
DS18B20_IO_OUT(); //SET PG11 OUTPUT
DS18B20_DQ_OUT=0; //拉低DQ
Delay_DS18B20(750); //拉低750us
DS18B20_DQ_OUT=1; //DQ=1
Delay_DS18B20(15); //15US
DS18B20_IO_IN(); //SET PG11 INPUT
Delay_DS18B20(100);
t=DS18B20_DQ_IN;
}
tem=DS18B20_Get_Temp();//读取温度
Delay_DS18B20(1000000);
while(1)
{
tem=DS18B20_Get_Temp();//读取温度
if( tem>0)
{
WrByte1602(0,8,'+');
WrByte1602(0,9,AsciiCode[tem%1000/100]);//显示+温度
WrByte1602(0,10,AsciiCode[tem%100/10]);
WrByte1602(0,12,AsciiCode[tem%10]);
}
else
{
tem1=-(tem);
tem1=tem1+1;
WrByte1602(0,8,'-');
WrByte1602(0,9,AsciiCode[tem1%1000/100]);//显示-温度
WrByte1602(0,10,AsciiCode[tem1%100/10]);
WrByte1602(0,12,AsciiCode[tem1%10]);
}
anjiansaomiao();//扫描按键
WrByte1602(1,10,AsciiCode[wenduset%1000/100]); //显示设置温度
WrByte1602(1,11,AsciiCode[wenduset%100/10]);
WrByte1602(1,12,AsciiCode[wenduset%10]);
if(tem<wenduset*10) PCout(9)=1;//温度小于设置值 开启加热
else PCout(9)=0;
if(tem>380) PCout(10)=0;//温度大于38 蜂鸣器报警提醒
else PCout(10)=1;
WrByte1602(0,1,' '); //字符显示
WrByte1602(0,2,'T');
WrByte1602(0,3,'E');
WrByte1602(0,4,'M');
WrByte1602(0,5,'P');
WrByte1602(0,6,'=');
WrByte1602(1,1,' '); //字符显示
WrByte1602(1,2,' ');
WrByte1602(1,3,'S');
WrByte1602(1,4,'E');
WrByte1602(1,5,'T');
WrByte1602(1,6,'=');
WrByte1602(0,11,'.');
WrByte1602(0,14,'C');
WrByte1602(1,14,'C');
五:仿真文件(采用Proteus打开)
六:资料清单展示(文件中包含的相关资料)