基于51单片机的智能浇花器

能检测土壤温湿度，土壤干的时候浇花，土壤温湿度合适不用浇花，可以设置那个时间段浇花

/*-----------------------------------------------
  名称：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个文件信息