BH1750数字光强度测试仪设计LCD1602显示+51单片机C语言程序完整版.doc_第1页
BH1750数字光强度测试仪设计LCD1602显示+51单片机C语言程序完整版.doc_第2页
BH1750数字光强度测试仪设计LCD1602显示+51单片机C语言程序完整版.doc_第3页
BH1750数字光强度测试仪设计LCD1602显示+51单片机C语言程序完整版.doc_第4页
BH1750数字光强度测试仪设计LCD1602显示+51单片机C语言程序完整版.doc_第5页
已阅读5页,还剩3页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

/*/ BH1750FVI IIC测试程序/ 使用单片机STC89C51 / 晶振:11.0592M/ 显示:LCD1602/ 作者:dice szj QQ:15023134/ 编译环境 Keil uVision2/*#include #include /Keil library #include /Keil library#include #define uchar unsigned char#define uint unsigned int#define DataPort P0 /LCD1602数据端口sbit SCL=P10; /IIC时钟引脚定义sbit SDA=P11; /IIC数据引脚定义sbit LCM_RS=P24; /LCD1602命令端口sbit LCM_RW=P25; /LCD1602命令端口sbit LCM_EN=P26; /LCD1602命令端口 #define SlaveAddress 0x46 /定义器件在IIC总线中的从地址,根据ALT ADDRESS地址引脚不同修改 /ALT ADDRESS引脚接地时地址为0x46,接电源时地址为0xB8typedef unsigned char BYTE;typedef unsigned short WORD;BYTE BUF8; /接收数据缓存区 uchar ge,shi,bai,qian,wan; /显示变量int dis_data; /变量void delay_nms(unsigned int k);void InitLcd();void Init_BH1750(void);void WriteDataLCM(uchar dataW);void WriteCommandLCM(uchar CMD,uchar Attribc);void DisplayOneChar(uchar X,uchar Y,uchar DData);void conversion(uint temp_data);void Single_Write_BH1750(uchar REG_Address); /单个写入数据uchar Single_Read_BH1750(uchar REG_Address); /单个读取内部寄存器数据void Multiple_Read_BH1750(); /连续的读取内部寄存器数据/-void Delay5us();void Delay5ms();void BH1750_Start(); /起始信号void BH1750_Stop(); /停止信号void BH1750_SendACK(bit ack); /应答ACKbit BH1750_RecvACK(); /读ackvoid BH1750_SendByte(BYTE dat); /IIC单个字节写BYTE BH1750_RecvByte(); /IIC单个字节读/-/*void conversion(uint temp_data) / 数据转换出 个,十,百,千,万 wan=temp_data/10000+0x30 ; temp_data=temp_data%10000; /取余运算qian=temp_data/1000+0x30 ; temp_data=temp_data%1000; /取余运算 bai=temp_data/100+0x30 ; temp_data=temp_data%100; /取余运算 shi=temp_data/10+0x30 ; temp_data=temp_data%10; /取余运算 ge=temp_data+0x30; /毫秒延时*void delay_nms(unsigned int k)unsigned int i,j;for(i=0;ik;i+)for(j=0;j121;j+);/*/void WaitForEnable(void)DataPort=0xff;LCM_RS=0;LCM_RW=1;_nop_();LCM_EN=1;_nop_();_nop_();while(DataPort&0x80);LCM_EN=0;/*/void WriteCommandLCM(uchar CMD,uchar Attribc)if(Attribc)WaitForEnable();LCM_RS=0;LCM_RW=0;_nop_();DataPort=CMD;_nop_();LCM_EN=1;_nop_();_nop_();LCM_EN=0;/*/void WriteDataLCM(uchar dataW)WaitForEnable();LCM_RS=1;LCM_RW=0;_nop_();DataPort=dataW;_nop_();LCM_EN=1;_nop_();_nop_();LCM_EN=0;/*/void InitLcd()WriteCommandLCM(0x38,1);WriteCommandLCM(0x08,1);WriteCommandLCM(0x01,1);WriteCommandLCM(0x06,1);WriteCommandLCM(0x0c,1);/*/void DisplayOneChar(uchar X,uchar Y,uchar DData)Y&=1;X&=15;if(Y)X|=0x40;X|=0x80;WriteCommandLCM(X,0);WriteDataLCM(DData);/*延时5微秒(STC90C52RC12M)不同的工作环境,需要调整此函数,注意时钟过快时需要修改当改用1T的MCU时,请调整此延时函数*/void Delay5us() _nop_();_nop_();_nop_();_nop_(); _nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();/*延时5毫秒(STC90C52RC12M)不同的工作环境,需要调整此函数当改用1T的MCU时,请调整此延时函数*/void Delay5ms() WORD n = 560; while (n-);/*起始信号*/void BH1750_Start() SDA = 1; /拉高数据线 SCL = 1; /拉高时钟线 Delay5us(); /延时 SDA = 0; /产生下降沿 Delay5us(); /延时 SCL = 0; /拉低时钟线/*停止信号*/void BH1750_Stop() SDA = 0; /拉低数据线 SCL = 1; /拉高时钟线 Delay5us(); /延时 SDA = 1; /产生上升沿 Delay5us(); /延时/*发送应答信号入口参数:ack (0:ACK 1:NAK)*/void BH1750_SendACK(bit ack) SDA = ack; /写应答信号 SCL = 1; /拉高时钟线 Delay5us(); /延时 SCL = 0; /拉低时钟线 Delay5us(); /延时/*接收应答信号*/bit BH1750_RecvACK() SCL = 1; /拉高时钟线 Delay5us(); /延时 CY = SDA; /读应答信号 SCL = 0; /拉低时钟线 Delay5us(); /延时 return CY;/*向IIC总线发送一个字节数据*/void BH1750_SendByte(BYTE dat) BYTE i; for (i=0; i8; i+) /8位计数器 dat = 1; /移出数据的最高位 SDA = CY; /送数据口 SCL = 1; /拉高时钟线 Delay5us(); /延时 SCL = 0; /拉低时钟线 Delay5us(); /延时 BH1750_RecvACK();/*从IIC总线接收一个字节数据*/BYTE BH1750_RecvByte() BYTE i; BYTE dat = 0; SDA = 1; /使能内部上拉,准备读取数据, for (i=0; i8; i+) /8位计数器 dat = 1; SCL = 1; /拉高时钟线 Delay5us(); /延时 dat |= SDA; /读数据 SCL = 0; /拉低时钟线 Delay5us(); /延时 return dat;/*void Single_Write_BH1750(uchar REG_Address) BH1750_Start(); /起始信号 BH1750_SendByte(SlaveAddress); /发送设备地址+写信号 BH1750_SendByte(REG_Address); /内部寄存器地址, / BH1750_SendByte(REG_data); /内部寄存器数据, BH1750_Stop(); /发送停止信号/*单字节读取*/*uchar Single_Read_BH1750(uchar REG_Address) uchar REG_data; BH1750_Start(); /起始信号 BH1750_SendByte(SlaveAddress); /发送设备地址+写信号 BH1750_SendByte(REG_Address); /发送存储单元地址,从0开始 BH1750_Start(); /起始信号 BH1750_SendByte(SlaveAddress+1); /发送设备地址+读信号 REG_data=BH1750_RecvByte(); /读出寄存器数据BH1750_SendACK(1); BH1750_Stop(); /停止信号 return REG_data; */*/连续读出BH1750内部数据/*void Multiple_read_BH1750(void) uchar i; BH1750_Start(); /起始信号 BH1750_SendByte(SlaveAddress+1); /发送设备地址+读信号 for (i=0; i3; i+) /连续读取2个地址数据,存储中BUF BUFi = BH1750_RecvByte(); /BUF0存储0x32地址中的数据 if (i = 3) BH1750_SendACK(1); /最后一个数据需要回NOACK else BH1750_SendACK(0); /回应ACK BH1750_Stop(); /停止信号 Delay5ms();/初始化BH1750,根据需要请参考pdf进行修改*void Init_BH1750() Single_Write_BH1750(0x01); /*/主程序*/*void main() float temp; delay_nms(100); /延时100ms InitLcd(); /初始化LCD Init_BH1750(); /初始化BH1750 while(1) /循环 Single_Write_BH1750(0x01); / power on Single_Write_BH1750(0x10); / H- resolution mode delay_nms(180); /延时180ms Multiple_Read_BH1750(); /连续读出数据,存储在BUF中 dis_data=BUF0; dis_data=(dis_data8)+BUF1; /合成数据,即光照数据 temp=(float)dis_data/1.2; conversion(temp); /计算数据和显示DisplayOneChar(0,0,L); DisplayOneChar(1,0,i); DisplayOneChar(2,0,g);

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论