1635
大棚環(huán)境控制：
1、測(cè)量大棚內(nèi)的溫度、濕度、PH值。
2、設(shè)定控制參數(shù)，溫度過(guò)低，啟動(dòng)加熱；濕度過(guò)低或PH值異常，啟動(dòng)灑水。
3、數(shù)碼管顯示系統(tǒng)參數(shù)。
#include"Ds18b20.h"
float ds18b20_temp=0;
/*******************************************************************************
* 函 數(shù) 名 : Delay1ms
* 函數(shù)功能 : 延時(shí)函數(shù)
* 輸 入 : 無(wú)
* 輸 出 : 無(wú)
*******************************************************************************/
void Delay1ms(uint y)
{
uint x;
for( ; y>0; y--)
{
for(x=110; x>0; x--);
}
}
/*******************************************************************************
* 函 數(shù) 名 : Ds18b20Init
* 函數(shù)功能 : 初始化
* 輸 入 : 無(wú)
* 輸 出 : 初始化成功返回1，失敗返回0
*******************************************************************************/
uchar Ds18b20Init()
{
uchar i;
DSPORT = 0; //將總線(xiàn)拉低480us~960us
i = 100;
while(i--);//延時(shí)642us
DSPORT = 1; //然后拉高總線(xiàn)，如果DS18B20做出反應(yīng)會(huì)將在15us~60us后總線(xiàn)拉低
i = 0;
while(DSPORT) //等待DS18B20拉低總線(xiàn)
{
Delay1ms(1);
i++;
if(i>5)//等待>5MS
{
return 0;//初始化失敗
}
}
return 1;//初始化成功
}
/*******************************************************************************
* 函 數(shù) 名 : Ds18b20WriteByte
* 函數(shù)功能 : 向18B20寫(xiě)入一個(gè)字節(jié)
* 輸 入 : 無(wú)
* 輸 出 : 無(wú)
*******************************************************************************/
void Ds18b20WriteByte(uchar dat)
{
uint i, j;
for(j=0; j<8; j++)
{
DSPORT = 0; //每寫(xiě)入一位數(shù)據(jù)之前先把總線(xiàn)拉低1us
i++;
DSPORT = dat & 0x01; //然后寫(xiě)入一個(gè)數(shù)據(jù)，從最低位開(kāi)始
i=6;
while(i--); //延時(shí)68us，持續(xù)時(shí)間最少60us
DSPORT = 1; //然后釋放總線(xiàn)，至少1us給總線(xiàn)恢復(fù)時(shí)間才能接著寫(xiě)入第二個(gè)數(shù)值
dat >>= 1;
}
}
/*******************************************************************************
* 函 數(shù) 名 : Ds18b20ReadByte
* 函數(shù)功能 : 讀取一個(gè)字節(jié)
* 輸 入 : 無(wú)
* 輸 出 : 無(wú)
*******************************************************************************/
uchar Ds18b20ReadByte()
{
uchar byte, bi;
uint i, j;
for(j=8; j>0; j--)
{
DSPORT = 0;//先將總線(xiàn)拉低1us
i++;
DSPORT = 1;//然后釋放總線(xiàn)
i++;
i++;//延時(shí)6us等待數(shù)據(jù)穩(wěn)定
bi = DSPORT; //讀取數(shù)據(jù)，從最低位開(kāi)始讀取
/*將byte左移一位，然后與上右移7位后的bi，注意移動(dòng)之后移掉那位補(bǔ)0。*/
byte = (byte >> 1) | (bi << 7);
i = 4; //讀取完之后等待48us再接著讀取下一個(gè)數(shù)
while(i--);
}
return byte;
}
/*******************************************************************************
* 函 數(shù) 名 : Ds18b20ChangTemp
* 函數(shù)功能 : 讓18b20開(kāi)始轉(zhuǎn)換溫度
* 輸 入 : 無(wú)
* 輸 出 : 無(wú)
*******************************************************************************/
void Ds18b20ChangTemp()
{
Ds18b20Init();
Delay1ms(1);
Ds18b20WriteByte(0xcc); //跳過(guò)ROM操作命令
Ds18b20WriteByte(0x44); //溫度轉(zhuǎn)換命令
//Delay1ms(100); //等待轉(zhuǎn)換成功，而如果你是一直刷著的話(huà)，就不用這個(gè)延時(shí)了
}
/*******************************************************************************
* 函 數(shù) 名 : Ds18b20ReadTempCom
* 函數(shù)功能 : 發(fā)送讀取溫度命令
* 輸 入 : 無(wú)
* 輸 出 : 無(wú)
*******************************************************************************/
void Ds18b20ReadTempCom()
{
Ds18b20Init();
Delay1ms(1);
Ds18b20WriteByte(0xcc); //跳過(guò)ROM操作命令
Ds18b20WriteByte(0xbe); //發(fā)送讀取溫度命令
}
/*******************************************************************************
* 函 數(shù) 名 : Ds18b20ReadTemp
* 函數(shù)功能 : 讀取溫度
* 輸 入 : 無(wú)
* 輸 出 : 無(wú)
*******************************************************************************/
void Ds18b20ReadTemp()
{
uchar temp = 0;
uchar tmh, tml;
Ds18b20ChangTemp(); //先寫(xiě)入轉(zhuǎn)換命令
Ds18b20ReadTempCom(); //然后等待轉(zhuǎn)換完后發(fā)送讀取溫度命令
tml = Ds18b20ReadByte(); //讀取溫度值共16位，先讀低字節(jié)
tmh = Ds18b20ReadByte(); //再讀高字節(jié)
temp = tmh;
temp <<= 4;
temp += (tml>>4);
if(temp>127)
{
temp--;
temp=~temp;
temp=temp & 0x7f;
ds18b20_temp=temp;
ds18b20_temp=-ds18b20_temp;
}
else
ds18b20_temp=temp;
ds18b20_temp=ds18b20_temp+(tml & 0x0f)*9/150;
}
資料借鑒于此紛傳
閱讀全文
