找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 3212|回复: 0
打印 上一主题 下一主题
收起左侧

BH1750FVI传感器蓝牙单片机通讯向手机app发送程序

[复制链接]
跳转到指定楼层
楼主
ID:243343 发表于 2017-11-7 11:42 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
单片机采集光照的数据,通过蓝牙串口通信,向手机app发送采集到的数据
  1. //***************************************
  2. // BH1750FVI IIC测试程序
  3. // 使用单片机STC89C51
  4. // 晶振:11.0592M
  5. // 显示:LCD1602
  6. // 编译环境 Keil uVision2
  7. // 参考宏晶网站24c04通信程序
  8. // 时间:2011年4月20日
  9. //****************************************
  10. #include  <REG51.H>        
  11. #include  <math.h>    //Keil library  
  12. #include  <stdio.h>   //Keil library        
  13. #include  <INTRINS.H>
  14. #define   uchar unsigned char
  15. #define   uint unsigned int        


  16. #define FOSC 11059200L      //System frequency
  17. #define BAUD 9600           //UART baudrate


  18. sbit          SCL=P2^0;      //IIC时钟引脚定义
  19. sbit            SDA=P2^1;      //IIC数据引脚定义


  20. #define          SlaveAddress   0x46 //定义器件在IIC总线中的从地址,根据ALT  ADDRESS地址引脚不同修改
  21.                               //ALT  ADDRESS引脚接地时地址为0xA6,接电源时地址为0x3A
  22. typedef   unsigned char BYTE;
  23. typedef   unsigned short WORD;

  24. BYTE    BUF[8];                         //接收数据缓存区              
  25. uchar   ge,shi,bai,qian,wan;            //显示变量
  26. int     dis_data;                       //变量

  27. void delay_nms(unsigned int k);
  28. void Init_BH1750(void);



  29. void  Single_Write_BH1750(uchar REG_Address);               //单个写入数据
  30. uchar Single_Read_BH1750(uchar REG_Address);                //单个读取内部寄存器数据
  31. void  Multiple_Read_BH1750();                               //连续的读取内部寄存器数据
  32. //------------------------------------
  33. void Delay5us();
  34. void Delay5ms();
  35. void BH1750_Start();                    //起始信号
  36. void BH1750_Stop();                     //停止信号
  37. void BH1750_SendACK(bit ack);           //应答ACK
  38. bit  BH1750_RecvACK();                  //读ack
  39. void BH1750_SendByte(BYTE dat);         //IIC单个字节写
  40. BYTE BH1750_RecvByte();                 //IIC单个字节读
  41. void SendByte(unsigned char dat);
  42. //-----------------------------------

  43. //*********************************************************
  44. void conversion(uint temp_data)  //  数据转换出 个,十,百,千,万
  45. {  
  46.     wan=temp_data/10000+0x30 ;
  47.     temp_data=temp_data%10000;   //取余运算
  48.         qian=temp_data/1000+0x30 ;
  49.     temp_data=temp_data%1000;    //取余运算
  50.     bai=temp_data/100+0x30   ;
  51.     temp_data=temp_data%100;     //取余运算
  52.     shi=temp_data/10+0x30    ;
  53.     temp_data=temp_data%10;      //取余运算
  54.     ge=temp_data+0x30;         
  55. }

  56. //毫秒延时**************************
  57. void delay_nms(unsigned int k)        
  58. {                                                
  59. unsigned int i,j;                                
  60. for(i=0;i<k;i++)
  61. {                        
  62. for(j=0;j<121;j++)                        
  63. {;}}                                                
  64. }


  65. /**************************************
  66. 延时5微秒(STC90C52RC@12M)
  67. 不同的工作环境,需要调整此函数,注意时钟过快时需要修改
  68. 当改用1T的MCU时,请调整此延时函数
  69. **************************************/
  70. void Delay5us()
  71. {
  72.     _nop_();_nop_();_nop_();_nop_();
  73.     _nop_();_nop_();_nop_();_nop_();
  74.         _nop_();_nop_();_nop_();_nop_();
  75.         _nop_();_nop_();_nop_();_nop_();
  76. }

  77. /**************************************
  78. 延时5毫秒(STC90C52RC@12M)
  79. 不同的工作环境,需要调整此函数
  80. 当改用1T的MCU时,请调整此延时函数
  81. **************************************/
  82. void Delay5ms()
  83. {
  84.     WORD n = 560;

  85.     while (n--);
  86. }

  87. /**************************************
  88. 起始信号
  89. **************************************/
  90. void BH1750_Start()
  91. {
  92.     SDA = 1;                    //拉高数据线
  93.     SCL = 1;                    //拉高时钟线
  94.     Delay5us();                 //延时
  95.     SDA = 0;                    //产生下降沿
  96.     Delay5us();                 //延时
  97.     SCL = 0;                    //拉低时钟线
  98. }

  99. /**************************************
  100. 停止信号
  101. **************************************/
  102. void BH1750_Stop()
  103. {
  104.     SDA = 0;                    //拉低数据线
  105.     SCL = 1;                    //拉高时钟线
  106.     Delay5us();                 //延时
  107.     SDA = 1;                    //产生上升沿
  108.     Delay5us();                 //延时
  109. }

  110. /**************************************
  111. 发送应答信号
  112. 入口参数:ack (0:ACK 1:NAK)
  113. **************************************/
  114. void BH1750_SendACK(bit ack)
  115. {
  116.     SDA = ack;                  //写应答信号
  117.     SCL = 1;                    //拉高时钟线
  118.     Delay5us();                 //延时
  119.     SCL = 0;                    //拉低时钟线
  120.     Delay5us();                 //延时
  121. }

  122. /**************************************
  123. 接收应答信号
  124. **************************************/
  125. bit BH1750_RecvACK()
  126. {
  127.     SCL = 1;                    //拉高时钟线
  128.     Delay5us();                 //延时
  129.     CY = SDA;                   //读应答信号
  130.     SCL = 0;                    //拉低时钟线
  131.     Delay5us();                 //延时

  132.     return CY;
  133. }

  134. /**************************************
  135. 向IIC总线发送一个字节数据
  136. **************************************/
  137. void BH1750_SendByte(BYTE dat)
  138. {
  139.     BYTE i;

  140.     for (i=0; i<8; i++)         //8位计数器
  141.     {
  142.         dat <<= 1;              //移出数据的最高位
  143.         SDA = CY;               //送数据口
  144.         SCL = 1;                //拉高时钟线
  145.         Delay5us();             //延时
  146.         SCL = 0;                //拉低时钟线
  147.         Delay5us();             //延时
  148.     }
  149.     BH1750_RecvACK();
  150. }

  151. /**************************************
  152. 从IIC总线接收一个字节数据
  153. **************************************/
  154. BYTE BH1750_RecvByte()
  155. {
  156.     BYTE i;
  157.     BYTE dat = 0;

  158.     SDA = 1;                    //使能内部上拉,准备读取数据,
  159.     for (i=0; i<8; i++)         //8位计数器
  160.     {
  161.         dat <<= 1;
  162.         SCL = 1;                //拉高时钟线
  163.         Delay5us();             //延时
  164.         dat |= SDA;             //读数据               
  165.         SCL = 0;                //拉低时钟线
  166.         Delay5us();             //延时
  167.     }
  168.     return dat;
  169. }

  170. //*********************************

  171. void Single_Write_BH1750(uchar REG_Address)
  172. {
  173.     BH1750_Start();                  //起始信号
  174.     BH1750_SendByte(SlaveAddress);   //发送设备地址+写信号
  175.     BH1750_SendByte(REG_Address);    //内部寄存器地址,请参考中文pdf22页
  176.   //  BH1750_SendByte(REG_data);       //内部寄存器数据,请参考中文pdf22页
  177.     BH1750_Stop();                   //发送停止信号
  178. }

  179. //********单字节读取*****************************************

  180. //*********************************************************
  181. //
  182. //连续读出BH1750内部数据
  183. //
  184. //*********************************************************
  185. void Multiple_read_BH1750(void)
  186. {   uchar i;        
  187.     BH1750_Start();                          //起始信号
  188.     BH1750_SendByte(SlaveAddress+1);         //发送设备地址+读信号
  189.         
  190.          for (i=0; i<3; i++)                      //连续读取6个地址数据,存储中BUF
  191.     {
  192.         BUF[i] = BH1750_RecvByte();          //BUF[0]存储0x32地址中的数据
  193.         if (i == 3)
  194.         {

  195.            BH1750_SendACK(1);                //最后一个数据需要回NOACK
  196.         }
  197.         else
  198.         {               
  199.           BH1750_SendACK(0);                //回应ACK
  200.        }
  201.    }

  202.     BH1750_Stop();                          //停止信号
  203.     Delay5ms();
  204. }


  205. //初始化BH1750,根据需要请参考pdf进行修改****
  206. void Init_BH1750()
  207. {
  208.    Single_Write_BH1750(0x01);  

  209. }

  210. void UartInit(void)                //9600bps@11.0592MHz
  211. {
  212.         SCON = 0x50;                //8???,?????
  213.         TMOD = 0x20;            //Set Timer1 as 8-bit auto reload mode
  214.     TH1 = TL1 = -(FOSC/12/32/BAUD); //Set auto-reload vaule
  215.     TR1 = 1;                //Timer1 start run
  216.     ES = 1;                 //Enable UART interrupt
  217.     EA = 1;                 //Open master interrupt switch
  218. }


  219. void SendByte(unsigned char dat)
  220. {
  221.    SBUF = dat;
  222.     while(!TI);
  223.     TI = 0;
  224. }

  225. //*********************************************************
  226. //主程序********
  227. //*********************************************************
  228. void main()
  229. {  
  230.    float temp;
  231.          unsigned char guangh=0;
  232.          unsigned char guangl=0;
  233.          unsigned int  guang=0;
  234.    delay_nms(200);            //延时200ms        
  235.    Init_BH1750();       //初始化BH1750
  236.    UartInit();          //初始化串口
  237.   while(1)              //循环
  238.   {

  239.     Single_Write_BH1750(0x01);   // power on
  240.     Single_Write_BH1750(0x10);   // H- resolution mode
  241.     delay_nms(180);              //延时180ms
  242.     Multiple_Read_BH1750();       //连续读出数据,存储在BUF中

  243.     dis_data=BUF[0];
  244.     dis_data=(dis_data<<8)+BUF[1];//合成数据
  245.    
  246.     temp=(float)dis_data/1.2;
  247.     guang=(unsigned int)temp;
  248.         delay_nms(1000);            //延时1000ms        
  249.     SendByte(guang);               
  250.             
  251.   }
  252. }
复制代码


分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶1 踩
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表