找回密码
 立即注册

QQ登录

只需一步,快速开始

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

利用BH1750FVI GY-30逛检测模块调节LED光照亮度

[复制链接]
跳转到指定楼层
楼主
现有光照传感器BH1750FVI 模块GY-30检测光照强度,买模块的时候带的显示程序,已经能够把光照度数据显示在LCD屏上,现在想让LED灯的亮度根据检测到的光照数据实时改变,请各位大神支招,
把程序补充完整(源程序已上传): STC_BH1750.doc (9.68 KB, 下载次数: 39)




部分源码预览:
  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   DataPort P0         //LCD1602数据端口
  17. sbit          SCL=P1^0;      //IIC时钟引脚定义
  18. sbit            SDA=P1^1;      //IIC数据引脚定义
  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总线中的从地址,根据ALT  ADDRESS地址引脚不同修改
  23.                               //ALT  ADDRESS引脚接地时地址为0x46,接电源时地址为0xB8
  24. typedef   unsigned char BYTE;
  25. typedef   unsigned short WORD;

  26. BYTE    BUF[8];                         //接收数据缓存区              
  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);               //单个写入数据
  37. uchar Single_Read_BH1750(uchar REG_Address);                //单个读取内部寄存器数据
  38. void  Multiple_Read_BH1750();                               //连续的读取内部寄存器数据
  39. //------------------------------------
  40. void Delay5us();
  41. void Delay5ms();
  42. void BH1750_Start();                    //起始信号
  43. void BH1750_Stop();                     //停止信号
  44. void BH1750_SendACK(bit ack);           //应答ACK
  45. bit  BH1750_RecvACK();                  //读ack
  46. void BH1750_SendByte(BYTE dat);         //IIC单个字节写
  47. BYTE BH1750_RecvByte();                 //IIC单个字节读

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

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

  62. //毫秒延时**************************
  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. 延时5微秒(STC90C52RC@12M)
  117. 不同的工作环境,需要调整此函数,注意时钟过快时需要修改
  118. 当改用1T的MCU时,请调整此延时函数
  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. 延时5毫秒(STC90C52RC@12M)
  129. 不同的工作环境,需要调整此函数
  130. 当改用1T的MCU时,请调整此延时函数
  131. **************************************/
  132. void Delay5ms()
  133. {
  134.     WORD n = 560;

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

  137. /**************************************
  138. 起始信号
  139. **************************************/
  140. void BH1750_Start()
  141. {
  142.     SDA = 1;                    //拉高数据线
  143.     SCL = 1;                    //拉高时钟线
  144.     Delay5us();                 //延时
  145.     SDA = 0;                    //产生下降沿
  146.     Delay5us();                 //延时
  147.     SCL = 0;                    //拉低时钟线
  148. }

  149. /**************************************
  150. 停止信号
  151. **************************************/
  152. void BH1750_Stop()
  153. {
  154.     SDA = 0;                    //拉低数据线
  155.     SCL = 1;                    //拉高时钟线
  156.     Delay5us();                 //延时
  157.     SDA = 1;                    //产生上升沿
  158.     Delay5us();                 //延时
  159. }

  160. /**************************************
  161. 发送应答信号
  162. 入口参数:ack (0:ACK 1:NAK)
  163. **************************************/
  164. void BH1750_SendACK(bit ack)
  165. {
  166.     SDA = ack;                  //写应答信号
  167.     SCL = 1;                    //拉高时钟线
  168.     Delay5us();                 //延时
  169.     SCL = 0;                    //拉低时钟线
  170.     Delay5us();                 //延时
  171. }

  172. /**************************************
  173. 接收应答信号
  174. **************************************/
  175. bit BH1750_RecvACK()
  176. {
  177.     SCL = 1;                    //拉高时钟线
  178.     Delay5us();                 //延时
  179.     CY = SDA;                   //读应答信号
  180.     SCL = 0;                    //拉低时钟线
  181.     Delay5us();                 //延时

  182.     return CY;
  183. }

  184. /**************************************
  185. 向IIC总线发送一个字节数据
  186. **************************************/
  187. void BH1750_SendByte(BYTE dat)
  188. {
  189.     BYTE i;

  190.     for (i=0; i<8; i++)         //8位计数器
  191.     {
  192.         dat <<= 1;              //移出数据的最高位
  193.         SDA = CY;               //送数据口
  194.         SCL = 1;                //拉高时钟线
  195.         Delay5us();             //延时
  196.         SCL = 0;                //拉低时钟线
  197.         Delay5us();             //延时
  198.     }
  199.     BH1750_RecvACK();
  200. }

  201. /**************************************
  202. 从IIC总线接收一个字节数据
  203. **************************************/
  204. BYTE BH1750_RecvByte()
  205. {
  206.     BYTE i;
  207.     BYTE dat = 0;

  208.     SDA = 1;                    //使能内部上拉,准备读取数据,
  209.     for (i=0; i<8; i++)         //8位计数器
  210.     {
  211.         dat <<= 1;
  212.         SCL = 1;                //拉高时钟线
  213.         Delay5us();             //延时
  214.         dat |= SDA;             //读数据               
  215.         SCL = 0;                //拉低时钟线
  216.         Delay5us();             //延时
  217.     }
  218.     return dat;
  219. }

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

  221. void Single_Write_BH1750(uchar REG_Address)
  222. {
  223.     BH1750_Start();                  //起始信号
  224.     BH1750_SendByte(SlaveAddress);   //发送设备地址+写信号
  225.     BH1750_SendByte(REG_Address);    //内部寄存器地址,
  226.   //  BH1750_SendByte(REG_data);       //内部寄存器数据,
  227.     BH1750_Stop();                   //发送停止信号
  228. }

  229. //********单字节读取*****************************************
  230. /*
  231. uchar Single_Read_BH1750(uchar REG_Address)
  232. {  uchar REG_data;
  233.     BH1750_Start();                          //起始信号
  234.     BH1750_SendByte(SlaveAddress);           //发送设备地址+写信号
  235.     BH1750_SendByte(REG_Address);                   //发送存储单元地址,从0开始        
  236.     BH1750_Start();                          //起始信号
  237.     BH1750_SendByte(SlaveAddress+1);         //发送设备地址+读信号
  238.     REG_data=BH1750_RecvByte();              //读出寄存器数据
  239.         BH1750_SendACK(1);   
  240.         BH1750_Stop();                           //停止信号
  241.     return REG_data;
  242. }
  243. */
  244. //*********************************************************
  245. //
  246. //连续读出BH1750内部数据
  247. //
  248. //*********************************************************
  249. void Multiple_read_BH1750(void)
  250. {   uchar i;        
  251.     BH1750_Start();                          //起始信号
  252.     BH1750_SendByte(SlaveAddress+1);         //发送设备地址+读信号
  253.         
  254.          for (i=0; i<3; i++)                      //连续读取2个地址数据,存储中BUF
  255.     {
  256.         BUF[i] = BH1750_RecvByte();          //BUF[0]存储0x32地址中的数据
  257.         if (i == 3)
  258.         {

  259.            BH1750_SendACK(1);                //最后一个数据需要回NOACK
  260.         }
  261.         else
  262.         {               
  263.           BH1750_SendACK(0);                //回应ACK
  264.        }
  265.    }

  266.     BH1750_Stop();                          //停止信号
  267.     Delay5ms();
  268. }


  269. //初始化BH1750,根据需要请参考pdf进行修改****
  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);            //延时100ms        
  281.    InitLcd();           //初始化LCD
  282.    Init_BH1750();       //初始化BH1750

  283.   while(1)              //循环
  284.   {

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

  287.      delay_nms(180);              //延时180ms

  288.     Multiple_Read_BH1750();       //连续读出数据,存储在BUF中

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

  293.     conversion(temp);         //计算数据和显示
  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); //显示数据
  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'); ////显示数单位
  306.         DisplayOneChar(14,0,'x');  
  307.             
  308.   }
  309. }

复制代码


评分

参与人数 1黑币 +90 收起 理由
admin + 90 共享资料的黑币奖励!

查看全部评分

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

使用道具 举报

沙发
ID:146487 发表于 2016-11-14 16:32 | 只看该作者
希望各位大神帮帮忙 ,非常感谢
回复

使用道具 举报

板凳
ID:147898 发表于 2016-11-14 21:31 | 只看该作者
很不错,很有用。
回复

使用道具 举报

地板
ID:146487 发表于 2016-11-15 09:58 | 只看该作者
有没有好的建议  来说说
回复

使用道具 举报

5#
ID:47293 发表于 2017-8-10 10:50 | 只看该作者
xdbc 相当不错谢谢分享
回复

使用道具 举报

6#
ID:227369 发表于 2017-10-25 23:57 | 只看该作者
51黑有你更精彩
回复

使用道具 举报

7#
ID:148968 发表于 2018-4-19 23:20 | 只看该作者
好棒棒棒棒棒棒棒棒棒
回复

使用道具 举报

8#
ID:328425 发表于 2018-5-12 19:09 | 只看该作者
23333我也想要  可是貌似凉凉~
回复

使用道具 举报

9#
ID:47286 发表于 2018-5-12 21:21 | 只看该作者
控制个亮度不需要这么麻烦吧 随便用个带AD和PWM的片子 AD接个PO188获得光照强度  然后把获得的数值直接赋值给PWM通道 不就可以无级调节了 干嘛要用个独立模块呢 没懂
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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