BH1750FVI光強傳感器使用，單片機程序+電路圖

ID:195236 · 發(fā)表于 2017-8-12 05:23

BH1750FVI光強傳感器和51單片機接口的電路原理圖如下：

單片機源程序如下:

//***************************************
// 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=P3^4; //IIC時鐘引腳定義
sbit SDA=P3^5; //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); //單個讀取內(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ù)，注意時鐘過快時需要修改
當改用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ù)
當改用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)部上拉,準備讀取數(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)部寄存器地址，請參考中文pdf22頁
// BH1750_SendByte(REG_data); //內(nèi)部寄存器數(shù)據(jù)，請參考中文pdf22頁
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ù)讀取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); //回應(yīng)ACK
}
}
BH1750_Stop(); //停止信號
Delay5ms();
}
//初始化BH1750，根據(jù)需要請參考pdf進行修改****
void Init_BH1750()
{
Single_Write_BH1750(0x01);
}
//*********************************************************
//主程序********
//*********************************************************
void main()
{
float temp;
delay_nms(200); //延時200ms
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ù)
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');
DisplayOneChar(4,1,'x');
DisplayOneChar(5,1,'=');
DisplayOneChar(9,1,'y');
DisplayOneChar(10,1,'=');
if(temp>20&&temp<=40)
{
DisplayOneChar(2,1,'D');
DisplayOneChar(6,1,'4');
DisplayOneChar(7,1,'3');
DisplayOneChar(11,1,'2');
DisplayOneChar(12,1,'4');
}
if(temp>40&&temp<=60)
{
DisplayOneChar(2,1,'C');
DisplayOneChar(6,1,'8');
DisplayOneChar(7,1,'6');
DisplayOneChar(11,1,'2');
DisplayOneChar(12,1,'6');
}
if(temp>60&&temp<=80)
{
DisplayOneChar(2,1,'B');
DisplayOneChar(6,1,'9');
DisplayOneChar(7,1,'6');
DisplayOneChar(11,1,'1');
DisplayOneChar(12,1,'4');
}
if(temp>80&&temp<=100)
{
……………………
…………限于本文篇幅余下代碼請從51黑下載附件…………

復制代碼

所有資料51hei提供下載:

STC_BH1750光強模塊.zip (51.81 KB, 下載次數(shù): 380)

ID:312193 · 發(fā)表于 2018-4-20 11:59

感謝樓主，你在原理圖中標注的是gy-30和TSL2561的意思是這兩款光照傳感器都可以完全復制使用你的這個程序?qū)γ矗涌诮泳€完全一樣唄？

ID:312193 · 發(fā)表于 2018-4-20 12:10

還有就是，你的光強模塊，和P20的插口怎么都有兩個在原理圖中

ID:397106 · 發(fā)表于 2018-9-25 11:57

謝謝分享,原來需要用Keil2才能打開,終于成功打開了,編譯ok,后面慢慢研究代碼

ID:306812 · 發(fā)表于 2018-11-25 11:56

void Single_Write_BH1750(uchar REG_Address)
這下面的程序怎么運行的，有點看不懂？？？
樓主能不能講解一下

ID:463478 · 發(fā)表于 2019-1-7 09:47

想要自制一個照度傳感器。

ID:463478 · 發(fā)表于 2019-1-7 09:48

想知道如何自制一個照度傳感器。

ID:496131 · 發(fā)表于 2019-3-22 18:34

運行不了呀

ID:516348 · 發(fā)表于 2019-4-19 14:31

想知道采集的光強度是不是通過I2C傳單片機？（小白臉）

ID:585455 · 發(fā)表于 2019-7-22 21:50

感謝分享好資料，51黑有你更精彩!!!

ID:799167 · 發(fā)表于 2021-5-3 20:40

您好，我下載了你的附件，但是里面的工程文件需要用Keil那個版本來打開呢?

ID:925462 · 發(fā)表于 2021-5-22 16:27

只要是想看你的protel原理圖，程序我可以自己寫

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

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

BH1750FVI光強傳感器使用，單片機程序+電路圖

相關(guān)帖子

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

BH1750FVI光強傳感器使用，單片機程序+電路圖

相關(guān)帖子

BH1750FVI光強傳感器使用，單片機程序+電路圖