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

QQ登錄

只需一步,快速開始

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

利用BH1750FVI GY-30逛檢測模塊調(diào)節(jié)LED光照亮度

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
ID:146487 發(fā)表于 2016-11-14 16:31 | 只看該作者 |只看大圖 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
現(xiàn)有光照傳感器BH1750FVI 模塊GY-30檢測光照強(qiáng)度,買模塊的時(shí)候帶的顯示程序,已經(jīng)能夠把光照度數(shù)據(jù)顯示在LCD屏上,現(xiàn)在想讓LED燈的亮度根據(jù)檢測到的光照數(shù)據(jù)實(shí)時(shí)改變,請(qǐng)各位大神支招,
把程序補(bǔ)充完整(源程序已上傳): STC_BH1750.doc (9.68 KB, 下載次數(shù): 39)




部分源碼預(yù)覽:
  1. //***************************************
  2. // BH1750FVI IIC測試程序
  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        
  16. #define   DataPort P0         //LCD1602數(shù)據(jù)端口
  17. sbit          SCL=P1^0;      //IIC時(shí)鐘引腳定義
  18. sbit            SDA=P1^1;      //IIC數(shù)據(jù)引腳定義
  19. sbit      LCM_RS=P2^0;   //LCD1602命令端口               
  20. sbit      LCM_RW=P2^1;   //LCD1602命令端口               
  21. sbit      LCM_EN=P2^2;   //LCD1602命令端口

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

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

  29. void delay_nms(unsigned int k);
  30. void InitLcd();
  31. void Init_BH1750(void);

  32. void WriteDataLCM(uchar dataW);
  33. void WriteCommandLCM(uchar CMD,uchar Attribc);
  34. void DisplayOneChar(uchar X,uchar Y,uchar DData);
  35. void conversion(uint temp_data);

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

  48. //-----------------------------------

  49. //*********************************************************
  50. void conversion(uint temp_data)  //  數(shù)據(jù)轉(zhuǎn)換出 個(gè),十,百,千,萬
  51. {  
  52.     wan=temp_data/10000+0x30 ;
  53.     temp_data=temp_data%10000;   //取余運(yùn)算
  54.         qian=temp_data/1000+0x30 ;
  55.     temp_data=temp_data%1000;    //取余運(yùn)算
  56.     bai=temp_data/100+0x30   ;
  57.     temp_data=temp_data%100;     //取余運(yùn)算
  58.     shi=temp_data/10+0x30    ;
  59.     temp_data=temp_data%10;      //取余運(yùn)算
  60.     ge=temp_data+0x30;         
  61. }

  62. //毫秒延時(shí)**************************
  63. void delay_nms(unsigned int k)        
  64. {                                                
  65. unsigned int i,j;                                
  66. for(i=0;i<k;i++)
  67. {                        
  68. for(j=0;j<121;j++)                        
  69. {;}}                                                
  70. }

  71. /*******************************/
  72. void WaitForEnable(void)        
  73. {                                       
  74. DataPort=0xff;               
  75. LCM_RS=0;LCM_RW=1;_nop_();
  76. LCM_EN=1;_nop_();_nop_();
  77. while(DataPort&0x80);        
  78. LCM_EN=0;                                
  79. }                                       
  80. /*******************************/
  81. void WriteCommandLCM(uchar CMD,uchar Attribc)
  82. {                                       
  83. if(Attribc)WaitForEnable();        
  84. LCM_RS=0;LCM_RW=0;_nop_();
  85. DataPort=CMD;_nop_();        
  86. LCM_EN=1;_nop_();_nop_();LCM_EN=0;
  87. }                                       
  88. /*******************************/
  89. void WriteDataLCM(uchar dataW)
  90. {                                       
  91. WaitForEnable();               
  92. LCM_RS=1;LCM_RW=0;_nop_();
  93. DataPort=dataW;_nop_();        
  94. LCM_EN=1;_nop_();_nop_();LCM_EN=0;
  95. }               
  96. /***********************************/
  97. void InitLcd()                                
  98. {                        
  99. WriteCommandLCM(0x38,1);        
  100. WriteCommandLCM(0x08,1);        
  101. WriteCommandLCM(0x01,1);        
  102. WriteCommandLCM(0x06,1);        
  103. WriteCommandLCM(0x0c,1);
  104. }                        
  105. /***********************************/
  106. void DisplayOneChar(uchar X,uchar Y,uchar DData)
  107. {                                                
  108. Y&=1;                                                
  109. X&=15;                                                
  110. if(Y)X|=0x40;                                       
  111. X|=0x80;                        
  112. WriteCommandLCM(X,0);               
  113. WriteDataLCM(DData);               
  114. }                                                

  115. /**************************************
  116. 延時(shí)5微秒(STC90C52RC@12M)
  117. 不同的工作環(huán)境,需要調(diào)整此函數(shù),注意時(shí)鐘過快時(shí)需要修改
  118. 當(dāng)改用1T的MCU時(shí),請(qǐng)調(diào)整此延時(shí)函數(shù)
  119. **************************************/
  120. void Delay5us()
  121. {
  122.     _nop_();_nop_();_nop_();_nop_();
  123.     _nop_();_nop_();_nop_();_nop_();
  124.         _nop_();_nop_();_nop_();_nop_();
  125.         _nop_();_nop_();_nop_();_nop_();
  126. }

  127. /**************************************
  128. 延時(shí)5毫秒(STC90C52RC@12M)
  129. 不同的工作環(huán)境,需要調(diào)整此函數(shù)
  130. 當(dāng)改用1T的MCU時(shí),請(qǐng)調(diào)整此延時(shí)函數(shù)
  131. **************************************/
  132. void Delay5ms()
  133. {
  134.     WORD n = 560;

  135.     while (n--);
  136. }

  137. /**************************************
  138. 起始信號(hào)
  139. **************************************/
  140. void BH1750_Start()
  141. {
  142.     SDA = 1;                    //拉高數(shù)據(jù)線
  143.     SCL = 1;                    //拉高時(shí)鐘線
  144.     Delay5us();                 //延時(shí)
  145.     SDA = 0;                    //產(chǎn)生下降沿
  146.     Delay5us();                 //延時(shí)
  147.     SCL = 0;                    //拉低時(shí)鐘線
  148. }

  149. /**************************************
  150. 停止信號(hào)
  151. **************************************/
  152. void BH1750_Stop()
  153. {
  154.     SDA = 0;                    //拉低數(shù)據(jù)線
  155.     SCL = 1;                    //拉高時(shí)鐘線
  156.     Delay5us();                 //延時(shí)
  157.     SDA = 1;                    //產(chǎn)生上升沿
  158.     Delay5us();                 //延時(shí)
  159. }

  160. /**************************************
  161. 發(fā)送應(yīng)答信號(hào)
  162. 入口參數(shù):ack (0:ACK 1:NAK)
  163. **************************************/
  164. void BH1750_SendACK(bit ack)
  165. {
  166.     SDA = ack;                  //寫應(yīng)答信號(hào)
  167.     SCL = 1;                    //拉高時(shí)鐘線
  168.     Delay5us();                 //延時(shí)
  169.     SCL = 0;                    //拉低時(shí)鐘線
  170.     Delay5us();                 //延時(shí)
  171. }

  172. /**************************************
  173. 接收應(yīng)答信號(hào)
  174. **************************************/
  175. bit BH1750_RecvACK()
  176. {
  177.     SCL = 1;                    //拉高時(shí)鐘線
  178.     Delay5us();                 //延時(shí)
  179.     CY = SDA;                   //讀應(yīng)答信號(hào)
  180.     SCL = 0;                    //拉低時(shí)鐘線
  181.     Delay5us();                 //延時(shí)

  182.     return CY;
  183. }

  184. /**************************************
  185. 向IIC總線發(fā)送一個(gè)字節(jié)數(shù)據(jù)
  186. **************************************/
  187. void BH1750_SendByte(BYTE dat)
  188. {
  189.     BYTE i;

  190.     for (i=0; i<8; i++)         //8位計(jì)數(shù)器
  191.     {
  192.         dat <<= 1;              //移出數(shù)據(jù)的最高位
  193.         SDA = CY;               //送數(shù)據(jù)口
  194.         SCL = 1;                //拉高時(shí)鐘線
  195.         Delay5us();             //延時(shí)
  196.         SCL = 0;                //拉低時(shí)鐘線
  197.         Delay5us();             //延時(shí)
  198.     }
  199.     BH1750_RecvACK();
  200. }

  201. /**************************************
  202. 從IIC總線接收一個(gè)字節(jié)數(shù)據(jù)
  203. **************************************/
  204. BYTE BH1750_RecvByte()
  205. {
  206.     BYTE i;
  207.     BYTE dat = 0;

  208.     SDA = 1;                    //使能內(nèi)部上拉,準(zhǔn)備讀取數(shù)據(jù),
  209.     for (i=0; i<8; i++)         //8位計(jì)數(shù)器
  210.     {
  211.         dat <<= 1;
  212.         SCL = 1;                //拉高時(shí)鐘線
  213.         Delay5us();             //延時(shí)
  214.         dat |= SDA;             //讀數(shù)據(jù)               
  215.         SCL = 0;                //拉低時(shí)鐘線
  216.         Delay5us();             //延時(shí)
  217.     }
  218.     return dat;
  219. }

  220. //*********************************

  221. void Single_Write_BH1750(uchar REG_Address)
  222. {
  223.     BH1750_Start();                  //起始信號(hào)
  224.     BH1750_SendByte(SlaveAddress);   //發(fā)送設(shè)備地址+寫信號(hào)
  225.     BH1750_SendByte(REG_Address);    //內(nèi)部寄存器地址,
  226.   //  BH1750_SendByte(REG_data);       //內(nèi)部寄存器數(shù)據(jù),
  227.     BH1750_Stop();                   //發(fā)送停止信號(hào)
  228. }

  229. //********單字節(jié)讀取*****************************************
  230. /*
  231. uchar Single_Read_BH1750(uchar REG_Address)
  232. {  uchar REG_data;
  233.     BH1750_Start();                          //起始信號(hào)
  234.     BH1750_SendByte(SlaveAddress);           //發(fā)送設(shè)備地址+寫信號(hào)
  235.     BH1750_SendByte(REG_Address);                   //發(fā)送存儲(chǔ)單元地址,從0開始        
  236.     BH1750_Start();                          //起始信號(hào)
  237.     BH1750_SendByte(SlaveAddress+1);         //發(fā)送設(shè)備地址+讀信號(hào)
  238.     REG_data=BH1750_RecvByte();              //讀出寄存器數(shù)據(jù)
  239.         BH1750_SendACK(1);   
  240.         BH1750_Stop();                           //停止信號(hào)
  241.     return REG_data;
  242. }
  243. */
  244. //*********************************************************
  245. //
  246. //連續(xù)讀出BH1750內(nèi)部數(shù)據(jù)
  247. //
  248. //*********************************************************
  249. void Multiple_read_BH1750(void)
  250. {   uchar i;        
  251.     BH1750_Start();                          //起始信號(hào)
  252.     BH1750_SendByte(SlaveAddress+1);         //發(fā)送設(shè)備地址+讀信號(hào)
  253.         
  254.          for (i=0; i<3; i++)                      //連續(xù)讀取2個(gè)地址數(shù)據(jù),存儲(chǔ)中BUF
  255.     {
  256.         BUF[i] = BH1750_RecvByte();          //BUF[0]存儲(chǔ)0x32地址中的數(shù)據(jù)
  257.         if (i == 3)
  258.         {

  259.            BH1750_SendACK(1);                //最后一個(gè)數(shù)據(jù)需要回NOACK
  260.         }
  261.         else
  262.         {               
  263.           BH1750_SendACK(0);                //回應(yīng)ACK
  264.        }
  265.    }

  266.     BH1750_Stop();                          //停止信號(hào)
  267.     Delay5ms();
  268. }


  269. //初始化BH1750,根據(jù)需要請(qǐng)參考pdf進(jìn)行修改****
  270. void Init_BH1750()
  271. {
  272.    Single_Write_BH1750(0x01);  

  273. }
  274. //*********************************************************
  275. //主程序********
  276. //*********************************************************
  277. void main()
  278. {  
  279.    float temp;
  280.    delay_nms(100);            //延時(shí)100ms        
  281.    InitLcd();           //初始化LCD
  282.    Init_BH1750();       //初始化BH1750

  283.   while(1)              //循環(huán)
  284.   {

  285.     Single_Write_BH1750(0x01);   // power on
  286.     Single_Write_BH1750(0x10);   // H- resolution mode

  287.      delay_nms(180);              //延時(shí)180ms

  288.     Multiple_Read_BH1750();       //連續(xù)讀出數(shù)據(jù),存儲(chǔ)在BUF中

  289.     dis_data=BUF[0];
  290.     dis_data=(dis_data<<8)+BUF[1];//合成數(shù)據(jù),即光照數(shù)據(jù)
  291.    
  292.     temp=(float)dis_data/1.2;

  293.     conversion(temp);         //計(jì)算數(shù)據(jù)和顯示
  294.         DisplayOneChar(0,0,'L');
  295.         DisplayOneChar(1,0,'i');
  296.         DisplayOneChar(2,0,'g');
  297.         DisplayOneChar(3,0,'h');
  298.         DisplayOneChar(4,0,'t');
  299.     DisplayOneChar(5,0,':');

  300.     DisplayOneChar(7,0,wan); //顯示數(shù)據(jù)
  301.     DisplayOneChar(8,0,qian);  
  302.     DisplayOneChar(9,0,bai);
  303.     DisplayOneChar(10,0,shi);
  304.         DisplayOneChar(11,0,ge);

  305.         DisplayOneChar(13,0,'l'); ////顯示數(shù)單位
  306.         DisplayOneChar(14,0,'x');  
  307.             
  308.   }
  309. }

復(fù)制代碼


評(píng)分

參與人數(shù) 1黑幣 +90 收起 理由
admin + 90 共享資料的黑幣獎(jiǎng)勵(lì)!

查看全部評(píng)分

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

使用道具 舉報(bào)

沙發(fā)
ID:146487 發(fā)表于 2016-11-14 16:32 | 只看該作者
希望各位大神幫幫忙 ,非常感謝
回復(fù)

使用道具 舉報(bào)

板凳
ID:147898 發(fā)表于 2016-11-14 21:31 | 只看該作者
很不錯(cuò),很有用。
回復(fù)

使用道具 舉報(bào)

地板
ID:146487 發(fā)表于 2016-11-15 09:58 | 只看該作者
有沒有好的建議  來說說
回復(fù)

使用道具 舉報(bào)

5#
ID:47293 發(fā)表于 2017-8-10 10:50 | 只看該作者
xdbc 相當(dāng)不錯(cuò)謝謝分享
回復(fù)

使用道具 舉報(bào)

6#
ID:227369 發(fā)表于 2017-10-25 23:57 | 只看該作者
51黑有你更精彩
回復(fù)

使用道具 舉報(bào)

7#
ID:148968 發(fā)表于 2018-4-19 23:20 | 只看該作者
好棒棒棒棒棒棒棒棒棒
回復(fù)

使用道具 舉報(bào)

8#
ID:328425 發(fā)表于 2018-5-12 19:09 | 只看該作者
23333我也想要  可是貌似涼涼~
回復(fù)

使用道具 舉報(bào)

9#
ID:47286 發(fā)表于 2018-5-12 21:21 | 只看該作者
控制個(gè)亮度不需要這么麻煩吧 隨便用個(gè)帶AD和PWM的片子 AD接個(gè)PO188獲得光照強(qiáng)度  然后把獲得的數(shù)值直接賦值給PWM通道 不就可以無級(jí)調(diào)節(jié)了 干嘛要用個(gè)獨(dú)立模塊呢 沒懂
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

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