/ BH1750FVI IIC測試程序
// 使用單片機STC89C51
// 晶振：11.0592M
// 顯示：LCD1602
// 編譯環(huán)境 Keil uVision2
// 參考宏晶網(wǎng)站24c04通信程序
// 時間：2011年4月20日
//****************************************
#include  <REG51.H>        
#include  <math.h>    //Keil library  
#include  <stdio.h>   //Keil library        
#include  <INTRINS.H>
#define   uchar unsigned char
#define   uint unsigned int        
#define   DataPort P0         //LCD1602數(shù)據(jù)端口
sbit          SCL=P1^0;      //IIC時鐘引腳定義
sbit            SDA=P1^1;      //IIC數(shù)據(jù)引腳定義
sbit      LCM_RS=P2^0;   //LCD1602命令端口               
sbit      LCM_RW=P2^1;   //LCD1602命令端口               
sbit      LCM_EN=P2^2;   //LCD1602命令端口

#define          SlaveAddress   0x46 //定義器件在IIC總線中的從地址,根據(jù)ALT  ADDRESS地址引腳不同修改
                              //ALT  ADDRESS引腳接地時地址為0x46，接電源時地址為0xB8
typedef   unsigned char BYTE;
typedef   unsigned short WORD;

BYTE    BUF[8];                         //接收數(shù)據(jù)緩存區(qū)              
uchar   ge,shi,bai,qian,wan;            //顯示變量
int     dis_data;                       //變量

void delay_nms(unsigned int k);
void InitLcd();
void Init_BH1750(void);

void WriteDataLCM(uchar dataW);
void WriteCommandLCM(uchar CMD,uchar Attribc);
void DisplayOneChar(uchar X,uchar Y,uchar DData);
void conversion(uint temp_data);

void  Single_Write_BH1750(uchar REG_Address);               //單個寫入數(shù)據(jù)
uchar Single_Read_BH1750(uchar REG_Address);                //單個讀取內(nèi)部寄存器數(shù)據(jù)
void  Multiple_Read_BH1750();                               //連續(xù)的讀取內(nèi)部寄存器數(shù)據(jù)
//------------------------------------
void Delay5us();
void Delay5ms();
void BH1750_Start();                    //起始信號
void BH1750_Stop();                     //停止信號
void BH1750_SendACK(bit ack);           //應(yīng)答ACK
bit  BH1750_RecvACK();                  //讀ack
void BH1750_SendByte(BYTE dat);         //IIC單個字節(jié)寫
BYTE BH1750_RecvByte();                 //IIC單個字節(jié)讀

//-----------------------------------

//*********************************************************
void conversion(uint temp_data)  //  數(shù)據(jù)轉(zhuǎn)換出 個，十，百，千，萬
{  
    wan=temp_data/10000+0x30 ;
    temp_data=temp_data%10000;   //取余運算
        qian=temp_data/1000+0x30 ;
    temp_data=temp_data%1000;    //取余運算
    bai=temp_data/100+0x30   ;
    temp_data=temp_data%100;     //取余運算
    shi=temp_data/10+0x30    ;
    temp_data=temp_data%10;      //取余運算
    ge=temp_data+0x30;         
}

//毫秒延時**************************
void delay_nms(unsigned int k)        
{                                                
unsigned int i,j;                                
for(i=0;i<k;i++)
{                        
for(j=0;j<121;j++)                        
{;}}                                                
}

/*******************************/
void WaitForEnable(void)        
{                                       
DataPort=0xff;               
LCM_RS=0;LCM_RW=1;_nop_();
LCM_EN=1;_nop_();_nop_();
while(DataPort&0x80);        
LCM_EN=0;                                
}                                       
/*******************************/
void WriteCommandLCM(uchar CMD,uchar Attribc)
{                                       
if(Attribc)WaitForEnable();        
LCM_RS=0;LCM_RW=0;_nop_();
DataPort=CMD;_nop_();        
LCM_EN=1;_nop_();_nop_();LCM_EN=0;
}                                       
/*******************************/
void WriteDataLCM(uchar dataW)
{                                       
WaitForEnable();               
LCM_RS=1;LCM_RW=0;_nop_();
DataPort=dataW;_nop_();        
LCM_EN=1;_nop_();_nop_();LCM_EN=0;
}               
/***********************************/
void InitLcd()                                
{                        
WriteCommandLCM(0x38,1);        
WriteCommandLCM(0x08,1);        
WriteCommandLCM(0x01,1);        
WriteCommandLCM(0x06,1);        
WriteCommandLCM(0x0c,1);
}                        
/***********************************/
void DisplayOneChar(uchar X,uchar Y,uchar DData)
{                                                
Y&=1;                                                
X&=15;                                                
if(Y)X|=0x40;                                       
X|=0x80;                        
WriteCommandLCM(X,0);               
WriteDataLCM(DData);               
}                                                

/**************************************
延時5微秒(STC90C52RC@12M)
不同的工作環(huán)境,需要調(diào)整此函數(shù)，注意時鐘過快時需要修改
當(dāng)改用1T的MCU時,請調(diào)整此延時函數(shù)
**************************************/
void Delay5us()
{
    _nop_();_nop_();_nop_();_nop_();
    _nop_();_nop_();_nop_();_nop_();
        _nop_();_nop_();_nop_();_nop_();
        _nop_();_nop_();_nop_();_nop_();
}

/**************************************
延時5毫秒(STC90C52RC@12M)
不同的工作環(huán)境,需要調(diào)整此函數(shù)
當(dāng)改用1T的MCU時,請調(diào)整此延時函數(shù)
**************************************/
void Delay5ms()
{
    WORD n = 560;

    while (n--);
}

/**************************************
起始信號
**************************************/
void BH1750_Start()
{
    SDA = 1;                    //拉高數(shù)據(jù)線
    SCL = 1;                    //拉高時鐘線
    Delay5us();                 //延時
    SDA = 0;                    //產(chǎn)生下降沿
    Delay5us();                 //延時
    SCL = 0;                    //拉低時鐘線
}

/**************************************
停止信號
**************************************/
void BH1750_Stop()
{
    SDA = 0;                    //拉低數(shù)據(jù)線
    SCL = 1;                    //拉高時鐘線
    Delay5us();                 //延時
    SDA = 1;                    //產(chǎn)生上升沿
    Delay5us();                 //延時
}

/**************************************
發(fā)送應(yīng)答信號
入口參數(shù):ack (0:ACK 1:NAK)
**************************************/
void BH1750_SendACK(bit ack)
{
    SDA = ack;                  //寫應(yīng)答信號
    SCL = 1;                    //拉高時鐘線
    Delay5us();                 //延時
    SCL = 0;                    //拉低時鐘線
    Delay5us();                 //延時
}

/**************************************
接收應(yīng)答信號
**************************************/
bit BH1750_RecvACK()
{
    SCL = 1;                    //拉高時鐘線
    Delay5us();                 //延時
    CY = SDA;                   //讀應(yīng)答信號
    SCL = 0;                    //拉低時鐘線
    Delay5us();                 //延時

    return CY;
}

/**************************************
向IIC總線發(fā)送一個字節(jié)數(shù)據(jù)
**************************************/
void BH1750_SendByte(BYTE dat)
{
    BYTE i;

    for (i=0; i<8; i++)         //8位計數(shù)器
    {
        dat <<= 1;              //移出數(shù)據(jù)的最高位
        SDA = CY;               //送數(shù)據(jù)口
        SCL = 1;                //拉高時鐘線
        Delay5us();             //延時
        SCL = 0;                //拉低時鐘線
        Delay5us();             //延時
    }
    BH1750_RecvACK();
}

/**************************************
從IIC總線接收一個字節(jié)數(shù)據(jù)
**************************************/
BYTE BH1750_RecvByte()
{
    BYTE i;
    BYTE dat = 0;

    SDA = 1;                    //使能內(nèi)部上拉,準(zhǔn)備讀取數(shù)據(jù),
    for (i=0; i<8; i++)         //8位計數(shù)器
    {
        dat <<= 1;
        SCL = 1;                //拉高時鐘線
        Delay5us();             //延時
        dat |= SDA;             //讀數(shù)據(jù)               
        SCL = 0;                //拉低時鐘線
        Delay5us();             //延時
    }
    return dat;
}

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

void Single_Write_BH1750(uchar REG_Address)
{
    BH1750_Start();                  //起始信號
    BH1750_SendByte(SlaveAddress);   //發(fā)送設(shè)備地址+寫信號
    BH1750_SendByte(REG_Address);    //內(nèi)部寄存器地址，
  //  BH1750_SendByte(REG_data);       //內(nèi)部寄存器數(shù)據(jù)，
    BH1750_Stop();                   //發(fā)送停止信號
}

//********單字節(jié)讀取*****************************************
/*
uchar Single_Read_BH1750(uchar REG_Address)
{  uchar REG_data;
    BH1750_Start();                          //起始信號
    BH1750_SendByte(SlaveAddress);           //發(fā)送設(shè)備地址+寫信號
    BH1750_SendByte(REG_Address);                   //發(fā)送存儲單元地址，從0開始        
    BH1750_Start();                          //起始信號
    BH1750_SendByte(SlaveAddress+1);         //發(fā)送設(shè)備地址+讀信號
    REG_data=BH1750_RecvByte();              //讀出寄存器數(shù)據(jù)
        BH1750_SendACK(1);   
        BH1750_Stop();                           //停止信號
    return REG_data;
}
*/
//*********************************************************
//
//連續(xù)讀出BH1750內(nèi)部數(shù)據(jù)
//
//*********************************************************
void Multiple_read_BH1750(void)
{   uchar i;        
    BH1750_Start();                          //起始信號
    BH1750_SendByte(SlaveAddress+1);         //發(fā)送設(shè)備地址+讀信號
        
         for (i=0; i<3; i++)                      //連續(xù)讀取2個地址數(shù)據(jù)，存儲中BUF
    {
        BUF[ i] = BH1750_RecvByte();          //BUF[0]存儲0x32地址中的數(shù)據(jù)
        if (i == 3)
        {

           BH1750_SendACK(1);                //最后一個數(shù)據(jù)需要回NOACK
        }
        else
        {               
          BH1750_SendACK(0);                //回應(yīng)ACK
       }
   }

    BH1750_Stop();                          //停止信號
    Delay5ms();
}


//初始化BH1750，根據(jù)需要請參考pdf進行修改****
void Init_BH1750()
{
   Single_Write_BH1750(0x01);  

}
//*********************************************************
//主程序********
//*********************************************************
void main()
{  
   float temp;
   delay_nms(100);            //延時100ms        
   InitLcd();           //初始化LCD
   Init_BH1750();       //初始化BH1750

  while(1)              //循環(huán)
  {

    Single_Write_BH1750(0x01);   // power on
    Single_Write_BH1750(0x10);   // H- resolution mode

     delay_nms(180);              //延時180ms

    Multiple_Read_BH1750();       //連續(xù)讀出數(shù)據(jù)，存儲在BUF中

    dis_data=BUF[0];
    dis_data=(dis_data<<8)+BUF[1];//合成數(shù)據(jù)，即光照數(shù)據(jù)

    temp=(float)dis_data/1.2;

    conversion(temp);         //計算數(shù)據(jù)和顯示
        DisplayOneChar(0,0,'L');
        DisplayOneChar(1,0,'i');
        DisplayOneChar(2,0,'g');
        DisplayOneChar(3,0,'h');
        DisplayOneChar(4,0,'t');
    DisplayOneChar(5,0,':');

    DisplayOneChar(7,0,wan); //顯示數(shù)據(jù)
    DisplayOneChar(8,0,qian);  
    DisplayOneChar(9,0,bai);
    DisplayOneChar(10,0,shi);
        DisplayOneChar(11,0,ge);

        DisplayOneChar(13,0,'l'); ////顯示數(shù)單位
        DisplayOneChar(14,0,'x');  

  }
}