传感器有关大作业项目

部分传感器源代码+经纬度+空气湿度测量（java大作业）

#include “IIC.h“
extern BYTE BUF[8];
/**************************************
延时5微秒（STC90C52RC@12M）
不同的工作环境需要调整此函数，注意时钟过快时需要修改
当改用1T的MCU时请调整此延时函数
**************************************/
void Delay5us（）
{
   
    WORD n = 12;

    while （n--）;  
}


/**************************************
起始信号
**************************************/
void BH1750_Start（）
{
    SDA_OUT;
    SDA = 1;                    //拉高数据线
    //Delay5us（）;
    SCL = 1;                    //拉高时钟线
    Delay5us（）;                 //延时
    SDA = 0;                    //产生下降沿
    Delay5us（）;                 //延时
    SCL = 0;                    //拉低时钟线
}

/**************************************
停止信号
**************************************/
void BH1750_Stop（）
{
    SDA_OUT;
    SDA = 0;                    //拉低数据线
    //Delay5us（）;
    SCL = 1;                    //拉高时钟线
    Delay5us（）;                 //延时
    SDA = 1;                    //产生上升沿
    Delay5us（）;                 //延时
}

/**************************************
发送应答信号
入口参数:ack （0:ACK 1:NAK）
**************************************/
void BH1750_SendACK（uchar ack）
{
    SDA_OUT;
    if（0x01&&ack）
      SDA = 1;                  //写应答信号
    else 
      SDA=0;
    SCL = 1;                    //拉高时钟线
    Delay5us（）;                 //延时
    SCL = 0;                    //拉低时钟线
    Delay5us（）;                 //延时
}

/**************************************
接收应答信号
**************************************/
uchar BH1750_RecvACK（）
{
    SDA_IN;
    SCL = 1;                    //拉高时钟线
    Delay5us（）;                 //延时
    CY = SDA;                   //读应答信号
    SCL = 0;                    //拉低时钟线
    Delay5us（）;                 //延时

    return CY;
}

/**************************************
向IIC总线发送一个字节数据
**************************************/
void BH1750_SendByte（BYTE dat）
{
    SDA_OUT;
    BYTE i;

    for （i=0; i<8; i++）         //8位计数器
    {
        dat <<= 1;              //移出数据的最高位
        SDA = CY;               //送数据口
        SCL = 1;                //拉高时钟线
        Delay5us（）;             //延时
        SCL = 0;                //拉低时钟线
        Delay5us（）;             //延时
    }
    BH1750_RecvACK（）;
}

/**************************************
从IIC总线接收一个字节数据
**************************************/
BYTE BH1750_RecvByte（）
{
    SDA_IN;
    BYTE i;
    BYTE dat = 0;
    
    for （i=0; i<8; i++）         //8位计数器
    {
        dat <<= 1;
        SCL = 1;                //拉高时钟线
        Delay5us（）;             //延时
        dat |= SDA;             //读数据               
        SCL = 0;                //拉低时钟线
        Delay5us（）;             //延时
    }
    return dat;
}

//*********************************

void Single_Write_BH1750（uchar REG_data）
{
    BH1750_Start（）;                  //起始信号
    BH1750_SendByte（SlaveAddress）;   //发送设备地址+写信号
    //BH1750_SendByte（REG_Address）;    //内部寄存器地址，请参考中文pdf22页 
    BH1750_SendByt

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     文件       17540  2012-10-13 10:49  空气测量系统\1\bh1750\Debug\Obj\IIC.r51
     文件         196  2012-10-13 13:21  空气测量系统\1\bh1750\Debug\Obj\led.pbd
     文件       13307  2012-10-13 10:49  空气测量系统\1\bh1750\Debug\Obj\LED.r51
     文件       14096  2012-10-13 10:49  空气测量系统\1\bh1750\Debug\Exe\led.a51
     文件        1845  2012-10-13 10:49  空气测量系统\1\bh1750\Debug\Exe\led.hex
     文件        2546  2012-10-13 11:11  空气测量系统\1\bh1750\settings\led.cspy.bat
     文件        7276  2012-10-13 14:29  空气测量系统\1\bh1750\settings\led.dbgdt
     文件        1414  2012-10-13 14:29  空气测量系统\1\bh1750\settings\led.dni
     文件        3552  2012-10-13 14:29  空气测量系统\1\bh1750\settings\LED.wsdt
     文件        5572  2009-07-08 00:10  空气测量系统\11\模拟量测试参考程序\keil\chengxu
     文件        2828  2010-03-15 22:01  空气测量系统\11\模拟量测试参考程序\keil\chengxu.c
     文件        1592  2009-07-08 00:10  空气测量系统\11\模拟量测试参考程序\keil\chengxu.hex
     文件          62  2009-07-08 00:10  空气测量系统\11\模拟量测试参考程序\keil\chengxu.lnp
     文件        5355  2009-07-08 00:10  空气测量系统\11\模拟量测试参考程序\keil\chengxu.LST
     文件        8656  2009-07-08 00:10  空气测量系统\11\模拟量测试参考程序\keil\chengxu.M51
     文件        5459  2009-07-08 00:10  空气测量系统\11\模拟量测试参考程序\keil\chengxu.OBJ
     文件        1079  2009-07-08 00:10  空气测量系统\11\模拟量测试参考程序\keil\chengxu.Opt
     文件        1407  2009-07-08 00:10  空气测量系统\11\模拟量测试参考程序\keil\chengxu.plg
     文件        2165  2005-12-15 00:49  空气测量系统\11\模拟量测试参考程序\keil\chengxu.Uv2
     文件          37  2009-07-08 00:10  空气测量系统\11\模拟量测试参考程序\keil\chengxu.__i
     文件        1079  2009-07-08 00:07  空气测量系统\11\模拟量测试参考程序\keil\chengxu_Opt.Bak
     文件           0  2011-05-24 12:04  空气测量系统\11\模拟量测试参考程序\keil\chengxu_Uv2.Bak
     文件        6376  2009-07-07 21:24  空气测量系统\11\模拟量测试参考程序\keil\STARTUP.A51
     文件       10791  2009-07-07 21:24  空气测量系统\11\模拟量测试参考程序\keil\STARTUP.LST
     文件         750  2009-07-07 21:24  空气测量系统\11\模拟量测试参考程序\keil\STARTUP.OBJ
     文件        5104  2012-10-13 13:21  空气测量系统\1\bh1750\IIC.c
     文件        1604  2012-10-13 10:48  空气测量系统\1\bh1750\IIC.h
     文件        3256  2012-10-13 14:29  空气测量系统\1\bh1750\led.dep
     文件       34242  2012-04-18 14:47  空气测量系统\1\bh1750\led.ewd
     文件       55569  2012-10-13 10:46  空气测量系统\1\bh1750\led.ewp
     文件         157  2012-04-18 14:39  空气测量系统\1\bh1750\LED.eww
............此处省略50个文件信息