BH1750FVI傳感器藍牙單片機通訊向手機app發送程序

ID:243343 · 發表于 2017-11-7 11:42

單片機采集光照的數據，通過藍牙串口通信，向手機app發送采集到的數據

//***************************************
// 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 FOSC 11059200L //System frequency
#define BAUD 9600 //UART baudrate
sbit SCL=P2^0; //IIC時鐘引腳定義
sbit SDA=P2^1; //IIC數據引腳定義
#define SlaveAddress 0x46 //定義器件在IIC總線中的從地址,根據ALT ADDRESS地址引腳不同修改
//ALT ADDRESS引腳接地時地址為0xA6，接電源時地址為0x3A
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 Init_BH1750(void);
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 SendByte(unsigned char dat);
//-----------------------------------
//*********************************************************
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++)
{;}}
}
/**************************************
延時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); //內部寄存器地址，請參考中文pdf22頁
// BH1750_SendByte(REG_data); //內部寄存器數據，請參考中文pdf22頁
BH1750_Stop(); //發送停止信號
}
//********單字節讀取*****************************************
//*********************************************************
//
//連續讀出BH1750內部數據
//
//*********************************************************
void Multiple_read_BH1750(void)
{ uchar i;
BH1750_Start(); //起始信號
BH1750_SendByte(SlaveAddress+1); //發送設備地址+讀信號
for (i=0; i<3; i++) //連續讀取6個地址數據，存儲中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 UartInit(void) //9600bps@11.0592MHz
{
SCON = 0x50; //8???,?????
TMOD = 0x20; //Set Timer1 as 8-bit auto reload mode
TH1 = TL1 = -(FOSC/12/32/BAUD); //Set auto-reload vaule
TR1 = 1; //Timer1 start run
ES = 1; //Enable UART interrupt
EA = 1; //Open master interrupt switch
}
void SendByte(unsigned char dat)
{
SBUF = dat;
while(!TI);
TI = 0;
}
//*********************************************************
//主程序********
//*********************************************************
void main()
{
float temp;
unsigned char guangh=0;
unsigned char guangl=0;
unsigned int guang=0;
delay_nms(200); //延時200ms
Init_BH1750(); //初始化BH1750
UartInit(); //初始化串口
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;
guang=(unsigned int)temp;
delay_nms(1000); //延時1000ms
SendByte(guang);
}
}

復制代碼

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

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

BH1750FVI傳感器藍牙單片機通訊向手機app發送程序