單片機(jī)大棚溫濕度檢測(cè)與控制程序+Proteus仿真 LCD1602顯示

ID:528775 · 發(fā)表于 2021-11-17 20:40

大棚溫濕度，檢測(cè)與控制LCD1602顯示溫度與濕度，溫度大于設(shè)定值時(shí)開風(fēng)扇，小于時(shí)開電輔熱，使得氣溫保持一定限制，同時(shí)利用AD采集濕度，然后進(jìn)行澆水。

仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）

單片機(jī)源程序如下:

/*=============================================================*/
#include <reg52.H> //器件配置文件
#include <intrins.h>
#include "lcd.h"
#define u8 unsigned char
#define u16 unsigned int
#define uchar unsigned char
#define uint unsigned int
//一般選用500K
sbit DQ=P2^7; //ds18b20 與單片機(jī)連接口
//將短接片去掉開啟位選功能，否則默認(rèn)IN0為輸入引腳
sbit motor=P1^0;//當(dāng)濕度過低時(shí)。給高電平
sbit ledgreen=P1^1;//當(dāng)溫度過高時(shí)，打開風(fēng)扇
sbit ledred=P1^2; //溫度低時(shí)，打開輔熱
unsigned char AD_DATA[2]; //保存IN0通道轉(zhuǎn)換后的數(shù)據(jù)
unsigned char disbuff[7] = { 0,0,0,0,};
unsigned char Disp[]="0123456789"; //使用字符串保存數(shù)字0~9所對(duì)應(yīng)的ASCLL碼
//unsigned char I_Disp[]="value: "; //初始顯示值
unsigned char i,tflag;
unsigned int a,voltage,circuit,electirc,aa,bb,cc,ab;
unsigned char dd,ee,ff,gg;
unsigned int tvalue,time,Level,High,t,ppm; // 溫度值
uint dat=0,shidu;
void delay_18b20(unsigned int i) // 延時(shí) 1 微秒
{
while(i--);
}
void ds18b20rst() //ds18b20 初始化子函數(shù)
{
unsigned charx=0;
DQ = 1; // 信號(hào)線 DQ復(fù)位
delay_18b20(4); // 延時(shí)
DQ = 0; //DQ 拉低
delay_18b20(100); // 精確延時(shí)大于 480us
DQ = 1; // 拉高
delay_18b20(40);
}
void ds18b20wr(unsigned char wdata) /* 寫數(shù)據(jù)子函數(shù) , 無返回值，含參數(shù) */
{
unsigned char i=0;
for (i=8; i>0; i--)// 要寫完一個(gè)字節(jié)，故需要重復(fù) 8 次以下操作
{
DQ = 0; // 數(shù)據(jù)線拉低
DQ = wdata&0x01;// 按從低到高的順序發(fā)送數(shù)據(jù)（一次發(fā)送一位 )
delay_18b20(10);
DQ = 1; // 最后將數(shù)據(jù)線拉高
wdata>>=1; // 將 wdata 右移 1 位
}
}
unsigned char ds18b20rd() // 讀數(shù)據(jù)子函數(shù) , 是有返回值 dat
{
unsigned char i=0;
unsigned char dat = 0;
for (i=8;i>0;i--)// 要讀完一個(gè)字節(jié)，故需要重復(fù) 8 次以下操作
{
DQ = 0; // 給脈沖信號(hào)
dat>>=1;
DQ = 1; // 給脈沖信號(hào)
if(DQ)
dat|=0x80;
delay_18b20(10);
}
return(dat); // 返回 dat
}
read_temp() // 讀取溫度值并轉(zhuǎn)換的子函數(shù)，有返回值溫度值 tvalue
{
unsigned char a,b;
ds18b20rst(); // 調(diào)用 ds18b20 初始化子函數(shù)
ds18b20wr(0xcc);// 調(diào)用寫數(shù)據(jù)子函數(shù)，向 ds18b20 寫命令 0xcc
//ccH 表示跳過 ROM讀序列號(hào)，適用于單機(jī)工作，直接向 18b20 發(fā)送溫度變換命令
ds18b20wr(0x44);// 調(diào)用寫數(shù)據(jù)子函數(shù)，向 ds18b20 寫命令 0x44
//44H 表示啟動(dòng) ds18b20 溫度轉(zhuǎn)換 , 結(jié)果自行存入 9 字節(jié)的 RAM中
ds18b20rst(); // 調(diào)用 ds18b20 初始化子函數(shù)
ds18b20wr(0xcc);// 同上
ds18b20wr(0xbe);// 調(diào)用寫數(shù)據(jù)子函數(shù)，向 ds18b20 寫命令 0xbe
//beH 表示讀取 RAM中 9 字節(jié)的溫度數(shù)據(jù)
a=ds18b20rd(); // 調(diào)用讀數(shù)據(jù)子函數(shù)，并將所得數(shù)據(jù)給 a
b=ds18b20rd(); //
tvalue=b; // 把 b 的值給 tvalue
tvalue<<=8; //tvalue 左移 8 位
tvalue=tvalue|a;//tvalue 與 a 進(jìn)行按位或
if(tvalue<0x0fff)//
tflag=0; // 前五位為 0 時(shí)，讀取的溫度為正，標(biāo)志位為 0，此時(shí)只要
else // 前五位為 1 時(shí)，讀取的溫度為負(fù)，標(biāo)志位為 1，此時(shí)需要
{ // 將測(cè)得數(shù)值取反后再加 1，再乘以 0.0625 即可得到實(shí)際溫度
tvalue=~tvalue+1;
tflag=1; // 此時(shí)表示負(fù)溫度
}
tvalue=tvalue*(0.625);// 溫度值擴(kuò)大 10 倍，精確到 1 位小數(shù)
return(tvalue); // 返回溫度值
}
/***********************************
函數(shù)名： AD（）
功能：啟動(dòng)AD轉(zhuǎn)換將值儲(chǔ)存于 AD_DATA[0]
***********************************/
sbit ADCS =P3^5;
sbit ADCLK =P3^2;
sbit ADDI =P3^3;
sbit ADDO =P3^4;
unsigned int Adc0832(unsigned char channel)
{
uchar i=0;
uchar j;
uchar ndat=0;
uchar Vot=0;
if(channel==0)channel=2;
if(channel==1)channel=3;
ADDI=1;
_nop_();
_nop_();
ADCS=0;//拉低CS端
_nop_();
_nop_();
ADCLK=1;//拉高CLK端
_nop_();
_nop_();
ADCLK=0;//拉低CLK端,形成下降沿1
_nop_();
_nop_();
ADCLK=1;//拉高CLK端
ADDI=channel&0x1;
_nop_();
_nop_();
ADCLK=0;//拉低CLK端,形成下降沿2
_nop_();
_nop_();
ADCLK=1;//拉高CLK端
ADDI=(channel>>1)&0x1;
_nop_();
_nop_();
ADCLK=0;//拉低CLK端,形成下降沿3
ADDI=1;//控制命令結(jié)束
_nop_();
_nop_();
dat=0;
for(i=0;i<8;i++)
{
dat|=ADDO;//收數(shù)據(jù)
ADCLK=1;
_nop_();
_nop_();
ADCLK=0;//形成一次時(shí)鐘脈沖
_nop_();
_nop_();
dat<<=1;
if(i==7)dat|=ADDO;
}
for(i=0;i<8;i++)
{
j=0;
j=j|ADDO;//收數(shù)據(jù)
ADCLK=1;
_nop_();
_nop_();
ADCLK=0;//形成一次時(shí)鐘脈沖
_nop_();
_nop_();
j=j<<7;
ndat=ndat|j;
if(i<7)ndat>>=1;
}
ADCS=1;//拉低CS端
ADCLK=0;//拉低CLK端
ADDO=1;//拉高數(shù)據(jù)端,回到初始狀態(tài)
dat<<=8;
dat|=ndat;
return(dat); //return ad data
}
void Conut(void)
{
circuit=dat/256;
ppm=circuit;
aa=ppm/1000;
bb=ppm%1000/100;
cc=ppm%100/10;
ab=ppm%10;
dd=tvalue/1000; // 百位數(shù)
ee=tvalue%1000/100;// 十位數(shù)
ff=tvalue%100/10 ;// 個(gè)位數(shù)
gg=tvalue%10; // 小數(shù)位
if(ppm>150) //濕度大于150/256=58.59后電機(jī)停轉(zhuǎn)
{motor=0;}
if(ppm<=80) //小于31.25%電機(jī)開始啟動(dòng)
{motor=1; }
if(tvalue>400) //溫度大于40度風(fēng)扇開始啟動(dòng)
{ledgreen=1;ledred=0;}
if(tvalue<=400) //溫度小于40度風(fēng)扇關(guān)閉
{ledgreen=0;ledred=1;}
}
/***********************************
函數(shù)名： delayms（）
功能：延時(shí) ms 毫秒
***********************************/
void delayms(unsigned int ms)
{
unsigned char j;
i=100;
for(;ms;ms--)
{
while(--i)
{
j=10;
while(--j);
}
}
}
/***********************************
函數(shù)名： LcdDisplay（）
功能：用lcd顯示數(shù)組disbuff[]中的值
***********************************/
void LcdDisplay(void)
{
LCD1602_write_com(0x80+1+0x40);
LCD1602_write_word("c=");
LCD1602_write_com(0x80+3+0x40);
LCD1602_write_data(0x30+aa);
LCD1602_write_com(0x80+4+0x40);
LCD1602_write_data(0x30+bb);
LCD1602_write_com(0x80+5+0x40);
LCD1602_write_data(0x30+cc);
LCD1602_write_com(0x80+6+0x40);
LCD1602_write_data(0x30+ab);
LCD1602_write_com(0x80+7+0x40);
LCD1602_write_word("humid");
LCD1602_write_com(0x80+1);
LCD1602_write_word("tem=");
LCD1602_write_com(0x80+5);
LCD1602_write_data(0x30+dd);
LCD1602_write_com(0x80+8);
LCD1602_write_word(".");
LCD1602_write_com(0x80+6);
LCD1602_write_data(0x30+ee);
LCD1602_write_com(0x80+7);
LCD1602_write_data(0x30+ff);
LCD1602_write_com(0x80+9);
LCD1602_write_data(0x30+gg);
}
/***********************************
函數(shù)名： Analog_IO_Sel（）
參數(shù)說明： m 的值對(duì)應(yīng)ADC0809芯片上模擬輸入的IO
功能：確定模擬輸入位選
***********************************/
//void init()
//{if(a==0)
//{
// EA=1; //開總中斷
// TMOD=0x02; //設(shè)定定時(shí)器 T0工作方式
// TH0=21; //利用T0中斷產(chǎn)生CLK信號(hào)
// TL0=21;
……………………
…………限于本文篇幅余下代碼請(qǐng)從51黑下載附件…………

復(fù)制代碼

所有資料51hei附件下載:

大棚溫濕度控制.rar (198.02 KB, 下載次數(shù): 327)

ID:968456 · 發(fā)表于 2021-11-19 21:04

大佬那個(gè)溫度怎么改才能讓他一下加減沒那么多

ID:982166 · 發(fā)表于 2021-11-25 23:02

用ADC0832可以檢測(cè)濕度嗎，不是應(yīng)該用濕度傳感器嗎，有大佬可以說一下嗎

ID:343102 · 發(fā)表于 2022-1-16 07:06

大棚內(nèi)CO2 濃度也是一項(xiàng)重要指標(biāo)，沒有CO2，作物就不會(huì)生長。智能大棚必須要有CO2自動(dòng)調(diào)節(jié)功能。

ID:1007655 · 發(fā)表于 2022-3-3 22:50

w13325372056 發(fā)表于 2021-11-25 23:02
用ADC0832可以檢測(cè)濕度嗎，不是應(yīng)該用濕度傳感器嗎，有大佬可以說一下嗎

ADC0832是進(jìn)行是A/D轉(zhuǎn)換器，用來轉(zhuǎn)換數(shù)據(jù)的

ID:456792 · 發(fā)表于 2022-3-4 10:55

w13325372056 發(fā)表于 2021-11-25 23:02
用ADC0832可以檢測(cè)濕度嗎，不是應(yīng)該用濕度傳感器嗎，有大佬可以說一下嗎

題主的設(shè)計(jì)中，沒有濕度傳感器。大多數(shù)的傳感器的輸出都是電信號(hào)，通過ADC0832模數(shù)轉(zhuǎn)換和滑動(dòng)變阻器來代替濕度傳感器進(jìn)行仿真。

ID:1008207 · 發(fā)表于 2022-3-4 22:19

不明白濕度檢測(cè)的原理

ID:297903 · 發(fā)表于 2022-3-5 08:34

很好用的，參考下，謝謝！！

ID:1003077 · 發(fā)表于 2022-3-5 10:10

單點(diǎn)檢測(cè)？傳感器布置在哪兒合適？

ID:1003077 · 發(fā)表于 2022-3-5 10:11

為什么不用個(gè)DHT11，或者SHT11什么的，一次吧溫濕度都給解決了

ID:397211 · 發(fā)表于 2022-3-5 11:55

w13325372056 發(fā)表于 2021-11-25 23:02
用ADC0832可以檢測(cè)濕度嗎，不是應(yīng)該用濕度傳感器嗎，有大佬可以說一下嗎

可以的，配合模擬量的濕度傳感器，0832是模數(shù)轉(zhuǎn)換芯片。

ID:1019495 · 發(fā)表于 2022-6-14 08:59

請(qǐng)問，水泵、風(fēng)扇、電輔熱在硬件上應(yīng)該怎么選擇呢

帳號(hào)		自動(dòng)登錄	找回密碼
密碼			立即注冊(cè)

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

單片機(jī)大棚溫濕度檢測(cè)與控制程序+Proteus仿真 LCD1602顯示

評(píng)分

	地板無效樓層，該帖已經(jīng)被刪除

	6^# 無效樓層，該帖已經(jīng)被刪除

	14^# 無效樓層，該帖已經(jīng)被刪除