51單片機,檢測大棚土壤溫濕度、CO2濃度和光照強度。用到sht10、GY-30和SGP-30,用1602顯示,三個程序湊的,加蜂鳴器報警,三個LED隨光照強度改變點亮個數(shù)。小白勿噴
單片機源程序如下:
- /***********************************************************************
- * 文 件 名: 溫濕度測量儀
- * 使用芯片: STC89C52RC
- * 使用晶振: 12MHz
- * 編程方式: 框架式編程
- * 硬件連接: P0口連接到LCD1602的數(shù)據(jù)口,P2^0接到LCD數(shù)據(jù)/命令選擇端RS,P2^1接到LCD讀/寫控制信號端RW,P2^2接到LCD1602使能端EN
- * 描述功能: LCD1602顯示溫濕度傳感器SHT11的溫濕度
- * 日 期: 2018/12/16
- * 作 者: (果果小師弟)B站
- ***********************************************************************/
- # include <all.h>
- #include <REG51.H>
- #include <math.h> //Keil library
- #include <stdio.h> //Keil library
- #include <INTRINS.H>
- #define uchar unsigned char
- #define uint unsigned int
- #include "main.h"
- #include "stdio.h"
- #include "stdio.h"
- #include "SGP30.h"
- #include "delay.h"
- sbit SCL=P1^5; //IIC時鐘引腳定義
- sbit SDA=P1^4; //IIC數(shù)據(jù)引腳定義
- sbit bee=P3^7;
- sbit gled=P3^6;
- sbit yled=P3^5;
- sbit rled=P3^4;
- #define SlaveAddress 0x46 //定義器件在IIC總線中的從地址,根據(jù)ALT ADDRESS地址引腳不同修改
- //ALT ADDRESS引腳接地時地址為0xA6,接電源時地址為0x3A
- typedef unsigned char BYTE;
- typedef unsigned short WORD;
- BYTE BUF[8]; //接收數(shù)據(jù)緩存區(qū)
- uchar ge,shi,bai,qian,wan,q; //顯示變量
- int dis_data; //變量
- unsigned int flag=0;
- void delay_nms(unsigned int k);
- void InitLcd();
- void Init_BH1750(void);
- void WriteDataLCM(uchar dataW);
- void WriteCommandLCM(uchar CMD,uchar Attribc);
- void DisplayOneChar(uchar X,uchar Y,uchar DData);
- void conversion(uint temp_data);
- void Single_Write_BH1750(uchar REG_Address); //單個寫入數(shù)據(jù)
- uchar Single_Read_BH1750(uchar REG_Address); //單個讀取內(nèi)部寄存器數(shù)據(jù)
- void Multiple_Read_BH1750(); //連續(xù)的讀取內(nèi)部寄存器數(shù)據(jù)
- //------------------------------------
- void Delay5us();
- void Delay5ms();
- void BH1750_Start(); //起始信號
- void BH1750_Stop(); //停止信號
- void BH1750_SendACK(bit ack); //應答ACK
- bit BH1750_RecvACK(); //讀ack
- void BH1750_SendByte(BYTE dat); //IIC單個字節(jié)寫
- BYTE BH1750_RecvByte(); //IIC單個字節(jié)讀
- uint wendu,shidu;
- typedef union
- {
- uint i; //定義了兩個共用體
- float f;
- } value;
- enum
- {
- TEMP,HUMI //TEMP=0,HUMI=1
- };
-
- void conversion(uint temp_data) // 數(shù)據(jù)轉(zhuǎn)換出 個,十,百,千,萬
- {
- if(temp_data<3000)
- {
- rled=1;
- gled=0;
- yled=1;
- }
- else if(temp_data>3000)
- {
- if(temp_data>6000)
- {
- rled=0;
- gled=0;
- yled=0;
- }else
- {
- rled=1;
- gled=0;
- yled=0;
- }
- }else
- {
- rled=1;
- gled=1;
- yled=1;
- }
- wan=temp_data/10000+0x30 ;
- temp_data=temp_data%10000; //取余運算
- qian=temp_data/1000+0x30 ;
- temp_data=temp_data%1000; //取余運算
- bai=temp_data/100+0x30 ;
- temp_data=temp_data%100; //取余運算
- shi=temp_data/10+0x30 ;
- temp_data=temp_data%10; //取余運算
- ge=temp_data+0x30;
-
- }
- //毫秒延時**************************
- void delay_nms(unsigned int k)
- {
- unsigned int i,j;
- for(i=0;i<k;i++)
- {
- for(j=0;j<121;j++)
- {;}}
- }
- /**************************************
- 延時5微秒(STC90C52RC@12M)
- 不同的工作環(huán)境,需要調(diào)整此函數(shù),注意時鐘過快時需要修改
- 當改用1T的MCU時,請調(diào)整此延時函數(shù)
- **************************************/
- void Delay5us()
- {
- _nop_();_nop_();_nop_();_nop_();
- _nop_();_nop_();_nop_();_nop_();
- _nop_();_nop_();_nop_();_nop_();
- _nop_();_nop_();_nop_();_nop_();
- }
- /**************************************
- 延時5毫秒(STC90C52RC@12M)
- 不同的工作環(huán)境,需要調(diào)整此函數(shù)
- 當改用1T的MCU時,請調(diào)整此延時函數(shù)
- **************************************/
- void Delay5ms()
- {
- WORD n = 560;
- while (n--);
- }
- /**************************************
- 起始信號
- **************************************/
- void BH1750_Start()
- {
- SDA = 1; //拉高數(shù)據(jù)線
- SCL = 1; //拉高時鐘線
- Delay5us(); //延時
- SDA = 0; //產(chǎn)生下降沿
- Delay5us(); //延時
- SCL = 0; //拉低時鐘線
- }
- /**************************************
- 停止信號
- **************************************/
- void BH1750_Stop()
- {
- SDA = 0; //拉低數(shù)據(jù)線
- SCL = 1; //拉高時鐘線
- Delay5us(); //延時
- SDA = 1; //產(chǎn)生上升沿
- Delay5us(); //延時
- }
- /**************************************
- 發(fā)送應答信號
- 入口參數(shù):ack (0:ACK 1:NAK)
- **************************************/
- void BH1750_SendACK(bit ack)
- {
- SDA = ack; //寫應答信號
- SCL = 1; //拉高時鐘線
- Delay5us(); //延時
- SCL = 0; //拉低時鐘線
- Delay5us(); //延時
- }
- /**************************************
- 接收應答信號
- **************************************/
- bit BH1750_RecvACK()
- {
- SCL = 1; //拉高時鐘線
- Delay5us(); //延時
- CY = SDA; //讀應答信號
- SCL = 0; //拉低時鐘線
- Delay5us(); //延時
- return CY;
- }
- /**************************************
- 向IIC總線發(fā)送一個字節(jié)數(shù)據(jù)
- **************************************/
- void BH1750_SendByte(BYTE dat)
- {
- BYTE i;
- for (i=0; i<8; i++) //8位計數(shù)器
- {
- dat <<= 1; //移出數(shù)據(jù)的最高位
- SDA = CY; //送數(shù)據(jù)口
- SCL = 1; //拉高時鐘線
- Delay5us(); //延時
- SCL = 0; //拉低時鐘線
- Delay5us(); //延時
- }
- BH1750_RecvACK();
- }
- /**************************************
- 從IIC總線接收一個字節(jié)數(shù)據(jù)
- **************************************/
- BYTE BH1750_RecvByte()
- {
- BYTE i;
- BYTE dat = 0;
- SDA = 1; //使能內(nèi)部上拉,準備讀取數(shù)據(jù),
- for (i=0; i<8; i++) //8位計數(shù)器
- {
- dat <<= 1;
- SCL = 1; //拉高時鐘線
- Delay5us(); //延時
- dat |= SDA; //讀數(shù)據(jù)
- SCL = 0; //拉低時鐘線
- Delay5us(); //延時
- }
- return dat;
- }
- //*********************************
- void Single_Write_BH1750(uchar REG_Address)
- {
- BH1750_Start(); //起始信號
- BH1750_SendByte(SlaveAddress); //發(fā)送設備地址+寫信號
- BH1750_SendByte(REG_Address); //內(nèi)部寄存器地址,請參考中文pdf22頁
- // BH1750_SendByte(REG_data); //內(nèi)部寄存器數(shù)據(jù),請參考中文pdf22頁
- BH1750_Stop(); //發(fā)送停止信號
- }
- //*********************************************************
- //
- //連續(xù)讀出BH1750內(nèi)部數(shù)據(jù)
- //
- //*********************************************************
- void Multiple_read_BH1750(void)
- { uchar i;
- BH1750_Start(); //起始信號
- BH1750_SendByte(SlaveAddress+1); //發(fā)送設備地址+讀信號
-
- for (i=0; i<3; i++) //連續(xù)讀取6個地址數(shù)據(jù),存儲中BUF
- {
- BUF[i] = BH1750_RecvByte(); //BUF[0]存儲0x32地址中的數(shù)據(jù)
- if (i == 3)
- {
- BH1750_SendACK(1); //最后一個數(shù)據(jù)需要回NOACK
- }
- else
- {
- BH1750_SendACK(0); //回應ACK
- }
- }
- BH1750_Stop(); //停止信號
- Delay5ms();
- }
- //初始化BH1750,根據(jù)需要請參考pdf進行修改****
- void Init_BH1750()
- {
- Single_Write_BH1750(0x01);
- }
- //*********************************************************
- //主程序********
- //*********************************************************
- void main(void)
- {
- float temp1;
- value humi_val,temp_val;
- char error;
- char checksum;
- u32 sgp30_dat;
- u16 CO2Data,TVOCData;//定義CO2濃度變量與TVOC濃度變量,
- SGP30_Init(); //初始化SGP30
-
-
-
- LCD_init();
- s_connectionreset();
- LCD_disp_str(5,1,"welcome");
- delay_n10us(2000); //延時0.2s
- Init_BH1750(); //初始化BH1750
-
- SGP30_Write(0x20,0x08);
- sgp30_dat = SGP30_Read();//讀取SGP30的值
- CO2Data = (sgp30_dat & 0xffff0000) >> 16;
- TVOCData = sgp30_dat & 0x0000ffff;
-
- /*while(CO2Data == 400 && TVOCData == 0)
- {
- SGP30_Write(0x20,0x08);
- sgp30_dat = SGP30_Read();//讀取SGP30的值
- CO2Data = (sgp30_dat & 0xffff0000) >> 16;//取出CO2濃度值
- TVOCData = sgp30_dat & 0x0000ffff; //取出TVOC值
-
- delay_ms(100);
- }*/
-
- while(1)
- {
- error=0;
- error+=s_measure((uchar*) &humi_val.i,&checksum,HUMI); //測量濕度
- error+=s_measure((uchar*) &temp_val.i,&checksum,TEMP); //測量溫度
- Single_Write_BH1750(0x01); // power on
- Single_Write_BH1750(0x10); // H- resolution mode
-
- SGP30_Write(0x20,0x08);
- (u32)sgp30_dat = (u32)SGP30_Read();//讀取SGP30的值
- CO2Data = (sgp30_dat & 0xffff0000) >> 16;//取出CO2濃度值
- if(CO2Data>10000 | temp1>9000)
- bee=0;
- else
- {
- bee=1;
- }
- TVOCData = sgp30_dat & 0x0000ffff; //取出TVOC值
-
- delay_nms(180); //延時180ms
- Multiple_Read_BH1750(); //連續(xù)讀出數(shù)據(jù),存儲在BUF中
- dis_data=BUF[0];
- dis_data=(dis_data<<8)+BUF[1];//合成數(shù)據(jù)
-
- temp1=(float)dis_data/1.2;
- conversion(temp1); //計算數(shù)據(jù)和顯示
- if(error!=0)
- s_connectionreset(); //如果出現(xiàn)錯誤:連接重置
- else
- {
- //flag++;
- //if(flag==11)
- //flag=0;
-
- //if(flag<5)
- //{
- //LCD_disp_str(0,1,"s ");
- //LCD_disp_str(0,2,"w ");
- LCD_disp_str(0,1,"TT.T % "); //初始化溫度顯示區(qū)
- LCD_disp_str(0,2,"RR.R C "); //初始化濕度顯示區(qū)
- humi_val.f=(float)humi_val.i; //將整數(shù)轉(zhuǎn)換為浮點數(shù)
- temp_val.f=(float)temp_val.i; //將整數(shù)轉(zhuǎn)換為浮點數(shù)
- calc_dht90(&humi_val.f,&temp_val.f); //計算濕度、溫度
- wendu=10*temp_val.f;
- //LCD_disp_char(2,2,wendu/1000+'0'); //顯示溫度百位
- LCD_disp_char(0,2,(wendu%1000)/100+'0'); //顯示溫度十位
- LCD_disp_char(1,2,(wendu%100)/10+'0'); //顯示溫度個位
- LCD_disp_char(3,2,(wendu%10)+'0'); //顯示溫度小數(shù)點后第一位
- LCD_disp_char(4,2,0xdf);
- shidu=10*humi_val.f;
- //LCD_disp_char(2,1,shidu/1000+'0'); //顯示濕度百位
- LCD_disp_char(0,1,(shidu%1000)/100+'0'); //顯示濕度十位
- LCD_disp_char(1,1,(shidu%100)/10+'0'); //顯示濕度個位
- LCD_disp_char(3,1,(shidu%10)+'0'); //顯示濕度小數(shù)點后第一位
- //}
-
- //if (flag>5)
- //{
- LCD_disp_str(7,1," lx");
- LCD_disp_char(8,1,wan);
- LCD_disp_char(9,1,qian);
- LCD_disp_char(10,1,bai);
- LCD_disp_char(11,1,shi);
- LCD_disp_char(12,1,ge);
-
- if (CO2Data == 400 && TVOCData == 0)
- LCD_disp_str(8,2," loading");
- else
- {
- LCD_disp_str(7,2," ppm");
- LCD_disp_char(7,2,CO2Data/10000+'0');
- LCD_disp_char(8,2,(CO2Data/1000)%10+'0');
- LCD_disp_char(9,2,(CO2Data%1000)/100+'0');
- LCD_disp_char(10,2,(CO2Data%100)/10+'0');
- LCD_disp_char(11,2,CO2Data%10+'0');
- }
- //}
- }
- delay_n10us(8000); //延時約0.8s
- }
- }
復制代碼
所有程序51hei提供下載:
檢測.zip
(91.44 KB, 下載次數(shù): 64)
2020-11-29 21:30 上傳
點擊文件名下載附件
下載積分: 黑幣 -5
|