[Realplay]數(shù)字光強度+光照傳感器BH1750FVI+模塊+GY30 源程序原理圖等資料下載

ID:195681 · 發(fā)表于 2017-5-2 17:56

今天看到了，所以，發(fā)出來了,光強度模塊客戶資料:

/*****************************************
* 基于AVR單片機GY-30模塊通信程序 *
* 功能：IIC通信讀取數(shù)據(jù)并顯示 *
* 時鐘頻率：內部11.0592M *
* 設計： 51黑電子論壇
* 編譯環(huán)境：ICC-AVR7.14 *
* 實驗環(huán)境：ATmega16+1602 *
* 使用端口：PC0,PC1,PC6,PC7,PA4~PA7 *
* 參考：莫錦攀實驗程序24c02讀取實驗 *
*****************************************/
#include <iom16v.h>
#include "I2C.h"
#include "1602.h"
#include "delay.h"
void conversion(unsigned int i);
unsigned char display[9]={0,0,0,0,0,' ','l','u','x'};//顯示數(shù)據(jù)
/*********************************************
數(shù)據(jù)轉換,十六進制數(shù)據(jù)轉換成10進制
輸入十六進制范圍：0x0000-0x270f（0-9999）
結果分成個十百千位，以ascii存入顯示區(qū)
**********************************************/
void conversion(unsigned int i)
{
display[0]=i/10000+0x30 ;
i=i%10000; //取余運算
display[1]=i/1000+0x30 ;
i=i%1000; //取余運算
display[2]=i/100+0x30 ;
i=i%100; //取余運算
display[3]=i/10+0x30 ;
i=i%10; //取余運算
display[4]=i+0x30;
}
/*******************************
主程序
*******************************/
void main(void)
{
unsigned char i;
float lux_data; //光數(shù)據(jù)
delay_nms(10); //lcd上電延時
LCD_init(); //lcd初始化
i=I2C_Write(0x01); //BH1750 初始化
delay_nms(10);
while(1){ //循環(huán)
i=I2C_Write(0x01); //power on
i=I2C_Write(0x10); //H- resolution mode
TWCR=0; //釋放引腳
delay_nms(180); //大約180ms
if(i==0){
lux_data=I2C_Read(); //從iic總線讀取數(shù)值
lux_data=(float)lux_data/1.2; //pdf文檔第7頁
conversion(lux_data); //數(shù)據(jù)轉換出個，十，百，千位
LCD_write_string(7,0,display);//顯示數(shù)值，從第9列開始
}
}
}

復制代碼

51單片機源程序（51 hei附件里面還有avr單片機的）：

//***************************************
// BH1750FVI IIC測試程序
// 使用單片機STC89C51
// 晶振：11.0592M
// 顯示：LCD1602
// 編譯環(huán)境 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數(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引腳接地時地址為0xA6，接電源時地址為0x3A
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); //單個讀取內部寄存器數(shù)據(jù)
void Multiple_Read_BH1750(); //連續(xù)的讀取內部寄存器數(shù)據(jù)
//------------------------------------
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單個字節(jié)寫
BYTE BH1750_RecvByte(); //IIC單個字節(jié)讀
//-----------------------------------
//*********************************************************
void conversion(uint temp_data) // 數(shù)據(jù)轉換出個，十，百，千，萬
{
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)境,需要調整此函數(shù)，注意時鐘過快時需要修改
當改用1T的MCU時,請調整此延時函數(shù)
**************************************/
void Delay5us()
{
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
}
/**************************************
延時5毫秒(STC90C52RC@12M)
不同的工作環(huán)境,需要調整此函數(shù)
當改用1T的MCU時,請調整此延時函數(shù)
**************************************/
void Delay5ms()
{
WORD n = 560;
while (n--);
}
/**************************************
起始信號
**************************************/
void BH1750_Start()
{
SDA = 1; //拉高數(shù)據(jù)線
SCL = 1; //拉高時鐘線
Delay5us(); //延時
SDA = 0; //產生下降沿
Delay5us(); //延時
SCL = 0; //拉低時鐘線
}
/**************************************
停止信號
**************************************/
void BH1750_Stop()
{
SDA = 0; //拉低數(shù)據(jù)線
SCL = 1; //拉高時鐘線
Delay5us(); //延時
SDA = 1; //產生上升沿
Delay5us(); //延時
}
/**************************************
發(fā)送應答信號
入口參數(shù):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總線發(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; //使能內部上拉,準備讀取數(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ā)送設備地址+寫信號
BH1750_SendByte(REG_Address); //內部寄存器地址，請參考中文pdf22頁
// BH1750_SendByte(REG_data); //內部寄存器數(shù)據(jù)，請參考中文pdf22頁
BH1750_Stop(); //發(fā)送停止信號
}
//********單字節(jié)讀取*****************************************
/*
uchar Single_Read_BH1750(uchar REG_Address)
{ uchar REG_data;
BH1750_Start(); //起始信號
BH1750_SendByte(SlaveAddress); //發(fā)送設備地址+寫信號
BH1750_SendByte(REG_Address); //發(fā)送存儲單元地址，從0開始
BH1750_Start(); //起始信號
BH1750_SendByte(SlaveAddress+1); //發(fā)送設備地址+讀信號
REG_data=BH1750_RecvByte(); //讀出寄存器數(shù)據(jù)
BH1750_SendACK(1);
BH1750_Stop(); //停止信號
return REG_data;
}
*/
//*********************************************************
//
//連續(xù)讀出BH1750內部數(shù)據(jù)
//
//*********************************************************
void Multiple_read_BH1750(void)
{ uchar i;
BH1750_Start(); //起始信號
BH1750_SendByte(SlaveAddress+1); //發(fā)送設備地址+讀信號
for (i=0; i<3; i++) //連續(xù)讀取6個地址數(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); //回應ACK
}
}
BH1750_Stop(); //停止信號
Delay5ms();
}
//初始化BH1750，根據(jù)需要請參考pdf進行修改****
void Init_BH1750()
…………限于本文篇幅余下代碼請從51黑下載附件…………

復制代碼

完整資料下載：

【Realplay】數(shù)字光強度光照傳感器BH1750FVI 模塊 GY-30 .rar (865.93 KB, 下載次數(shù): 237)

ID:197437 · 發(fā)表于 2017-5-7 13:32

為什么51的程序，lcd只顯示 light：00000lx ？大神

ID:197437 · 發(fā)表于 2017-5-7 13:33

大神，為什么只顯示 00000lx

ID:199188 · 發(fā)表于 2017-5-10 20:36

非常好，正好學習下

ID:199807 · 發(fā)表于 2017-5-12 04:32

這個文件不錯，很有用

ID:82765 · 發(fā)表于 2017-5-12 06:05

提示: 作者被禁止或刪除內容自動屏蔽

ID:212234 · 發(fā)表于 2017-6-18 12:56

可不可以把你寫這個程序的流程圖發(fā)我看下

ID:242975 · 發(fā)表于 2017-10-25 22:54

謝謝分享，謝謝分享。

ID:288263 · 發(fā)表于 2018-3-6 16:11

ZC416 發(fā)表于 2017-5-7 13:33
大神，為什么只顯示 00000lx

我的也是，，求指教

ID:305775 · 發(fā)表于 2018-4-12 12:22

程序只顯示00000LX 按復位才能顯示數(shù)據(jù) 數(shù)據(jù)也不隨光強的改變而改變只是每按一次復位鍵光強改變一次大神求解

ID:389893 · 發(fā)表于 2018-9-13 19:55

ZC416 發(fā)表于 2017-5-7 13:32
為什么51的程序，lcd只顯示 light：00000lx ？大神

你們能編譯成功？為什么的編譯都編譯不了

ID:389893 · 發(fā)表于 2018-9-13 19:57

51的為什么我編譯不了

ID:715369 · 發(fā)表于 2020-4-6 10:24

protues可以仿真嗎？

帳號		自動登錄	找回密碼
密碼			立即注冊

ID:82765 當前離線積分 1420	ID:82765 發(fā)表于 2017-5-12 06:05 \| 顯示全部樓層提示: 作者被禁止或刪除內容自動屏蔽
ID:82765 當前離線積分 1420
	回復使用道具舉報

[Realplay]數(shù)字光強度+光照傳感器BH1750FVI+模塊+GY30 源程序 原理圖等資料下載

相關帖子

[Realplay]數(shù)字光強度+光照傳感器BH1750FVI+模塊+GY30 源程序原理圖等資料下載