数字光强度+光照传感器BH1750FVI+模块+GY30 源程序 原理图和资料

kinidrily

数字光强度+光照传感器BH1750FVI+模块+GY30 源程序 原理图和资料
1 U5 \9 \0 @6 a- X% z7 \/ s& [
9 w# J; r' G. w0 Q$ J今天看到了，所以，发出来了,光强度模块客户资料:


( r2 M& N# w+ s" T


; c  q* p% e1 P0 j, l$ }( P. ]/*****************************************
$ G: g" l, V* h- r) I* 基于AVR单片机GY-30模块通信程序                  *
3 w) A/ T+ K, X( i) k& s* 功    能：IIC通信读取数据并显示        *
" L4 `- Y; X" L2 f; O* 时钟频率：内部11.0592M                                                  *
7 N" q& k; e- b, u6 f# _' X5 `. n% C* 设    计： 51黑电子论坛
# }% b% }  e  M* A1 j3 I* 编译环境：ICC-AVR7.14                                         *
7 p2 B) i& W" E: {- S, f$ t* 实验环境：ATmega16+1602                             *
7 t6 I' d, b# W* 使用端口：PC0,PC1,PC6,PC7,PA4~PA7          *
* 参    考：莫锦攀实验程序24c02读取实验  *
*****************************************/
: M  W1 v, B4 I7 A* I0 a#include <iom16v.h>
#include "I2C.h"
* p4 E0 `/ n; B! D9 t#include "1602.h"
) |: v7 ]  O" ~$ r% t4 ]( j* x$ F#include "delay.h"
void conversion(unsigned int i);
: G) F/ y# l& J7 T, l  ~# M( |unsigned char display[9]={0,0,0,0,0,' ','l','u','x'};//显示数据
3 a3 t1 w& R2 k+ {/ ?6 \* u- x: y/*********************************************
数据转换,十六进制数据转换成10进制
! c7 L8 C/ y) V3 M$ r输入十六进制范围：0x0000-0x270f（0-9999）
结果分成个十百千位，以ascii存入显示区
**********************************************/
9 F( I; [4 V. N5 n1 u3 c8 U+ X; Rvoid conversion(unsigned int i)  
4 D1 H! E# j/ [{  
           display[0]=i/10000+0x30 ;
    i=i%10000;    //取余运算
  |5 q" @$ b' ?8 t( W9 x. Z        display[1]=i/1000+0x30 ;
* O% q2 w* B5 p. {    i=i%1000;    //取余运算
    display[2]=i/100+0x30 ;
( s; ]1 b0 C& H/ @% N) ]- z    i=i%100;    //取余运算
6 j  t/ C. L6 }7 v! {7 l    display[3]=i/10+0x30 ;
    i=i%10;     //取余运算
    display[4]=i+0x30;  
" m" J# Q9 J, z/ f! [}
/*******************************
主程序
*******************************/
  f" L) {/ ]: F; Yvoid main(void)
8 Q4 G) @7 G* ]& e) R{        
# o  g. K! N5 ~; `/ ?        unsigned char i;
        float  lux_data;                   //光数据   
         
         delay_nms(10);                    //lcd上电延时
4 W. h% J, ?8 {$ v: U8 ~         LCD_init();                       //lcd初始化
     i=I2C_Write(0x01);                //BH1750 初始化            
         delay_nms(10);         
        while(1){                          //循环   
         i=I2C_Write(0x01);                //power on
( Z* D5 d; J6 M) m6 @" I         i=I2C_Write(0x10);                //H- resolution mode
         TWCR=0;                           //释放引脚
     delay_nms(180);                   //大约180ms
           if(i==0){
: z2 K7 Y% w' t% F             lux_data=I2C_Read();          //从iic总线读取数值        
# f# G  l: a6 g- V                 lux_data=(float)lux_data/1.2; //pdf文档第7页
( \6 W/ B+ L9 c5 u: y+ s             conversion(lux_data);         //数据转换出个，十，百，千 位      
                 LCD_write_string(7,0,display);//显示数值，从第9列开始   
           }  
+ J" g9 }& n+ b7 Z4 H- T    }
) Z8 [% d( N) _- F2 F}

  e0 f# l. @" r/ N" H
51单片机源程序（附件里面还有avr单片机的）：
//***************************************
// BH1750FVI IIC测试程序
// 使用单片机STC89C51
: v8 p- k) _$ }8 ^// 晶振：11.0592M
' g/ t0 C: ]. e! f0 b// 显示：LCD1602
2 O- @: T+ D: c2 k// 编译环境 Keil uVision2
// 参考宏晶网站24c04通信程序
2 x) o' L2 k4 L8 u7 T( I// 时间：2011年4月20日
- Y2 ~$ L& z5 [" n//****************************************
#include  <REG51.H>        
#include  <math.h>    //Keil library  
#include  <stdio.h>   //Keil library        
#include  <INTRINS.H>
#define   uchar unsigned char
#define   uint unsigned int        
( [2 C+ `: ?) D8 ^, n3 l#define   DataPort P0         //LCD1602数据端口
sbit          SCL=P1^0;      //IIC时钟引脚定义
- A' F- V. V" @2 K  tsbit            SDA=P1^1;      //IIC数据引脚定义
sbit      LCM_RS=P2^0;   //LCD1602命令端口               
sbit      LCM_RW=P2^1;   //LCD1602命令端口               
sbit      LCM_EN=P2^2;   //LCD1602命令端口
. Z. |# O+ T. x# d#define          SlaveAddress   0x46 //定义器件在IIC总线中的从地址,根据ALT  ADDRESS地址引脚不同修改
                              //ALT  ADDRESS引脚接地时地址为0xA6，接电源时地址为0x3A
' I) l  m+ W) S( U7 P" y! }typedef   unsigned char BYTE;
typedef   unsigned short WORD;
BYTE    BUF[8];                         //接收数据缓存区              
: E" w) y& |& ~uchar   ge,shi,bai,qian,wan;            //显示变量
int     dis_data;                       //变量
- D2 d/ Y/ }5 W6 R( x" q5 k# Nvoid delay_nms(unsigned int k);
$ p# m4 _8 _  T/ Kvoid InitLcd();
! B" r. B4 t0 ^  h) \$ @, Kvoid Init_BH1750(void);
void WriteDataLCM(uchar dataW);
void WriteCommandLCM(uchar CMD,uchar Attribc);
void DisplayOneChar(uchar X,uchar Y,uchar DData);
# ~9 _" ]( p& h0 b+ T! Uvoid conversion(uint temp_data);
void  Single_Write_BH1750(uchar REG_Address);               //单个写入数据
6 U, T: q+ F: F( Quchar Single_Read_BH1750(uchar REG_Address);                //单个读取内部寄存器数据
void  Multiple_Read_BH1750();                               //连续的读取内部寄存器数据
//------------------------------------
; b8 |  J# W% J. R* |1 m1 E2 a6 n$ x8 rvoid Delay5us();
void Delay5ms();
void BH1750_Start();                    //起始信号
8 W0 {+ F) ?3 ~, S! m6 e1 C( Bvoid BH1750_Stop();                     //停止信号
6 \8 O! A9 \6 F# `void BH1750_SendACK(bit ack);           //应答ACK
; h* Z6 L9 k8 D" Qbit  BH1750_RecvACK();                  //读ack
void BH1750_SendByte(BYTE dat);         //IIC单个字节写
BYTE BH1750_RecvByte();                 //IIC单个字节读
( h& z# G7 E, E* }: h: T3 w9 z//-----------------------------------
//*********************************************************
( x- B1 u1 V# j% f% N0 X1 Yvoid conversion(uint temp_data)  //  数据转换出 个，十，百，千，万
$ M2 {0 q9 u) y$ B  T1 d{  
    wan=temp_data/10000+0x30 ;
    temp_data=temp_data%10000;   //取余运算
6 p) B" [' C& j, z3 A        qian=temp_data/1000+0x30 ;
* F& M' l; C' u+ F    temp_data=temp_data%1000;    //取余运算
9 [+ K5 ]' J; M+ {% c0 E  M- Q    bai=temp_data/100+0x30   ;
    temp_data=temp_data%100;     //取余运算
    shi=temp_data/10+0x30    ;
, l- |7 G# L6 m1 B" w% H1 I  G    temp_data=temp_data%10;      //取余运算
: |( ?4 |9 W1 j& M6 b: ^    ge=temp_data+0x30;         
}
6 e2 v/ j7 S0 w1 ]//毫秒延时**************************
void delay_nms(unsigned int k)        
{                                                
4 x" i) W" p1 @8 o8 Zunsigned int i,j;                                
for(i=0;i<k;i++)
{                        
for(j=0;j<121;j++)                        
{;}}                                                
! O& O% k. L$ y! {3 P}
# `9 g2 |% a2 g5 G" p. s/*******************************/
* B1 J7 X) C7 P% @$ |void WaitForEnable(void)        
{                                       
DataPort=0xff;               
) [% R, j: Z: [+ q" ]LCM_RS=0;LCM_RW=1;_nop_();
: S: U% r% K9 ^2 x  }) j. Z$ Q/ \LCM_EN=1;_nop_();_nop_();
) v& F! k5 K/ a  }0 r) @# s) U/ f" e2 @while(DataPort&0x80);        
8 s6 G2 ^5 _  t5 K3 L! A1 ^) D  ^LCM_EN=0;                                
3 t/ Z; C) t$ Q+ m+ Z9 {2 Q% A4 k}                                       
/*******************************/
" Q7 E2 J2 v/ j, k2 Avoid WriteCommandLCM(uchar CMD,uchar Attribc)
4 h, P6 u% Y! w9 D# g{                                       
, h4 z+ R( d8 C3 Qif(Attribc)WaitForEnable();        
- N5 N; ~/ M- Z6 `4 {3 a$ i2 p+ M& }LCM_RS=0;LCM_RW=0;_nop_();
# ^' J0 [2 H: v1 H( {! gDataPort=CMD;_nop_();        
LCM_EN=1;_nop_();_nop_();LCM_EN=0;
}                                       
* G/ V! |6 v6 b' p, z/*******************************/
void WriteDataLCM(uchar dataW)
' l: I+ O4 Y0 k. ?4 Q, V{                                       
9 M$ C3 _8 d. z# r" qWaitForEnable();               
LCM_RS=1;LCM_RW=0;_nop_();
DataPort=dataW;_nop_();        
LCM_EN=1;_nop_();_nop_();LCM_EN=0;
  I4 R' U; d7 v* Q3 V% |, Z}               
/***********************************/
; ~8 O- U# t6 i, x9 @; P- ^" Hvoid InitLcd()                                
- z+ c5 G4 i* e, ~% ]% t{                        
" Z% B; w6 u( U' E$ G/ cWriteCommandLCM(0x38,1);        
+ Y6 z8 a) L/ QWriteCommandLCM(0x08,1);        
; c, {7 {: k% E$ n% c! {3 \0 l0 oWriteCommandLCM(0x01,1);        
WriteCommandLCM(0x06,1);        
2 M' A: D1 \' a- K/ a. fWriteCommandLCM(0x0c,1);
5 e- X0 A9 h: {" y: {}                        
/***********************************/
void DisplayOneChar(uchar X,uchar Y,uchar DData)
9 _' f8 e! F0 s* o1 a- L% d{                                                
' _% }) f! V) k5 w0 u/ G9 tY&=1;                                                
X&=15;                                                
) S" R' L8 S2 S+ }* l* h1 O7 Z4 l  Mif(Y)X|=0x40;                                       
  B, W, ^5 S" q+ {2 o" DX|=0x80;                        
) M& u; K0 D& l) x" u/ r/ v3 DWriteCommandLCM(X,0);               
% n9 q4 ^+ B" `- WWriteDataLCM(DData);               
}                                                
- W. R: O, u( ~1 g! R- P& @/**************************************
延时5微秒(STC90C52RC@12M)
不同的工作环境,需要调整此函数，注意时钟过快时需要修改
当改用1T的mcu时,请调整此延时函数
) S+ B" a7 V' h( e5 b/ p**************************************/
, a$ F  l3 H3 B8 p& ~0 Ivoid Delay5us()
{
8 i8 [1 N# l5 b: [    _nop_();_nop_();_nop_();_nop_();
    _nop_();_nop_();_nop_();_nop_();
        _nop_();_nop_();_nop_();_nop_();
' ]4 `" s( H! c1 Q# J        _nop_();_nop_();_nop_();_nop_();
}
/**************************************
延时5毫秒(STC90C52RC@12M)
不同的工作环境,需要调整此函数
当改用1T的MCU时,请调整此延时函数
$ I% \3 e6 V/ H, v3 f**************************************/
void Delay5ms()
# o. U! ^2 `/ F$ o* ~& O  M{
" [0 J" u" J& Z( _3 x    WORD n = 560;
/ ~, j: @2 ^' [; B; x- _% B    while (n--);
}
/**************************************
起始信号
( Q: L0 u6 K* w**************************************/
void BH1750_Start()
{
% E1 m) @# {- A9 d    SDA = 1;                    //拉高数据线
6 O% v8 J5 J* S6 [6 \/ n    SCL = 1;                    //拉高时钟线
; c7 A3 L1 o5 ]( [- F    Delay5us();                 //延时
    SDA = 0;                    //产生下降沿
    Delay5us();                 //延时
  }7 B% _+ w* ^1 F. d, T    SCL = 0;                    //拉低时钟线
}
: x3 M/ h; ?5 l/**************************************
: ]! O/ F% y. S9 t. f1 n8 N停止信号
**************************************/
2 R. e' m7 |- H( _# o2 E9 mvoid BH1750_Stop()
{
  ^! v" i; B  \: u& Q, O    SDA = 0;                    //拉低数据线
    SCL = 1;                    //拉高时钟线
. w3 b5 b3 c' ^0 a- s% G4 ?# o5 H' V    Delay5us();                 //延时
    SDA = 1;                    //产生上升沿
    Delay5us();                 //延时
}
- O8 l% U$ H, w% S  s% M/**************************************
发送应答信号
入口参数:ack (0:ACK 1:NAK)
' z7 A" w. n  N/ h1 {9 I**************************************/
void BH1750_SendACK(bit ack)
3 d- I+ U. j" {- Z% o{
/ I9 |. Y2 _6 Y. ~+ \    SDA = ack;                  //写应答信号
    SCL = 1;                    //拉高时钟线
    Delay5us();                 //延时
& A# ]4 u* \; w    SCL = 0;                    //拉低时钟线
    Delay5us();                 //延时
; x, S3 K$ \& ]" B) t7 c4 v2 K}
/**************************************
/ J, ~5 _3 y' w接收应答信号
: q! V' t0 d; e+ [/ p**************************************/
bit BH1750_RecvACK()
{
    SCL = 1;                    //拉高时钟线
    Delay5us();                 //延时
    CY = SDA;                   //读应答信号
0 M5 U4 T' A0 n, I" `    SCL = 0;                    //拉低时钟线
1 Z3 J' V) P: C& D    Delay5us();                 //延时
. P5 {# u8 i& P5 T    return CY;
}
( F) n: T6 s, v) u/ q! D/**************************************
向IIC总线发送一个字节数据
**************************************/
void BH1750_SendByte(BYTE dat)
& F" }7 c! j' a0 B2 ]$ ?2 x% n{
6 s/ Y! @7 t5 d    BYTE i;
- Q; s5 ]* n. C: n# p: V8 v    for (i=0; i<8; i++)         //8位计数器
3 S2 M2 K8 p6 ^- [    {
        dat <<= 1;              //移出数据的最高位
        SDA = CY;               //送数据口
        SCL = 1;                //拉高时钟线
; R4 @! C: F  o8 l+ p( J6 j        Delay5us();             //延时
        SCL = 0;                //拉低时钟线
" p1 D* b/ B* L9 p0 y( F" x        Delay5us();             //延时
    }
    BH1750_RecvACK();
}
/**************************************
4 l) L$ |' _8 E! o2 P& P从IIC总线接收一个字节数据
. m" |5 u" R2 M- ~! Z* K**************************************/
2 {* x+ Z' E8 @* ^BYTE BH1750_RecvByte()
{
; m# h4 I, e7 X' v    BYTE i;
    BYTE dat = 0;
    SDA = 1;                    //使能内部上拉,准备读取数据,
    for (i=0; i<8; i++)         //8位计数器
$ ^3 ]$ J+ X7 }4 M7 F, Z' y    {
        dat <<= 1;
" p9 [5 L& p+ f4 w9 v' r0 j        SCL = 1;                //拉高时钟线
        Delay5us();             //延时
        dat |= SDA;             //读数据               
        SCL = 0;                //拉低时钟线
        Delay5us();             //延时
    }
    return dat;
}
  X/ W/ x" w0 U& I//*********************************
void Single_Write_BH1750(uchar REG_Address)
{
    BH1750_Start();                  //起始信号
7 W& F1 R# m9 k    BH1750_SendByte(SlaveAddress);   //发送设备地址+写信号
    BH1750_SendByte(REG_Address);    //内部寄存器地址，请参考中文pdf22页
  //  BH1750_SendByte(REG_data);       //内部寄存器数据，请参考中文pdf22页
9 n  ^6 x' [( K; V' i2 C    BH1750_Stop();                   //发送停止信号
/ X( @9 U8 t2 `2 P7 H5 C}
  f4 S5 h0 ~) A% U  N7 g& e//********单字节读取*****************************************
3 r% S* f1 H/ _  o/*
( Z3 G, Y; E& x. L! h3 `uchar Single_Read_BH1750(uchar REG_Address)
{  uchar REG_data;
, |' r# V1 J0 |; Q* H    BH1750_Start();                          //起始信号
    BH1750_SendByte(SlaveAddress);           //发送设备地址+写信号
    BH1750_SendByte(REG_Address);                   //发送存储单元地址，从0开始        
1 \# K+ ~/ I( f+ o    BH1750_Start();                          //起始信号
4 z- _0 g% q" K1 T' P! _0 P, x    BH1750_SendByte(SlaveAddress+1);         //发送设备地址+读信号
, k) O, M$ I2 E    REG_data=BH1750_RecvByte();              //读出寄存器数据
- L* d% ~! v# ]6 W( h0 \        BH1750_SendACK(1);   
        BH1750_Stop();                           //停止信号
    return REG_data;
}
*/
$ W/ O$ c* }5 ?% ]: T# r//*********************************************************
' Y3 D6 T9 X, E) o7 ?$ p//
//连续读出BH1750内部数据
* z( z; f7 A" F6 a//
+ U$ b' v0 u: f; r1 f* @//*********************************************************
* Q2 C* D4 h# }( m0 H# mvoid Multiple_read_BH1750(void)
) h& P- W! L( P{   uchar i;        
    BH1750_Start();                          //起始信号
    BH1750_SendByte(SlaveAddress+1);         //发送设备地址+读信号
3 I& A) e, _' Y( g        
7 h7 c  ]1 b& ^0 {3 u; Q         for (i=0; i<3; i++)                      //连续读取6个地址数据，存储中BUF
. K5 R! \+ Q$ l    {
        BUF = BH1750_RecvByte();          //BUF[0]存储0x32地址中的数据
3 W% @/ T0 f9 R8 {, O        if (i == 3)
        {
           BH1750_SendACK(1);                //最后一个数据需要回NOACK
& O8 Y6 m+ o  O- N- g, V        }
, B* L2 b& e5 ^        else
        {               
' B3 ]  S7 r) s6 w) m9 C) m          BH1750_SendACK(0);                //回应ACK
       }
" _5 J# @* Q) Q5 o" J6 b- l. R   }
1 S- v/ v. w1 d# p6 J    BH1750_Stop();                          //停止信号
    Delay5ms();
  j2 q2 ?2 I2 M5 l, J: f}
, g4 r  }( W0 y8 O: I
//初始化BH1750，根据需要请参考pdf进行修改****
void Init_BH1750()
! S' G/ U% D2 n1 h
" Q/ Y/ O$ w: z( f…………限于本文篇幅 余下代码请从论坛下载附件…………
7 M6 J/ D! C7 i( u3 _$ e' \

游客，如果您要查看本帖隐藏内容请回复

helendcany

看着不错

shijqyx

不错有用参考一下
  ~/ Y. Z; |% ?5 {1 C0 L) m3 n

yao1997

谢谢大佬，学习一下

mengyanghe

666666666666666666666666

4 L3 Z' S9 P3 w$ f! N- v4 N2 u

jadefoxeda

感谢分享

林臭弟

不错有用参考一下

林臭弟

.。。。。。。。。。。。。。

MayXL

不错有用参考一下

MayXL

不错有用参考一下

c29

11111111111111111111111111111111111111