找回密碼
 立即注冊(cè)

QQ登錄

只需一步,快速開(kāi)始

搜索
查看: 13919|回復(fù): 5
打印 上一主題 下一主題
收起左側(cè)

BH1750FVI數(shù)字光線強(qiáng)度傳感器 51單片機(jī)源程序

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:90014 發(fā)表于 2015-9-13 20:25 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式

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

// BH1750FVI IIC測(cè)試程序
// 使用單片機(jī)STC89C51
// 晶振:11.0592M
// 顯示:LCD1602
// 編譯環(huán)境 Keil uVision2
// 參考宏晶網(wǎng)站24c04通信程序
// 時(shí)間: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時(shí)鐘引腳定義
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引腳接地時(shí)地址為0x46,接電源時(shí)地址為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);               //單個(gè)寫入數(shù)據(jù)
uchar Single_Read_BH1750(uchar REG_Address);                //單個(gè)讀取內(nèi)部寄存器數(shù)據(jù)
void  Multiple_Read_BH1750();                               //連續(xù)的讀取內(nèi)部寄存器數(shù)據(jù)
//------------------------------------
void Delay5us();
void Delay5ms();
void BH1750_Start();                    //起始信號(hào)
void BH1750_Stop();                     //停止信號(hào)
void BH1750_SendACK(bit ack);           //應(yīng)答ACK
bit  BH1750_RecvACK();                  //讀ack
void BH1750_SendByte(BYTE dat);         //IIC單個(gè)字節(jié)寫
BYTE BH1750_RecvByte();                 //IIC單個(gè)字節(jié)讀

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

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

//毫秒延時(shí)**************************
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);               
}                                                

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

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

    while (n--);
}

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

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

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

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

    return CY;
}

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

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

/**************************************
從IIC總線接收一個(gè)字節(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位計(jì)數(shù)器
    {
        dat <<= 1;
        SCL = 1;                //拉高時(shí)鐘線
        Delay5us();             //延時(shí)
        dat |= SDA;             //讀數(shù)據(jù)               
        SCL = 0;                //拉低時(shí)鐘線
        Delay5us();             //延時(shí)
    }
    return dat;
}

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

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

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

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

    BH1750_Stop();                          //停止信號(hào)
    Delay5ms();
}


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

}
//*********************************************************
//主程序********
//*********************************************************
void main()
{  
   float temp;
   delay_nms(100);            //延時(shí)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);              //延時(shí)180ms

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

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

    temp=(float)dis_data/1.2;

    conversion(temp);         //計(jì)算數(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');  

  }
}



分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏1 分享淘帖 頂1 踩
回復(fù)

使用道具 舉報(bào)

沙發(fā)
ID:138784 發(fā)表于 2016-9-18 16:26 | 只看該作者
為什么顯示00000???
回復(fù)

使用道具 舉報(bào)

板凳
ID:197437 發(fā)表于 2017-5-7 10:01 | 只看該作者
為什么顯示00000???
回復(fù)

使用道具 舉報(bào)

地板
ID:18572 發(fā)表于 2017-5-7 11:42 | 只看該作者
謝謝!這個(gè)可以用
回復(fù)

使用道具 舉報(bào)

5#
ID:197437 發(fā)表于 2017-5-7 14:39 | 只看該作者
大神,為啥我的顯示數(shù)字都是0?懵逼
回復(fù)

使用道具 舉報(bào)

6#
ID:516348 發(fā)表于 2019-4-19 14:34 | 只看該作者
這個(gè)后面接一個(gè)pwm調(diào)光該怎么改程序?求教
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表