標(biāo)題:
51單片機(jī)大棚環(huán)境檢測(cè)程序
[打印本頁(yè)]
作者:
kiseryota
時(shí)間:
2020-11-29 21:30
標(biāo)題:
51單片機(jī)大棚環(huán)境檢測(cè)程序
51單片機(jī),檢測(cè)大棚土壤溫濕度、CO2濃度和光照強(qiáng)度。用到sht10、GY-30和SGP-30,用1602顯示,三個(gè)程序湊的,加蜂鳴器報(bào)警,三個(gè)LED隨光照強(qiáng)度改變點(diǎn)亮個(gè)數(shù)。小白勿噴
單片機(jī)源程序如下:
/***********************************************************************
* 文 件 名: 溫濕度測(cè)量?jī)x
* 使用芯片: STC89C52RC
* 使用晶振: 12MHz
* 編程方式: 框架式編程
* 硬件連接: P0口連接到LCD1602的數(shù)據(jù)口,P2^0接到LCD數(shù)據(jù)/命令選擇端RS,P2^1接到LCD讀/寫(xiě)控制信號(hào)端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時(shí)鐘引腳定義
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總線(xiàn)中的從地址,根據(jù)ALT ADDRESS地址引腳不同修改
//ALT ADDRESS引腳接地時(shí)地址為0xA6,接電源時(shí)地址為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); //單個(gè)寫(xiě)入數(shù)據(jù)
uchar Single_Read_BH1750(uchar REG_Address); //單個(gè)讀取內(nèi)部寄存器數(shù)據(jù)
void Multiple_Read_BH1750(); //連續(xù)的讀取內(nèi)部寄存器數(shù)據(jù)
//------------------------------------
void Delay5us();
void Delay5ms();
void BH1750_Start(); //起始信號(hào)
void BH1750_Stop(); //停止信號(hào)
void BH1750_SendACK(bit ack); //應(yīng)答ACK
bit BH1750_RecvACK(); //讀ack
void BH1750_SendByte(BYTE dat); //IIC單個(gè)字節(jié)寫(xiě)
BYTE BH1750_RecvByte(); //IIC單個(gè)字節(jié)讀
uint wendu,shidu;
typedef union
{
uint i; //定義了兩個(gè)共用體
float f;
} value;
enum
{
TEMP,HUMI //TEMP=0,HUMI=1
};
void conversion(uint temp_data) // 數(shù)據(jù)轉(zhuǎn)換出 個(gè),十,百,千,萬(wà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; //取余運(yùn)算
qian=temp_data/1000+0x30 ;
temp_data=temp_data%1000; //取余運(yùn)算
bai=temp_data/100+0x30 ;
temp_data=temp_data%100; //取余運(yùn)算
shi=temp_data/10+0x30 ;
temp_data=temp_data%10; //取余運(yùn)算
ge=temp_data+0x30;
}
//毫秒延時(shí)**************************
void delay_nms(unsigned int k)
{
unsigned int i,j;
for(i=0;i<k;i++)
{
for(j=0;j<121;j++)
{;}}
}
/**************************************
延時(shí)5微秒(STC90C52RC@12M)
不同的工作環(huán)境,需要調(diào)整此函數(shù),注意時(shí)鐘過(guò)快時(shí)需要修改
當(dāng)改用1T的MCU時(shí),請(qǐng)調(diào)整此延時(shí)函數(shù)
**************************************/
void Delay5us()
{
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
}
/**************************************
延時(shí)5毫秒(STC90C52RC@12M)
不同的工作環(huán)境,需要調(diào)整此函數(shù)
當(dāng)改用1T的MCU時(shí),請(qǐng)調(diào)整此延時(shí)函數(shù)
**************************************/
void Delay5ms()
{
WORD n = 560;
while (n--);
}
/**************************************
起始信號(hào)
**************************************/
void BH1750_Start()
{
SDA = 1; //拉高數(shù)據(jù)線(xiàn)
SCL = 1; //拉高時(shí)鐘線(xiàn)
Delay5us(); //延時(shí)
SDA = 0; //產(chǎn)生下降沿
Delay5us(); //延時(shí)
SCL = 0; //拉低時(shí)鐘線(xiàn)
}
/**************************************
停止信號(hào)
**************************************/
void BH1750_Stop()
{
SDA = 0; //拉低數(shù)據(jù)線(xiàn)
SCL = 1; //拉高時(shí)鐘線(xiàn)
Delay5us(); //延時(shí)
SDA = 1; //產(chǎn)生上升沿
Delay5us(); //延時(shí)
}
/**************************************
發(fā)送應(yīng)答信號(hào)
入口參數(shù):ack (0:ACK 1:NAK)
**************************************/
void BH1750_SendACK(bit ack)
{
SDA = ack; //寫(xiě)應(yīng)答信號(hào)
SCL = 1; //拉高時(shí)鐘線(xiàn)
Delay5us(); //延時(shí)
SCL = 0; //拉低時(shí)鐘線(xiàn)
Delay5us(); //延時(shí)
}
/**************************************
接收應(yīng)答信號(hào)
**************************************/
bit BH1750_RecvACK()
{
SCL = 1; //拉高時(shí)鐘線(xiàn)
Delay5us(); //延時(shí)
CY = SDA; //讀應(yīng)答信號(hào)
SCL = 0; //拉低時(shí)鐘線(xiàn)
Delay5us(); //延時(shí)
return CY;
}
/**************************************
向IIC總線(xiàn)發(fā)送一個(gè)字節(jié)數(shù)據(jù)
**************************************/
void BH1750_SendByte(BYTE dat)
{
BYTE i;
for (i=0; i<8; i++) //8位計(jì)數(shù)器
{
dat <<= 1; //移出數(shù)據(jù)的最高位
SDA = CY; //送數(shù)據(jù)口
SCL = 1; //拉高時(shí)鐘線(xiàn)
Delay5us(); //延時(shí)
SCL = 0; //拉低時(shí)鐘線(xiàn)
Delay5us(); //延時(shí)
}
BH1750_RecvACK();
}
/**************************************
從IIC總線(xiàn)接收一個(gè)字節(jié)數(shù)據(jù)
**************************************/
BYTE BH1750_RecvByte()
{
BYTE i;
BYTE dat = 0;
SDA = 1; //使能內(nèi)部上拉,準(zhǔn)備讀取數(shù)據(jù),
for (i=0; i<8; i++) //8位計(jì)數(shù)器
{
dat <<= 1;
SCL = 1; //拉高時(shí)鐘線(xiàn)
Delay5us(); //延時(shí)
dat |= SDA; //讀數(shù)據(jù)
SCL = 0; //拉低時(shí)鐘線(xiàn)
Delay5us(); //延時(shí)
}
return dat;
}
//*********************************
void Single_Write_BH1750(uchar REG_Address)
{
BH1750_Start(); //起始信號(hào)
BH1750_SendByte(SlaveAddress); //發(fā)送設(shè)備地址+寫(xiě)信號(hào)
BH1750_SendByte(REG_Address); //內(nèi)部寄存器地址,請(qǐng)參考中文pdf22頁(yè)
// BH1750_SendByte(REG_data); //內(nèi)部寄存器數(shù)據(jù),請(qǐng)參考中文pdf22頁(yè)
BH1750_Stop(); //發(fā)送停止信號(hào)
}
//*********************************************************
//
//連續(xù)讀出BH1750內(nèi)部數(shù)據(jù)
//
//*********************************************************
void Multiple_read_BH1750(void)
{ uchar i;
BH1750_Start(); //起始信號(hào)
BH1750_SendByte(SlaveAddress+1); //發(fā)送設(shè)備地址+讀信號(hào)
for (i=0; i<3; i++) //連續(xù)讀取6個(gè)地址數(shù)據(jù),存儲(chǔ)中BUF
{
BUF[i] = BH1750_RecvByte(); //BUF[0]存儲(chǔ)0x32地址中的數(shù)據(jù)
if (i == 3)
{
BH1750_SendACK(1); //最后一個(gè)數(shù)據(jù)需要回NOACK
}
else
{
BH1750_SendACK(0); //回應(yīng)ACK
}
}
BH1750_Stop(); //停止信號(hào)
Delay5ms();
}
//初始化BH1750,根據(jù)需要請(qǐng)參考pdf進(jìn)行修改****
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); //延時(shí)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); //測(cè)量濕度
error+=s_measure((uchar*) &temp_val.i,&checksum,TEMP); //測(cè)量溫度
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); //延時(shí)180ms
Multiple_Read_BH1750(); //連續(xù)讀出數(shù)據(jù),存儲(chǔ)在BUF中
dis_data=BUF[0];
dis_data=(dis_data<<8)+BUF[1];//合成數(shù)據(jù)
temp1=(float)dis_data/1.2;
conversion(temp1); //計(jì)算數(shù)據(jù)和顯示
if(error!=0)
s_connectionreset(); //如果出現(xiàn)錯(cuò)誤:連接重置
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)換為浮點(diǎn)數(shù)
temp_val.f=(float)temp_val.i; //將整數(shù)轉(zhuǎn)換為浮點(diǎn)數(shù)
calc_dht90(&humi_val.f,&temp_val.f); //計(jì)算濕度、溫度
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'); //顯示溫度個(gè)位
LCD_disp_char(3,2,(wendu%10)+'0'); //顯示溫度小數(shù)點(diǎn)后第一位
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'); //顯示濕度個(gè)位
LCD_disp_char(3,1,(shidu%10)+'0'); //顯示濕度小數(shù)點(diǎn)后第一位
//}
//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); //延時(shí)約0.8s
}
}
復(fù)制代碼
所有程序51hei提供下載:
檢測(cè).zip
(91.44 KB, 下載次數(shù): 64)
2020-11-29 21:30 上傳
點(diǎn)擊文件名下載附件
下載積分: 黑幣 -5
歡迎光臨 (http://www.torrancerestoration.com/bbs/)
Powered by Discuz! X3.1