欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

標題: 基于STM32F103的盆景生態監測（土壤多要素傳感器+二氧化碳傳感器+光強BH1780+DS18B20) [打印本頁]
作者: 滾去學習    時間: 2021-10-13 20:42
標題: 基于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"



  13. int main(void)
  14. {
  15.         u8 i;         
  16.         u8 t=0,key;
  17.         //u16 temp;//二氧化碳
  18.         u8 tempera;
  19.         short temperature;         
  20.         u8 humidity;                     
  21.   u16 Light=0;//光強
  22.         u8 USART3_buf[12];
  23.         u8 rs485buf[30];
  24.         u8 arr[8]={0X01,0X03,0X00,0X00,0X00,0X08,0X44,0X0C}; //土壤傳感器問詢幀
  25.         u8 avr[8]={0X01,0X03,0X00,0X05,0X00,0X01,0X94,0X0B}; //二氧化碳問詢幀
  26.         delay_init();                     //延時函數初始化          
  27.         NVIC_PriorityGroupConfig(NVIC_PriorityGroup_2);//設置中斷優先級分組為組2：2位搶占優先級，2位響應優先級
  28.         Usart1_Init(115200);                 //串口初始化為 115200
  29. //        Usart3_Init(4800);                 //串口初始化為 4800
  30.         RS485_Init(4800);        //初始化RS485
  31.         USART3_Init(4800);        //初始化串口3
  32.         LED_Init();                                  //初始化與LED連接的硬件接口
  33.   bh1750_Init();
  34.         DS18B20_Init();
  35.         DHT11_Init();
  36.         DHT11_Read_Data(&tempera,&humidity);        //讀取溫濕度值       
  37.          //UsartPrintf(USART_DEBUG,"\r\n 溫度:%d,濕度:%d,光照：%d",temp,humi,Light);
  38.          UsartPrintf(USART_DEBUG,"\n\r\n      歡迎使用盆景生態監測系統");
  39.          UsartPrintf(USART_DEBUG,"\r\n 本系統使用的傳感器所能監測的環境因素有");
  40.          UsartPrintf(USART_DEBUG,"\r\n 溫度 空氣溫濕度 光強 氮磷鉀 二氧化碳");

  42.         while(1)
  43.         {                        
  44. if(t%10==0)                        //每100ms讀取一次
  45.                 {       
  46.                 UsartPrintf(USART_DEBUG,"\r\n");  //換行       
  47.                        
  48.       /*----------------------*///溫度采集                       
  49.                 temperature=DS18B20_Get_Temp();
  50.                 if(temperature==0)UsartPrintf(USART_DEBUG,"\r\n DS18B20 Error!");             //DS18B20報錯       
  51.     else{                       
  52.                         if(temperature<0){
  53.                                  UsartPrintf(USART_DEBUG,"-");    //負溫度
  54.                                 temperature=-temperature;                                        //轉為正數
  55.                         }else
  56.       UsartPrintf(USART_DEBUG,"\r\n DS18B20:溫度:%d.%d%s",temperature/10,temperature%10,"℃");  //顯示溫度
  57.                 }
  58.        
  59.                 /*-----------------------------------*///空氣溫濕度采集
  60.                 DHT11_Read_Data(&tempera,&humidity);        //讀取溫濕度值       
  61.                 if(humidity>100||tempera>100||(humidity+tempera==0))UsartPrintf(USART_DEBUG,"\r\n DHT11 Error!");              //DHT11報錯
  62.     else {UsartPrintf(USART_DEBUG,"\r\n DHT11  :空氣溫度:%d%s",tempera,"℃");  //顯示空氣溫濕度       
  63.                         UsartPrintf(USART_DEBUG,"\r\n        :空氣濕度:%d%c",humidity,'%');  //顯示空氣溫濕度
  64.                         humidity=0;
  65.                         tempera=0;
  66.                 }                       
  67.       
  68.                
  69.                 /*------------------------*///光照強度采集
  70.                  bh1750_ReadOneTime();
  71.                  bh1750_ReadContinuous1();
  72.                  Light=getValue();
  73.                  if(Light>1000)UsartPrintf(USART_DEBUG,"\r\n BH1750 Error!");       //BH1750報錯
  74.                 else UsartPrintf(USART_DEBUG,"\r\n BH1750: 光照強度:%d",Light);              //顯示光照強度       

  76. //                /*----------------------------------------------*///二氧化碳
  77.                  USART3_Send_Data(avr,8);//發送問詢幀
  78.                 for(i=0;i<10;i++){
  79.                 USART3_Receive_Data(USART3_buf,&key);//獲取返回值及返回有效字節數
  80.                 if(key==7){
  81.                         UsartPrintf(USART_DEBUG,"\r\n 二氧化碳含量:%d ppm",USART3_buf[3]*256+USART3_buf[4]);
  82.                         for(i=0;i<12;i++)USART3_buf[i]=0;
  83.                 }
  84.         }
  85.                 if(i==10)UsartPrintf(USART_DEBUG,"\r\n 二氧化碳監測 Error!:");
  86.                
  87.                        
  88.                 /*-------------------------------------------*///土壤多要素傳感器
  89.       RS485_Send_Data(arr,8);//發送問詢幀

  91.                   for(i=0;i<20;i++){
  92.                   RS485_Receive_Data(rs485buf,&key);//獲取返回值及返回有效字節數
  93.                   if(key==21)    //表示接收到有數據
  94.                  {
  95.                         if(rs485buf[3]<4){  //判斷數據合理性
  96.                         UsartPrintf(USART_DEBUG,"\r\n 土壤多要素傳感器");  
  97.                         UsartPrintf(USART_DEBUG,"\r\n         水分:  %d.%d%c",(rs485buf[3]*256+rs485buf[4])/10,(rs485buf[3]*256+rs485buf[4])%10,'%');    //顯示土壤濕度       
  98.                         UsartPrintf(USART_DEBUG,"\r\n         溫度:  %d.%d%s",(rs485buf[5]*256+rs485buf[6])/10,(rs485buf[5]*256+rs485buf[6])%10,"℃");   //顯示土壤溫度
  99.                         UsartPrintf(USART_DEBUG,"\r\n         電導率:%d.%d%s",(rs485buf[7]*256+rs485buf[8])/10,(rs485buf[7]*256+rs485buf[8])%10,"us/cm");//顯示土壤電導率
  100.                         UsartPrintf(USART_DEBUG,"\r\n         PH值:  %d.%d",(rs485buf[9]*256+rs485buf[10])/10,(rs485buf[9]*256+rs485buf[10])%10);        //顯示土壤濕度
  101.                         UsartPrintf(USART_DEBUG,"\r\n         氮含量:%d.%d%c",(rs485buf[11]*256+rs485buf[12])/100,(rs485buf[11]*256+rs485buf[12])%100,'%');    //顯示土壤濕度
  102.                         UsartPrintf(USART_DEBUG,"\r\n         磷含量:%d.%d%c",(rs485buf[13]*256+rs485buf[14])/100,(rs485buf[13]*256+rs485buf[14])%100,'%');    //顯示土壤濕度
  103.                         UsartPrintf(USART_DEBUG,"\r\n         鉀含量:%d.%d%c",(rs485buf[15]*256+rs485buf[16])/100,(rs485buf[15]*256+rs485buf[16])%100,'%');    //顯示土壤濕度
  104.                         UsartPrintf(USART_DEBUG,"\r\n         鹽度:  %d.%d%c",(rs485buf[17]*256+rs485buf[18])/100,(rs485buf[17]*256+rs485buf[18])%100,'%');    //顯示土壤濕度
  105.       //i=21;                                 
  106.                          }        //else temp++; //UsartPrintf(USART_DEBUG,"\r\n 土壤多要素傳感器 Error!");  //累計獲取到錯誤數據       
  107.                 for(i=0;i<30;i++)rs485buf[i]=0;        
  108.          } //else temp++; //UsartPrintf(USART_DEBUG,"\r\n 土壤多要素傳感器 Error!");       //累計沒有獲取數據               
  109.                
  110. }
  111.     if(i==20)UsartPrintf(USART_DEBUG,"\r\n 土壤多要素傳感器 Error!");           //十次算作獲取失敗                       
  112.                
  113.                
  114.                 }
  115.                


  118.                  delay_ms(10);
  119.                 t++;
  120.                 if(t==11)
  121.                 {
  122.                         t=0;
  123.                         LED1=!LED1;
  124.                        
  125.                 }
  126.         }
  127. }
  128.        
復制代碼

所有代碼51hei附件下載:
盆景生態環境監測改良版.7z (260.84 KB, 下載次數: 209)

作者: 吖吖吖吖吖    時間: 2021-10-14 18:53
土壤多要素傳感器用的是哪款？
作者: 滾去學習    時間: 2021-10-14 23:25
吖吖吖吖吖 發表于 2021-10-14 18:53
土壤多要素傳感器用的是哪款？

如圖所示，可以在某一個寶收到。
作者: dcxdcx    時間: 2021-10-18 16:12
能不能看看您485芯片的讀取板，我想參考一下，剛開始學485這一部分，希望您能指導一下
作者: 滾去學習    時間: 2021-11-12 17:41
dcxdcx 發表于 2021-10-18 16:12
能不能看看您485芯片的讀取板，我想參考一下，剛開始學485這一部分，希望您能指導一下

我DIY的板子不嚴謹，你可以在網上收索RS485的工作電路，我參考的是正點原子原理圖。
作者: jiangwenzhen    時間: 2022-5-23 01:29
大佬，我參照你的代碼寫了，采集不到數據，怎么調試啊?
作者: mick32    時間: 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報
作者: jiangwenzhen    時間: 2022-5-25 01:22
大佬，為什么我用rs485轉ttl，使用土壤氮磷鉀傳感器采集不到數據啊
作者: wabce    時間: 2024-3-23 16:46
485是直接轉串口了是嘛



歡迎光臨 (http://m.raoushi.com/bbs/) Powered by Discuz! X3.1