150-基于stm32单片机多功能智能鱼缸水位氧气PH值温湿度环境监测系统Proteus仿真+源程序

原创已于 2024-07-24 14:45:47 修改 · 566 阅读

12 ·

CC 4.0 BY-SA版权

文章标签：

#单片机 #stm32 #proteus #嵌入式硬件

于 2024-07-23 21:48:23 首次发布

资料编号：150

一：功能介绍

1、采用stm32单片机+LCD1602显示屏+DHT11温湿度+蜂鸣器+电机+电位器，制作一个基于stm32单片机多功能智能鱼缸水位氧气PH值温湿度环境监测Proteus仿真；

2、通过DHT11温湿度传感器，读取当前的温度和湿度，数值显示到LCD1602显示屏上；

3、通过电位器模拟PH传感器采集鱼缸水的酸碱度，显示到LCD1602显示屏上；

4、通过电位器模拟水位传感器采集当前鱼缸的水位高度，显示到LCD1602显示屏上；

5、通过电位器模拟氧气传感器采集当前鱼缸水的氧气含量，显示到LCD1602显示屏上；

6、当氧气浓度低于30（此值程序可以进行修改）的时候，蜂鸣器进行报警提醒，自动开启电机进行换氧；

二：仿真演示视频+程序简要讲解（程序有中文注释，新手容易看懂）

150-基于stm32单片机多功能智能鱼缸水位氧气PH值温湿度环境监测系统Proteus仿真+源程序

三：设计软件介绍

本设计使用C语言编程设计，程序代码采用keil5编写，程序有中文注释，新手容易看懂，仿真采用Proteus软件进行仿真，演示视频使用的是Proteus8.9版本;资料包里有相关软件包，可自行下载安装。

四：程序打开方法

特别注意:下载资料包以后一定要先解压! !!(建议解压到桌面上，文件路径太深会导致程序打开异常)，解压后再用keil5打开。

程序部分展示，有中文注释，新手容易看懂
int main(void)
{
  int ADC_num1,ADC_num2,ADC_num3;
  int temp1,temp2,ph;
  GPIO_Configuration();//初始化
  ADC1_GPIO_Config();
  ADC_Config();     
  Init1602(); 
  IO_out();
  WrByte1602(0,0,'S'); //字符显示
  WrByte1602(0,1,'W');
  WrByte1602(0,2,' '); 
  WrByte1602(0,3,'O'); 
  WrByte1602(0,4,'3'); 
  
  WrByte1602(0,5,' '); 
  WrByte1602(0,6,'P'); 
  WrByte1602(0,7,'H'); 
  WrByte1602(0,8,' '); 
 
  WrByte1602(0,9,'W'); 
  WrByte1602(0,10,'D'); 
  WrByte1602(0,11,' '); 


  WrByte1602(0,12,'S'); 
  WrByte1602(0,13,'D'); 
  
  delay_ms(500);
  while(1)
  {


             //读取温湿度
         DHT11_receive(&shidu,&wendu);
    
    ADC_num1=Get_ADC(ADC_Channel_0);//读取水位
    temp1=ADC_num1*100/4096;
    
    ADC_num2=Get_ADC(ADC_Channel_1);//读取氧气浓度
    temp2=ADC_num2*100/4096;
    
    ADC_num3=Get_ADC(ADC_Channel_2);//读取ph 
    ph=ADC_num3*100/4096/7.07;
      


  WrByte1602(1,0,AsciiCode[temp1%100/10]);//显示水位
  WrByte1602(1,1,AsciiCode[temp1%10]);


  
//显示氧气浓度
  WrByte1602(1,3,AsciiCode[temp2%100/10]);
  WrByte1602(1,4,AsciiCode[temp2%10]);
    
//显示PH
  WrByte1602(1,6,AsciiCode[ph%100/10]);
  WrByte1602(1,7,AsciiCode[ph%10]);    
  
//显示温度
  WrByte1602(1,9,AsciiCode[wendu%100/10]);
  WrByte1602(1,10,AsciiCode[wendu%10]);


  
//显示湿度
  WrByte1602(1,12,AsciiCode[shidu%100/10]);
  WrByte1602(1,13,AsciiCode[shidu%10]);
  
  
  if(temp2<30)  PCout(9)=0;//氧气浓度低于30  蜂鸣器报警开始换氧
  else  PCout(9)=1;


  }
}

五：仿真文件（采用Proteus打开）

六：资料清单展示（文件中包含的相关资料）

百度云盘资料下载链接