找回密碼
 立即注冊(cè)

QQ登錄

只需一步，快速開始

搜索
查看: 3247|回復(fù): 0
打印 上一主題 下一主題
收起左側(cè)

BH1750FVI傳感器藍(lán)牙單片機(jī)通訊向手機(jī)app發(fā)送程序

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:243343 發(fā)表于 2017-11-7 11:42 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
單片機(jī)采集光照的數(shù)據(jù)，通過藍(lán)牙串口通信，向手機(jī)app發(fā)送采集到的數(shù)據(jù)
  1. //***************************************
  2. // BH1750FVI IIC測(cè)試程序
  3. // 使用單片機(jī)STC89C51
  4. // 晶振：11.0592M
  5. // 顯示：LCD1602
  6. // 編譯環(huán)境 Keil uVision2
  7. // 參考宏晶網(wǎng)站24c04通信程序
  8. // 時(shí)間：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        


  18. #define FOSC 11059200L      //System frequency
  19. #define BAUD 9600           //UART baudrate


  22. sbit          SCL=P2^0;      //IIC時(shí)鐘引腳定義
  23. sbit            SDA=P2^1;      //IIC數(shù)據(jù)引腳定義


  26. #define          SlaveAddress   0x46 //定義器件在IIC總線中的從地址,根據(jù)ALT  ADDRESS地址引腳不同修改
  27.                               //ALT  ADDRESS引腳接地時(shí)地址為0xA6，接電源時(shí)地址為0x3A
  28. typedef   unsigned char BYTE;
  29. typedef   unsigned short WORD;

  31. BYTE    BUF[8];                         //接收數(shù)據(jù)緩存區(qū)              
  32. uchar   ge,shi,bai,qian,wan;            //顯示變量
  33. int     dis_data;                       //變量

  35. void delay_nms(unsigned int k);
  36. void Init_BH1750(void);



  40. void  Single_Write_BH1750(uchar REG_Address);               //單個(gè)寫入數(shù)據(jù)
  41. uchar Single_Read_BH1750(uchar REG_Address);                //單個(gè)讀取內(nèi)部寄存器數(shù)據(jù)
  42. void  Multiple_Read_BH1750();                               //連續(xù)的讀取內(nèi)部寄存器數(shù)據(jù)
  43. //------------------------------------
  44. void Delay5us();
  45. void Delay5ms();
  46. void BH1750_Start();                    //起始信號(hào)
  47. void BH1750_Stop();                     //停止信號(hào)
  48. void BH1750_SendACK(bit ack);           //應(yīng)答ACK
  49. bit  BH1750_RecvACK();                  //讀ack
  50. void BH1750_SendByte(BYTE dat);         //IIC單個(gè)字節(jié)寫
  51. BYTE BH1750_RecvByte();                 //IIC單個(gè)字節(jié)讀
  52. void SendByte(unsigned char dat);
  53. //-----------------------------------

  55. //*********************************************************
  56. void conversion(uint temp_data)  //  數(shù)據(jù)轉(zhuǎn)換出 個(gè)，十，百，千，萬(wàn)
  57. {  
  58.     wan=temp_data/10000+0x30 ;
  59.     temp_data=temp_data%10000;   //取余運(yùn)算
  60.         qian=temp_data/1000+0x30 ;
  61.     temp_data=temp_data%1000;    //取余運(yùn)算
  62.     bai=temp_data/100+0x30   ;
  63.     temp_data=temp_data%100;     //取余運(yùn)算
  64.     shi=temp_data/10+0x30    ;
  65.     temp_data=temp_data%10;      //取余運(yùn)算
  66.     ge=temp_data+0x30;         
  67. }

  69. //毫秒延時(shí)**************************
  70. void delay_nms(unsigned int k)        
  71. {                                                
  72. unsigned int i,j;                                
  73. for(i=0;i<k;i++)
  74. {                        
  75. for(j=0;j<121;j++)                        
  76. {;}}                                                
  77. }


  80. /**************************************
  81. 延時(shí)5微秒(STC90C52RC@12M)
  82. 不同的工作環(huán)境,需要調(diào)整此函數(shù)，注意時(shí)鐘過快時(shí)需要修改
  83. 當(dāng)改用1T的MCU時(shí),請(qǐng)調(diào)整此延時(shí)函數(shù)
  84. **************************************/
  85. void Delay5us()
  86. {
  87.     _nop_();_nop_();_nop_();_nop_();
  88.     _nop_();_nop_();_nop_();_nop_();
  89.         _nop_();_nop_();_nop_();_nop_();
  90.         _nop_();_nop_();_nop_();_nop_();
  91. }

  93. /**************************************
  94. 延時(shí)5毫秒(STC90C52RC@12M)
  95. 不同的工作環(huán)境,需要調(diào)整此函數(shù)
  96. 當(dāng)改用1T的MCU時(shí),請(qǐng)調(diào)整此延時(shí)函數(shù)
  97. **************************************/
  98. void Delay5ms()
  99. {
  100.     WORD n = 560;

  102.     while (n--);
  103. }

  105. /**************************************
  106. 起始信號(hào)
  107. **************************************/
  108. void BH1750_Start()
  109. {
  110.     SDA = 1;                    //拉高數(shù)據(jù)線
  111.     SCL = 1;                    //拉高時(shí)鐘線
  112.     Delay5us();                 //延時(shí)
  113.     SDA = 0;                    //產(chǎn)生下降沿
  114.     Delay5us();                 //延時(shí)
  115.     SCL = 0;                    //拉低時(shí)鐘線
  116. }

  118. /**************************************
  119. 停止信號(hào)
  120. **************************************/
  121. void BH1750_Stop()
  122. {
  123.     SDA = 0;                    //拉低數(shù)據(jù)線
  124.     SCL = 1;                    //拉高時(shí)鐘線
  125.     Delay5us();                 //延時(shí)
  126.     SDA = 1;                    //產(chǎn)生上升沿
  127.     Delay5us();                 //延時(shí)
  128. }

  130. /**************************************
  131. 發(fā)送應(yīng)答信號(hào)
  132. 入口參數(shù):ack (0:ACK 1:NAK)
  133. **************************************/
  134. void BH1750_SendACK(bit ack)
  135. {
  136.     SDA = ack;                  //寫應(yīng)答信號(hào)
  137.     SCL = 1;                    //拉高時(shí)鐘線
  138.     Delay5us();                 //延時(shí)
  139.     SCL = 0;                    //拉低時(shí)鐘線
  140.     Delay5us();                 //延時(shí)
  141. }

  143. /**************************************
  144. 接收應(yīng)答信號(hào)
  145. **************************************/
  146. bit BH1750_RecvACK()
  147. {
  148.     SCL = 1;                    //拉高時(shí)鐘線
  149.     Delay5us();                 //延時(shí)
  150.     CY = SDA;                   //讀應(yīng)答信號(hào)
  151.     SCL = 0;                    //拉低時(shí)鐘線
  152.     Delay5us();                 //延時(shí)

  154.     return CY;
  155. }

  157. /**************************************
  158. 向IIC總線發(fā)送一個(gè)字節(jié)數(shù)據(jù)
  159. **************************************/
  160. void BH1750_SendByte(BYTE dat)
  161. {
  162.     BYTE i;

  164.     for (i=0; i<8; i++)         //8位計(jì)數(shù)器
  165.     {
  166.         dat <<= 1;              //移出數(shù)據(jù)的最高位
  167.         SDA = CY;               //送數(shù)據(jù)口
  168.         SCL = 1;                //拉高時(shí)鐘線
  169.         Delay5us();             //延時(shí)
  170.         SCL = 0;                //拉低時(shí)鐘線
  171.         Delay5us();             //延時(shí)
  172.     }
  173.     BH1750_RecvACK();
  174. }

  176. /**************************************
  177. 從IIC總線接收一個(gè)字節(jié)數(shù)據(jù)
  178. **************************************/
  179. BYTE BH1750_RecvByte()
  180. {
  181.     BYTE i;
  182.     BYTE dat = 0;

  184.     SDA = 1;                    //使能內(nèi)部上拉,準(zhǔn)備讀取數(shù)據(jù),
  185.     for (i=0; i<8; i++)         //8位計(jì)數(shù)器
  186.     {
  187.         dat <<= 1;
  188.         SCL = 1;                //拉高時(shí)鐘線
  189.         Delay5us();             //延時(shí)
  190.         dat |= SDA;             //讀數(shù)據(jù)               
  191.         SCL = 0;                //拉低時(shí)鐘線
  192.         Delay5us();             //延時(shí)
  193.     }
  194.     return dat;
  195. }

  197. //*********************************

  199. void Single_Write_BH1750(uchar REG_Address)
  200. {
  201.     BH1750_Start();                  //起始信號(hào)
  202.     BH1750_SendByte(SlaveAddress);   //發(fā)送設(shè)備地址+寫信號(hào)
  203.     BH1750_SendByte(REG_Address);    //內(nèi)部寄存器地址，請(qǐng)參考中文pdf22頁(yè)
  204.   //  BH1750_SendByte(REG_data);       //內(nèi)部寄存器數(shù)據(jù)，請(qǐng)參考中文pdf22頁(yè)
  205.     BH1750_Stop();                   //發(fā)送停止信號(hào)
  206. }

  208. //********單字節(jié)讀取*****************************************

  210. //*********************************************************
  211. //
  212. //連續(xù)讀出BH1750內(nèi)部數(shù)據(jù)
  213. //
  214. //*********************************************************
  215. void Multiple_read_BH1750(void)
  216. {   uchar i;        
  217.     BH1750_Start();                          //起始信號(hào)
  218.     BH1750_SendByte(SlaveAddress+1);         //發(fā)送設(shè)備地址+讀信號(hào)
  219.         
  220.          for (i=0; i<3; i++)                      //連續(xù)讀取6個(gè)地址數(shù)據(jù)，存儲(chǔ)中BUF
  221.     {
  222.         BUF[i] = BH1750_RecvByte();          //BUF[0]存儲(chǔ)0x32地址中的數(shù)據(jù)
  223.         if (i == 3)
  224.         {

  226.            BH1750_SendACK(1);                //最后一個(gè)數(shù)據(jù)需要回NOACK
  227.         }
  228.         else
  229.         {               
  230.           BH1750_SendACK(0);                //回應(yīng)ACK
  231.        }
  232.    }

  234.     BH1750_Stop();                          //停止信號(hào)
  235.     Delay5ms();
  236. }


  239. //初始化BH1750，根據(jù)需要請(qǐng)參考pdf進(jìn)行修改****
  240. void Init_BH1750()
  241. {
  242.    Single_Write_BH1750(0x01);  

  244. }

  246. void UartInit(void)                //9600bps@11.0592MHz
  247. {
  248.         SCON = 0x50;                //8???,?????
  249.         TMOD = 0x20;            //Set Timer1 as 8-bit auto reload mode
  250.     TH1 = TL1 = -(FOSC/12/32/BAUD); //Set auto-reload vaule
  251.     TR1 = 1;                //Timer1 start run
  252.     ES = 1;                 //Enable UART interrupt
  253.     EA = 1;                 //Open master interrupt switch
  254. }


  257. void SendByte(unsigned char dat)
  258. {
  259.    SBUF = dat;
  260.     while(!TI);
  261.     TI = 0;
  262. }

  264. //*********************************************************
  265. //主程序********
  266. //*********************************************************
  267. void main()
  268. {  
  269.    float temp;
  270.          unsigned char guangh=0;
  271.          unsigned char guangl=0;
  272.          unsigned int  guang=0;
  273.    delay_nms(200);            //延時(shí)200ms        
  274.    Init_BH1750();       //初始化BH1750
  275.    UartInit();          //初始化串口
  276.   while(1)              //循環(huán)
  277.   {

  279.     Single_Write_BH1750(0x01);   // power on
  280.     Single_Write_BH1750(0x10);   // H- resolution mode
  281.     delay_nms(180);              //延時(shí)180ms
  282.     Multiple_Read_BH1750();       //連續(xù)讀出數(shù)據(jù)，存儲(chǔ)在BUF中

  284.     dis_data=BUF[0];
  285.     dis_data=(dis_data<<8)+BUF[1];//合成數(shù)據(jù)
  286.    
  287.     temp=(float)dis_data/1.2;
  288.     guang=(unsigned int)temp;
  289.         delay_nms(1000);            //延時(shí)1000ms        
  290.     SendByte(guang);               
  291.             
  292.   }
  293. }
復(fù)制代碼


分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享淘帖 頂頂1 踩踩
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表