資源簡介
能檢測土壤溫濕度,土壤干的時候澆花,土壤溫濕度合適不用澆花,可以設置那個時間段澆花
代碼片段和文件信息
/*-----------------------------------------------
??名稱:18B20溫度傳感器
??網站:www.doflye.net
??編寫:shifang
??日期:2009.5
??修改:無
??內容:18B20單線溫度檢測的應用樣例程序
------------------------------------------------*/
#include“delay.h“
#include“18b20.h“
/*------------------------------------------------
????????????????????18b20初始化
------------------------------------------------*/
bit?Init_DS18B20(void)
{
?bit?dat=0;
?DQ?=?1;????//DQ復位
?DelayUs2x(5);???//稍做延時
?DQ?=?0;?????????//單片機將DQ拉低
?DelayUs2x(200);?//精確延時?大于?480us?小于960us
?DelayUs2x(200);
?DQ?=?1;????????//拉高總線
?DelayUs2x(50);?//15~60us?后?接收60-240us的存在脈沖
?dat=DQ;????????//如果x=0則初始化成功?x=1則初始化失敗
?DelayUs2x(25);?//稍作延時返回
?return?dat;
}
/*------------------------------------------------
????????????????????讀取一個字節
------------------------------------------------*/
unsigned?char?ReadOneChar(void)
{
unsigned?char?i=0;
unsigned?char?dat?=?0;
for?(i=8;i>0;i--)
?{
??DQ?=?0;?//?給脈沖信號
??dat>>=1;
??DQ?=?1;?//?給脈沖信號
??if(DQ)
???dat|=0x80;
??DelayUs2x(25);
?}
?return(dat);
}
/*------------------------------------------------
????????????????????寫入一個字節
------------------------------------------------*/
void?WriteOneChar(unsigned?char?dat)
{
?unsigned?char?i=0;
?for?(i=8;?i>0;?i--)
?{
??DQ?=?0;
??DQ?=?dat&0x01;
??DelayUs2x(25);
??DQ?=?1;
??dat>>=1;
?}
DelayUs2x(25);
}
/*------------------------------------------------
????????????????????讀取溫度
------------------------------------------------*/
unsigned?int?ReadTemperature(void)
{
unsigned?char?a=0;
unsigned?int?b=0;
unsigned?int?t=0;
Init_DS18B20();
WriteOneChar(0xCC);?//?跳過讀序號列號的操作
WriteOneChar(0x44);?//?啟動溫度轉換
DelayMs(10);
Init_DS18B20();
WriteOneChar(0xCC);?//跳過讀序號列號的操作?
WriteOneChar(0xBE);?//讀取溫度寄存器等(共可讀9個寄存器)?前兩個就是溫度
a=ReadOneChar();???//低位
b=ReadOneChar();???//高位
b<<=8;
t=a+b;
return(t);
}
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件???49381599??2018-04-28?20:56??資源\錄像\70280論文講解.wmv
?????文件???????2053??2015-10-26?19:33??資源\成品\70280資料\70280資料\18B20\18b20.c
?????文件????????658??2018-04-28?12:06??資源\成品\70280資料\70280資料\18B20\18b20.h
?????文件????????738??2015-10-26?19:33??資源\成品\70280資料\70280資料\18B20\delay.c
?????文件????????654??2015-10-26?19:33??資源\成品\70280資料\70280資料\18B20\delay.h
?????文件???????4184??2018-04-28?19:10??資源\成品\70280資料\70280資料\18B20\obj\18b20.lst
?????文件???????5099??2018-04-28?19:10??資源\成品\70280資料\70280資料\18B20\obj\18b20.obj
?????文件???????1905??2018-04-28?19:10??資源\成品\70280資料\70280資料\18B20\obj\delay.lst
?????文件???????1178??2018-04-28?19:10??資源\成品\70280資料\70280資料\18B20\obj\delay.obj
?????文件???????7444??2018-04-28?19:10??資源\成品\70280資料\70280資料\18B20\obj\main.lst
?????文件???????6877??2018-04-28?19:10??資源\成品\70280資料\70280資料\18B20\obj\main.obj
?????文件??????11478??2018-04-28?19:10??資源\成品\70280資料\70280資料\18B20\obj\超溫報警測試
?????文件???????2799??2018-04-28?19:10??資源\成品\70280資料\70280資料\18B20\obj\超溫報警測試.hex
?????文件????????132??2018-04-28?19:10??資源\成品\70280資料\70280資料\18B20\obj\超溫報警測試.lnp
?????文件??????14660??2018-04-28?19:10??資源\成品\70280資料\70280資料\18B20\obj\超溫報警測試.m51
?????文件????????179??2015-10-26?19:32??資源\成品\70280資料\70280資料\18B20\obj\超溫報警測試.plg
?????文件???30872047??2018-04-28?20:55??資源\成品\70280資料.rar
?????文件?????????67??2018-10-16?19:51??資源\說明.txt
?????文件??????26112??2018-04-21?16:09??資源\需求\能檢測土壤溫濕度.doc
?????目錄??????????0??2018-04-28?19:10??資源\成品\70280資料\70280資料\18B20\obj
?????目錄??????????0??2018-10-16?20:25??資源\成品\70280資料\70280資料\18B20
?????目錄??????????0??2018-10-16?20:25??資源\成品\70280資料\70280資料
?????目錄??????????0??2018-10-16?20:25??資源\成品\70280資料
?????目錄??????????0??2018-10-16?20:24??資源\錄像
?????目錄??????????0??2018-10-16?20:25??資源\成品
?????目錄??????????0??2018-10-16?20:24??資源\需求
?????目錄??????????0??2018-10-16?20:25??資源
-----------?---------??----------?-----??----
?????????????80339863????????????????????27
............此處省略0個文件信息
- 上一篇:圖像處理中的數學修煉
- 下一篇:secureCRT for mac
評論
共有 條評論