找回密码
 立即注册

QQ登录

只需一步,快速开始

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

基于STM32F103的盆景生态监测(土壤多要素传感器+二氧化碳传感器+光强BH1780+DS18B20)

  [复制链接]
跳转到指定楼层
楼主
适合于盆景呵护或者大棚管理
制作出来的实物图如下:


引脚硬件连接

LED指示灯

LED1--->PC13

BH1750  光照
SDA----->PB5
SCL----->PB6

DS18B20  温度
DATA---->PA12

DHT11  温湿度
DATA---->PA11

土壤多要素传感器
EN------->PA1
RXD------>PA2
TXD------>PA3

二氧化碳传感器
RXD------>PB10
TXD------>PB11

CH340下载器
RXD------>PA9
TXD------>PB10

单片机源程序如下:
  1. #include "led.h"
  2. #include "delay.h"
  3. #include "CO2.h"
  4. #include "sys.h"
  5. #include "usart.h"         
  6. #include "ds18b20.h"
  7. #include "DTH117.h"       
  8. #include "bh1750.h"
  9. #include "rs485.h"



  10. int main(void)
  11. {
  12.         u8 i;         
  13.         u8 t=0,key;
  14.         //u16 temp;//二氧化碳
  15.         u8 tempera;
  16.         short temperature;         
  17.         u8 humidity;                     
  18.   u16 Light=0;//光强
  19.         u8 USART3_buf[12];
  20.         u8 rs485buf[30];
  21.         u8 arr[8]={0X01,0X03,0X00,0X00,0X00,0X08,0X44,0X0C}; //土壤传感器问询帧
  22.         u8 avr[8]={0X01,0X03,0X00,0X05,0X00,0X01,0X94,0X0B}; //二氧化碳问询帧
  23.         delay_init();                     //延时函数初始化          
  24.         NVIC_PriorityGroupConfig(NVIC_PriorityGroup_2);//设置中断优先级分组为组2:2位抢占优先级,2位响应优先级
  25.         Usart1_Init(115200);                 //串口初始化为 115200
  26. //        Usart3_Init(4800);                 //串口初始化为 4800
  27.         RS485_Init(4800);        //初始化RS485
  28.         USART3_Init(4800);        //初始化串口3
  29.         LED_Init();                                  //初始化与LED连接的硬件接口
  30.   bh1750_Init();
  31.         DS18B20_Init();
  32.         DHT11_Init();
  33.         DHT11_Read_Data(&tempera,&humidity);        //读取温湿度值       
  34.          //UsartPrintf(USART_DEBUG,"\r\n 温度:%d,湿度:%d,光照:%d",temp,humi,Light);
  35.          UsartPrintf(USART_DEBUG,"\n\r\n      欢迎使用盆景生态监测系统");
  36.          UsartPrintf(USART_DEBUG,"\r\n 本系统使用的传感器所能监测的环境因素有");
  37.          UsartPrintf(USART_DEBUG,"\r\n 温度 空气温湿度 光强 氮磷钾 二氧化碳");

  38.         while(1)
  39.         {                        
  40. if(t%10==0)                        //每100ms读取一次
  41.                 {       
  42.                 UsartPrintf(USART_DEBUG,"\r\n");  //换行       
  43.                        
  44.       /*----------------------*///温度采集                       
  45.                 temperature=DS18B20_Get_Temp();
  46.                 if(temperature==0)UsartPrintf(USART_DEBUG,"\r\n DS18B20 Error!");             //DS18B20报错       
  47.     else{                       
  48.                         if(temperature<0){
  49.                                  UsartPrintf(USART_DEBUG,"-");    //负温度
  50.                                 temperature=-temperature;                                        //转为正数
  51.                         }else
  52.       UsartPrintf(USART_DEBUG,"\r\n DS18B20:温度:%d.%d%s",temperature/10,temperature%10,"℃");  //显示温度
  53.                 }
  54.        
  55.                 /*-----------------------------------*///空气温湿度采集
  56.                 DHT11_Read_Data(&tempera,&humidity);        //读取温湿度值       
  57.                 if(humidity>100||tempera>100||(humidity+tempera==0))UsartPrintf(USART_DEBUG,"\r\n DHT11 Error!");              //DHT11报错
  58.     else {UsartPrintf(USART_DEBUG,"\r\n DHT11  :空气温度:%d%s",tempera,"℃");  //显示空气温湿度       
  59.                         UsartPrintf(USART_DEBUG,"\r\n        :空气湿度:%d%c",humidity,'%');  //显示空气温湿度
  60.                         humidity=0;
  61.                         tempera=0;
  62.                 }                       
  63.       
  64.                
  65.                 /*------------------------*///光照强度采集
  66.                  bh1750_ReadOneTime();
  67.                  bh1750_ReadContinuous1();
  68.                  Light=getValue();
  69.                  if(Light>1000)UsartPrintf(USART_DEBUG,"\r\n BH1750 Error!");       //BH1750报错
  70.                 else UsartPrintf(USART_DEBUG,"\r\n BH1750: 光照强度:%d",Light);              //显示光照强度       

  71. //                /*----------------------------------------------*///二氧化碳
  72.                  USART3_Send_Data(avr,8);//发送问询帧
  73.                 for(i=0;i<10;i++){
  74.                 USART3_Receive_Data(USART3_buf,&key);//获取返回值及返回有效字节数
  75.                 if(key==7){
  76.                         UsartPrintf(USART_DEBUG,"\r\n 二氧化碳含量:%d ppm",USART3_buf[3]*256+USART3_buf[4]);
  77.                         for(i=0;i<12;i++)USART3_buf[i]=0;
  78.                 }
  79.         }
  80.                 if(i==10)UsartPrintf(USART_DEBUG,"\r\n 二氧化碳监测 Error!:");
  81.                
  82.                        
  83.                 /*-------------------------------------------*///土壤多要素传感器
  84.       RS485_Send_Data(arr,8);//发送问询帧

  85.                   for(i=0;i<20;i++){
  86.                   RS485_Receive_Data(rs485buf,&key);//获取返回值及返回有效字节数
  87.                   if(key==21)    //表示接收到有数据
  88.                  {
  89.                         if(rs485buf[3]<4){  //判断数据合理性
  90.                         UsartPrintf(USART_DEBUG,"\r\n 土壤多要素传感器");  
  91.                         UsartPrintf(USART_DEBUG,"\r\n         水分:  %d.%d%c",(rs485buf[3]*256+rs485buf[4])/10,(rs485buf[3]*256+rs485buf[4])%10,'%');    //显示土壤湿度       
  92.                         UsartPrintf(USART_DEBUG,"\r\n         温度:  %d.%d%s",(rs485buf[5]*256+rs485buf[6])/10,(rs485buf[5]*256+rs485buf[6])%10,"℃");   //显示土壤温度
  93.                         UsartPrintf(USART_DEBUG,"\r\n         电导率:%d.%d%s",(rs485buf[7]*256+rs485buf[8])/10,(rs485buf[7]*256+rs485buf[8])%10,"us/cm");//显示土壤电导率
  94.                         UsartPrintf(USART_DEBUG,"\r\n         PH值:  %d.%d",(rs485buf[9]*256+rs485buf[10])/10,(rs485buf[9]*256+rs485buf[10])%10);        //显示土壤湿度
  95.                         UsartPrintf(USART_DEBUG,"\r\n         氮含量:%d.%d%c",(rs485buf[11]*256+rs485buf[12])/100,(rs485buf[11]*256+rs485buf[12])%100,'%');    //显示土壤湿度
  96.                         UsartPrintf(USART_DEBUG,"\r\n         磷含量:%d.%d%c",(rs485buf[13]*256+rs485buf[14])/100,(rs485buf[13]*256+rs485buf[14])%100,'%');    //显示土壤湿度
  97.                         UsartPrintf(USART_DEBUG,"\r\n         钾含量:%d.%d%c",(rs485buf[15]*256+rs485buf[16])/100,(rs485buf[15]*256+rs485buf[16])%100,'%');    //显示土壤湿度
  98.                         UsartPrintf(USART_DEBUG,"\r\n         盐度:  %d.%d%c",(rs485buf[17]*256+rs485buf[18])/100,(rs485buf[17]*256+rs485buf[18])%100,'%');    //显示土壤湿度
  99.       //i=21;                                 
  100.                          }        //else temp++; //UsartPrintf(USART_DEBUG,"\r\n 土壤多要素传感器 Error!");  //累计获取到错误数据       
  101.                 for(i=0;i<30;i++)rs485buf[i]=0;        
  102.          } //else temp++; //UsartPrintf(USART_DEBUG,"\r\n 土壤多要素传感器 Error!");       //累计没有获取数据               
  103.                
  104. }
  105.     if(i==20)UsartPrintf(USART_DEBUG,"\r\n 土壤多要素传感器 Error!");           //十次算作获取失败                       
  106.                
  107.                
  108.                 }
  109.                


  110.                  delay_ms(10);
  111.                 t++;
  112.                 if(t==11)
  113.                 {
  114.                         t=0;
  115.                         LED1=!LED1;
  116.                        
  117.                 }
  118.         }
  119. }
  120.        
复制代码

所有代码51hei附件下载:
盆景生态环境监测改良版.7z (260.84 KB, 下载次数: 209)

评分

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

查看全部评分

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

使用道具 举报

沙发
ID:824746 发表于 2021-10-14 18:53 | 只看该作者
土壤多要素传感器用的是哪款?
回复

使用道具 举报

板凳
ID:873089 发表于 2021-10-14 23:25 | 只看该作者
吖吖吖吖吖 发表于 2021-10-14 18:53
土壤多要素传感器用的是哪款?

如图所示,可以在某一个宝收到。
回复

使用道具 举报

地板
ID:693766 发表于 2021-10-18 16:12 | 只看该作者
能不能看看您485芯片的读取板,我想参考一下,刚开始学485这一部分,希望您能指导一下
回复

使用道具 举报

5#
ID:873089 发表于 2021-11-12 17:41 | 只看该作者
dcxdcx 发表于 2021-10-18 16:12
能不能看看您485芯片的读取板,我想参考一下,刚开始学485这一部分,希望您能指导一下

我DIY的板子不严谨,你可以在网上收索RS485的工作电路,我参考的是正点原子原理图。
回复

使用道具 举报

6#
ID:1028806 发表于 2022-5-23 01:29 | 只看该作者
大佬,我参照你的代码写了,采集不到数据,怎么调试啊?
回复

使用道具 举报

7#
ID:228452 发表于 2022-5-23 22:04 | 只看该作者
Hello
If you really have  temperature 0
is this line of code OK ?
if(temperature==0)UsartPrintf(USART_DEBUG,"\r\n DS18B20 Error!");             //DS18B20报
回复

使用道具 举报

8#
ID:1028806 发表于 2022-5-25 01:22 | 只看该作者
大佬,为什么我用rs485转ttl,使用土壤氮磷钾传感器采集不到数据啊
回复

使用道具 举报

9#
ID:1113876 发表于 2024-3-23 16:46 | 只看该作者
485是直接转串口了是嘛
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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