久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 13886|回復: 5
打印 上一主題 下一主題
收起左側

BH1750FVI數字光線強度傳感器 51單片機源程序

[復制鏈接]
跳轉到指定樓層
樓主
ID:90014 發表于 2015-9-13 20:25 | 只看該作者 回帖獎勵 |倒序瀏覽 |閱讀模式

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

// BH1750FVI IIC測試程序
// 使用單片機STC89C51
// 晶振:11.0592M
// 顯示:LCD1602
// 編譯環境 Keil uVision2
// 參考宏晶網站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數據端口
sbit          SCL=P1^0;      //IIC時鐘引腳定義
sbit            SDA=P1^1;      //IIC數據引腳定義
sbit      LCM_RS=P2^0;   //LCD1602命令端口               
sbit      LCM_RW=P2^1;   //LCD1602命令端口               
sbit      LCM_EN=P2^2;   //LCD1602命令端口

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

BYTE    BUF[8];                         //接收數據緩存區              
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);               //單個寫入數據
uchar Single_Read_BH1750(uchar REG_Address);                //單個讀取內部寄存器數據
void  Multiple_Read_BH1750();                               //連續的讀取內部寄存器數據
//------------------------------------
void Delay5us();
void Delay5ms();
void BH1750_Start();                    //起始信號
void BH1750_Stop();                     //停止信號
void BH1750_SendACK(bit ack);           //應答ACK
bit  BH1750_RecvACK();                  //讀ack
void BH1750_SendByte(BYTE dat);         //IIC單個字節寫
BYTE BH1750_RecvByte();                 //IIC單個字節讀

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

//*********************************************************
void conversion(uint temp_data)  //  數據轉換出 個,十,百,千,萬
{  
    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)
不同的工作環境,需要調整此函數,注意時鐘過快時需要修改
當改用1T的MCU時,請調整此延時函數
**************************************/
void Delay5us()
{
    _nop_();_nop_();_nop_();_nop_();
    _nop_();_nop_();_nop_();_nop_();
        _nop_();_nop_();_nop_();_nop_();
        _nop_();_nop_();_nop_();_nop_();
}

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

    while (n--);
}

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

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

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

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

    return CY;
}

/**************************************
向IIC總線發送一個字節數據
**************************************/
void BH1750_SendByte(BYTE dat)
{
    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()
{
    BYTE i;
    BYTE dat = 0;

    SDA = 1;                    //使能內部上拉,準備讀取數據,
    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_Address)
{
    BH1750_Start();                  //起始信號
    BH1750_SendByte(SlaveAddress);   //發送設備地址+寫信號
    BH1750_SendByte(REG_Address);    //內部寄存器地址,
  //  BH1750_SendByte(REG_data);       //內部寄存器數據,
    BH1750_Stop();                   //發送停止信號
}

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

           BH1750_SendACK(1);                //最后一個數據需要回NOACK
        }
        else
        {               
          BH1750_SendACK(0);                //回應ACK
       }
   }

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


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

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

  while(1)              //循環
  {

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

     delay_nms(180);              //延時180ms

    Multiple_Read_BH1750();       //連續讀出數據,存儲在BUF中

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

    temp=(float)dis_data/1.2;

    conversion(temp);         //計算數據和顯示
        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); //顯示數據
    DisplayOneChar(8,0,qian);  
    DisplayOneChar(9,0,bai);
    DisplayOneChar(10,0,shi);
        DisplayOneChar(11,0,ge);

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

  }
}



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

使用道具 舉報

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

使用道具 舉報

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

使用道具 舉報

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

使用道具 舉報

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

使用道具 舉報

6#
ID:516348 發表于 2019-4-19 14:34 | 只看該作者
這個后面接一個pwm調光該怎么改程序?求教
回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

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

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板: 午夜电影福利 | 最新免费视频 | 天天天操天天天干 | 91精品国产91久久久久久三级 | 欧美日韩综合一区 | 欧美激情一区二区 | 欧美精品一二区 | 免费久久精品 | 91精品无人区卡一卡二卡三 | 18性欧美| 日韩在线高清 | 亚洲激情一级片 | 国产精品美女久久久免费 | 欧美日韩在线免费观看 | 国产电影一区二区 | 亚洲精品一区二区三区在线 | 亚洲国产精品成人久久久 | 日韩喷潮| 亚洲精品在线免费播放 | 欧美日韩大片 | 欧美亚洲视频在线观看 | 日韩在线播放中文字幕 | 黄色大片视频 | 黄色在线免费观看视频网站 | av一二三区 | 一区精品视频在线观看 | 羞羞午夜| 国产一区二区不卡 | 一区二区三区四区在线 | 久久一二三区 | 久久夜视频 | 国产精品久久久久久亚洲调教 | aaa在线观看 | 日韩欧美成人精品 | 欧美一区二区久久 | 国产精品免费观看 | 欧美成人精品激情在线观看 | 成人免费一区二区三区视频网站 | 久久久久久免费毛片精品 | 午夜精品久久久久久久99黑人 | 色噜噜狠狠色综合中国 |