设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 光照强度模块BH1750FVI IIC STC单片机测试源码,亲测有效
返回列表 发新帖
查看: 4118|回复: 0
打印 上一主题 下一主题
收起左侧

光照强度模块BH1750FVI IIC STC单片机测试源码,亲测有效

[复制链接]
跳转到指定楼层
楼主
ID:327837 发表于 2018-5-11 19:39 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
STC光照强度+LCD1602单片机源程序如下:
  1. //***************************************
  2. // BH1750FVI IIC测试程序
  3. // 使用单片机STC89C51
  4. // 晶振：11.0592M
  5. // 显示：LCD1602
  6. // 编译环境 Keil uVision2
  7. // 参考宏晶网站24c04通信程序
  8. //****************************************
  9. #include  <REG51.H>        
  10. #include  <math.h>    //Keil library  
  11. #include  <stdio.h>   //Keil library        
  12. #include  <INTRINS.H>
  13. #define   uchar unsigned char
  14. #define   uint unsigned int        
  15. #define   DataPort P0         //LCD1602数据端口
  16. sbit          SCL=P1^0;      //IIC时钟引脚定义
  17. sbit            SDA=P1^1;      //IIC数据引脚定义
  18. sbit      LCM_RS=P2^0;   //LCD1602命令端口               
  19. sbit      LCM_RW=P2^1;   //LCD1602命令端口               
  20. sbit      LCM_EN=P2^2;   //LCD1602命令端口
  21. #define          SlaveAddress   0x46 //定义器件在IIC总线中的从地址,根据ALT  ADDRESS地址引脚不同修改
  22.                               //ALT  ADDRESS引脚接地时地址为0x46，接电源时地址为0xB8
  23. typedef   unsigned char BYTE;
  24. typedef   unsigned short WORD;

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

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

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

  39. void  Single_Write_BH1750(uchar REG_Address);               //单个写入数据
  40. uchar Single_Read_BH1750(uchar REG_Address);                //单个读取内部寄存器数据
  41. void  Multiple_Read_BH1750();                               //连续的读取内部寄存器数据
  42. //------------------------------------
  43. void Delay5us();
  44. void Delay5ms();
  45. void BH1750_Start();                    //起始信号
  46. void BH1750_Stop();                     //停止信号
  47. void BH1750_SendACK(bit ack);           //应答ACK
  48. bit  BH1750_RecvACK();                  //读ack
  49. void BH1750_SendByte(BYTE dat);         //IIC单个字节写
  50. BYTE BH1750_RecvByte();                 //IIC单个字节读

  52. //-----------------------------------

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

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

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

  123. /**************************************
  124. 延时5微秒(STC90C52RC@12M)
  125. 不同的工作环境,需要调整此函数，注意时钟过快时需要修改
  126. 当改用1T的MCU时,请调整此延时函数
  127. **************************************/
  128. void Delay5us()
  129. {
  130.     _nop_();_nop_();_nop_();_nop_();
  131.     _nop_();_nop_();_nop_();_nop_();
  132.         _nop_();_nop_();_nop_();_nop_();
  133.         _nop_();_nop_();_nop_();_nop_();
  134. }

  136. /**************************************
  137. 延时5毫秒(STC90C52RC@12M)
  138. 不同的工作环境,需要调整此函数
  139. 当改用1T的MCU时,请调整此延时函数
  140. **************************************/
  141. void Delay5ms()
  142. {
  143.     WORD n = 560;

  145.     while (n--);
  146. }

  148. /**************************************
  149. 起始信号
  150. **************************************/
  151. void BH1750_Start()
  152. {
  153.     SDA = 1;                    //拉高数据线
  154.     SCL = 1;                    //拉高时钟线
  155.     Delay5us();                 //延时
  156.     SDA = 0;                    //产生下降沿
  157.     Delay5us();                 //延时
  158.     SCL = 0;                    //拉低时钟线
  159. }

  161. /**************************************
  162. 停止信号
  163. **************************************/
  164. void BH1750_Stop()
  165. {
  166.     SDA = 0;                    //拉低数据线
  167.     SCL = 1;                    //拉高时钟线
  168.     Delay5us();                 //延时
  169.     SDA = 1;                    //产生上升沿
  170.     Delay5us();                 //延时
  171. }

  173. /**************************************
  174. 发送应答信号
  175. 入口参数:ack (0:ACK 1:NAK)
  176. **************************************/
  177. void BH1750_SendACK(bit ack)
  178. {
  179.     SDA = ack;                  //写应答信号
  180.     SCL = 1;                    //拉高时钟线
  181.     Delay5us();                 //延时
  182.     SCL = 0;                    //拉低时钟线
  183.     Delay5us();                 //延时
  184. }

  186. /**************************************
  187. 接收应答信号
  188. **************************************/
  189. bit BH1750_RecvACK()
  190. {
  191.     SCL = 1;                    //拉高时钟线
  192.     Delay5us();                 //延时
  193.     CY = SDA;                   //读应答信号
  194.     SCL = 0;                    //拉低时钟线
  195.     Delay5us();                 //延时

  197.     return CY;
  198. }

  200. /**************************************
  201. 向IIC总线发送一个字节数据
  202. **************************************/
  203. void BH1750_SendByte(BYTE dat)
  204. {
  205.     BYTE i;

  207.     for (i=0; i<8; i++)         //8位计数器
  208.     {
  209.         dat <<= 1;              //移出数据的最高位
  210.         SDA = CY;               //送数据口
  211.         SCL = 1;                //拉高时钟线
  212.         Delay5us();             //延时
  213.         SCL = 0;                //拉低时钟线
  214.         Delay5us();             //延时
  215.     }
  216.     BH1750_RecvACK();
  217. }

  219. /**************************************
  220. 从IIC总线接收一个字节数据
  221. **************************************/
  222. BYTE BH1750_RecvByte()
  223. {
  224.     BYTE i;
  225.     BYTE dat = 0;

  227.     SDA = 1;                    //使能内部上拉,准备读取数据,
  228.     for (i=0; i<8; i++)         //8位计数器
  229.     {
  230.         dat <<= 1;
  231.         SCL = 1;                //拉高时钟线
  232.         Delay5us();             //延时
  233.         dat |= SDA;             //读数据               
  234.         SCL = 0;                //拉低时钟线
  235.         Delay5us();             //延时
  236.     }
  237.     return dat;
  238. }

  240. //*********************************

  242. void Single_Write_BH1750(uchar REG_Address)
  243. {
  244.     BH1750_Start();                  //起始信号
  245.     BH1750_SendByte(SlaveAddress);   //发送设备地址+写信号
  246.     BH1750_SendByte(REG_Address);    //内部寄存器地址，
  247.   //  BH1750_SendByte(REG_data);       //内部寄存器数据，
  248.     BH1750_Stop();                   //发送停止信号
  249. }

  251. //********单字节读取*****************************************
  252. /*
  253. uchar Single_Read_BH1750(uchar REG_Address)
  254. {  uchar REG_data;
  255.     BH1750_Start();                          //起始信号
  256.     BH1750_SendByte(SlaveAddress);           //发送设备地址+写信号
  257.     BH1750_SendByte(REG_Address);                   //发送存储单元地址，从0开始        
  258.     BH1750_Start();                          //起始信号
  259.     BH1750_SendByte(SlaveAddress+1);         //发送设备地址+读信号
  260.     REG_data=BH1750_RecvByte();              //读出寄存器数据
  261.         BH1750_SendACK(1);   
  262.         BH1750_Stop();                           //停止信号
  263.     return REG_data;
  264. }
  265. */
  266. //*********************************************************
  267. //
  268. //连续读出BH1750内部数据
  269. //
  270. //*********************************************************
  271. void Multiple_read_BH1750(void)
  272. {   uchar i;        
  273.     BH1750_Start();                          //起始信号
  274.     BH1750_SendByte(SlaveAddress+1);         //发送设备地址+读信号
  275.         
  276.          for (i=0; i<3; i++)                      //连续读取2个地址数据，存储中BUF
  277.     {
  278.         BUF[i] = BH1750_RecvByte();          //BUF[0]存储0x32地址中的数据
  279.         if (i == 3)
  280.         {

  282.            BH1750_SendACK(1);                //最后一个数据需要回NOACK
  283.         }
  284.         else
  285.         {               
  286.           BH1750_SendACK(0);                //回应ACK
  287.        }
  288.    }

  290.     BH1750_Stop();                          //停止信号
  291.     Delay5ms();
  292. }


  295. //初始化BH1750，根据需要请参考pdf进行修改****
  296. void Init_BH1750()
  297. {
  298.    Single_Write_BH1750(0x01);  

  300. }
  301. //*********************************************************
  302. //主程序********
  303. //*********************************************************
  304. void main()
  305. {  
  306.    float temp;
  307.    delay_nms(0);            //延时100ms        
  308.    InitLcd();           //初始化LCD
  309.    Init_BH1750();       //初始化BH1750

  311.   while(1)              //循环
  312.   {
  313.     Single_Write_BH1750(0x01);   // power on
  314.     Single_Write_BH1750(0x10);   // H- resolution mode

  316.      delay_nms(3000);              //延时180ms

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

  320.     dis_data=BUF[0];
  321.     dis_data=(dis_data<<8)+BUF[1];//合成数据，即光照数据
  322.    
  323.     temp=(float)dis_data/1.2;

  325.     conversion(temp);         //计算数据和显示
  326.         DisplayOneChar(0,0,'L');
  327.         DisplayOneChar(1,0,'i');
  328.         DisplayOneChar(2,0,'g');
  329.         DisplayOneChar(3,0,'h');
  330.         DisplayOneChar(4,0,'t');
  331.     DisplayOneChar(5,0,':');
  332. ……………………

  334. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
STC_BH1750.zip (42.69 KB, 下载次数: 92)


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

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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