標(biāo)題:
51單片機+BH1750FVI制作的智能樓道燈光系統(tǒng)源程序
[打印本頁]
作者:
qq296264785
時間:
2021-3-22 20:43
標(biāo)題:
51單片機+BH1750FVI制作的智能樓道燈光系統(tǒng)源程序
51單片機制作的智能樓道燈光系統(tǒng)
本系統(tǒng)采用51單片機為主要控制器,通過BH1750FVI傳感器采集光照強度、HC-SR501監(jiān)控用戶行為,通過一些外圍電路以及接口具設(shè)計具有以下功能的走廊智能控制系統(tǒng):
1、人來燈亮,人走燈滅;
2、能根據(jù)環(huán)境光照強度來調(diào)節(jié)燈照亮度;
3、節(jié)約設(shè)計成本,減少能源消耗。
整個系統(tǒng)設(shè)計可以分為三個大的模塊:光照度采集,人體活動軌跡采集,系統(tǒng)控制與邏輯處理。
BH1750FVI是一款數(shù)字型光強度傳感器集成芯片,內(nèi)部由光敏二極管、運算放大器、ADC采集和晶振等組成,光敏二極管通過光生伏特效應(yīng)將光照強度轉(zhuǎn)換成電信號,通過運算放大電路放大后,由ADC采集電壓,然后通過邏輯電路轉(zhuǎn)換成16位二進制數(shù)字信號存儲。BH1750FVI支持IIC協(xié)議,單片機通過IIC通訊可以選擇BH1750FVI的工作模式以及讀取16位的光照度數(shù)據(jù)。
HC-SR501是基于紅外技術(shù)的自動化控制模塊,采用LHI788探頭,靈敏度高,可靠性強,低電壓工作模式。探測范圍內(nèi)檢測到人體活動輸出高電平,人體離開之后延遲一段時間之后輸出低電平,使用簡單。
制作出來的實物圖如下:
23.png
(331.32 KB, 下載次數(shù): 52)
下載附件
2021-3-22 20:40 上傳
單片機源程序如下:
#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 SlaveAddress 0x46 //定義器件在IIC總線中的從地址,根據(jù)ALT ADDRESS地址引腳不同修改
//----------------------------------- //ALT ADDRESS引腳接地時地址為0x46,接電源時地址為0xB8
sbit SCL=P1^4; //IIC時鐘引腳定義
sbit SDA=P1^3; //IIC數(shù)據(jù)引腳定義
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 Init_BH1750(void);
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é)讀
//-----------------------------------
//*****************************************************//
/*紅外探測器檢測到有人就開燈,燈的亮度根據(jù)光照強度探****/
/*測器反饋回來的lux值來確定,燈的亮度通過PWM來控制******/
//*****************************************************//
uchar time,zkb; //定時器中斷次數(shù),zkb PWM占空比,高電平時間
sbit PWM=P1^0; //燈光控制引腳
sbit SR501_IO=P1^1; //紅外探測器反饋引腳
//毫秒延時**************************
void delay_nms(unsigned int k)
{
unsigned int i,j;
for(i=0;i<k;i++)
{
for(j=0;j<121;j++)
{;}}
}
/**************************************
延時5微秒
不同的工作環(huán)境,需要調(diào)整此函數(shù),注意時鐘過快時需要修改
當(dāng)改用1T的MCU時,請調(diào)整此延時函數(shù)
**************************************/
void Delay5us()
{
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
}
/**************************************
延時5毫秒
不同的工作環(huán)境,需要調(diào)整此函數(shù)
當(dāng)改用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)部上拉,準(zhǔn)備讀取數(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)部寄存器地址,
// BH1750_SendByte(REG_data); //內(nèi)部寄存器數(shù)據(jù),
BH1750_Stop(); //發(fā)送停止信號
}
//*********************************************************
//
//連續(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ù)讀取2個地址數(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(100); //延時100ms
Init_BH1750(); //初始化BH1750
TMOD=0x01;//定時器0工作方式1
TH0=(65536-100)/256;//(65536-1000)/256; 定時器賦初始值
TL0=(65536-100)%256;//(65536-1000)%256;
EA=1;//開總中斷
ET0=1;//開定時器0
while(1)
{
Single_Write_BH1750(0x01); //
Single_Write_BH1750(0x10); //
delay_nms(180); //延時180ms
Multiple_Read_BH1750(); //連續(xù)讀出數(shù)據(jù),存儲在BUF中
dis_data=BUF[0];
dis_data=(dis_data<<8)+BUF[1];//合成數(shù)據(jù),即光照數(shù)據(jù)
temp=(float)dis_data/1.2;
if(SR501_IO==1){ //感應(yīng)到人員活動,開啟定時器輸出PWM控制波
TR0=1;//啟動定時器0
}else{
TR0=0;//啟動定時器0 //沒有人員活動,關(guān)閉PWM輸出
PWM=0;
}
if(temp>100) //光照強度大于100lux,關(guān)閉燈光
zkb=0;
else zkb=100-(int)temp; //光照強度小于100lux,輸出不同的光照亮度補充照明
……………………
…………限于本文篇幅 余下代碼請從51黑下載附件…………
復(fù)制代碼
以上代碼51hei提供下載:
deng.zip
(2.44 KB, 下載次數(shù): 51)
2021-3-22 20:41 上傳
點擊文件名下載附件
智能樓道燈光系統(tǒng)控制程序
下載積分: 黑幣 -5
作者:
bgr
時間:
2023-11-26 08:42
有仿真圖沒有呀
歡迎光臨 (http://www.torrancerestoration.com/bbs/)
Powered by Discuz! X3.1