转——用GY30,LCD,89C52单片机显示光照强度带源码任务书

Zedd · 发表于 2018-11-19 13:29

EDA365欢迎您登录！

您需要登录才可以下载或查看，没有帐号？注册

x

本帖最后由 Zedd 于 2018-11-19 13:30 编辑

转——用GY30,LCD,89C52单片机显示光照强度带源码

用STC89C52
选用光照强度传感器模块GY30
用LCD显示数值
并在超过设置数值是蜂鸣器报警
资料包括源代码原理图接线图

测控技术综合实践任务书

精密仪器系测控技术与仪器专业仪131班学生李沛尧、宋程、杜益帆、李苑

一、课题光照度显示电路设计

二、工作自 2017 年 01 月 03 日起至 2017 年 01 月 13 日止

三、进行地点西安理工大学

四、内容要求

本课题的任务是设计一种能够测量光照强度并显示出来的电路，重点在于掌握将光照强度转换成可测量的量值，以便于测量和显示。结合51单片机开发板和光照传感器共同设计一个基于单片机的数字式光照强度检测系统。

设计的基本要求：

1. 查阅资料，了解光照强度传感器

2. 焊接调试光照传感器电路

3. 焊接调试液晶显示屏电路，标定光照强度基本单位

4. 编写单片机基本程序，将获得的光信号转化成光照强度单位下的数值，并用液晶屏显示

5. 调试测量当前环境中的光照强度

6. 论文需写出摘要（中文、英文）、致谢、参考文献

7. 撰写设计设计报告

指导教师高鹤明

接受设计论文任务开始执行日期 2017-01-03

学生签名

单片机源程序：

#include  <REG51.H>
#include  <math.h> //Keil library
#include  <stdio.h> //Keil library
#include  <INTRINS.H>
#define uchar unsigned char
#define uint unsigned int
#define DataPort P0       //LCD1602数据端口
sbit       SCL=P1^0;    //IIC时钟引脚定义
sbit          SDA=P1^1;    //IIC数据引脚定义
sbit    LCM_RS=P1^2; //LCD1602命令端口
sbit    LCM_RW=P1^3; //LCD1602命令端口
sbit    LCM_EN=P1^4; //LCD1602命令端口

#define       SlaveAddress 0x46 //定义器件在IIC总线中的从地址,根据ALT  ADDRESS地址引脚不同修改
                           //ALT  ADDRESS引脚接地时地址为0x46，接电源时地址为0xB8
typedef unsigned char BYTE;
typedef unsigned short WORD;

BYTE BUF[8];                      //接收数据缓存区
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);          //应答ACK
bit  BH1750_RecvACK();                //读ack
void 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;i<k;i++)
{
for(j=0;j<121;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微秒(STC90C52RC@12M)
不同的工作环境,需要调整此函数，注意时钟过快时需要修改
当改用1T的mcu时,请调整此延时函数
**************************************/
void Delay5us()
{
_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();
      _nop_();_nop_();_nop_();_nop_();
      _nop_();_nop_();_nop_();_nop_();
}

/**************************************
延时5毫秒(STC90C52RC@12M)
不同的工作环境,需要调整此函数
当改用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; i<8; 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; i<8; 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; i<3; i++)                   //连续读取2个地址数据，存储中BUF
{
      BUF = BH1750_RecvByte();       //BUF[0]存储0x32地址中的数据( w. R4 C2 b) b' c5 {
      if (i == 3)
( w4 j4 u# c) \0 p* m' T' c       {) P* C! F, A0 r, G- q& i; E
' y/ p' U% j% h  ?1 \
         BH1750_SendACK(1);             //最后一个数据需要回NOACK4 T3 u. k8 }) A" H
      }5 D8 ~: [0 o  V* o+ t4 @' u) {) U
      else
7 M7 N: U& I4 X/ e: ^2 e( r       {             $ p9 s1 h( ]3 K. V( Y7 {7 i
      BH1750_SendACK(0);             //回应ACK
( H; i3 K" I% v* [! C" V    }
4 G+ u7 t: z- H6 i% p9 j- H4 o }% _* f- w9 w1 M# \
; Y% h& ~* @' h: [3 O+ A
BH1750_Stop();                         //停止信号5 J3 @3 n4 \: f
Delay5ms();, g% m- D1 z6 x7 J( S
}/ ~3 m3 l# n: Z2 E( P+ n) @+ }- e8 ]

& l# b! N) k8 q/ \1 r' K2 Y( ]7 t9 v4 K! B
//初始化BH1750，根据需要请参考pdf进行修改****
* Z7 U/ e' v" fvoid Init_BH1750()
0 @( y" i8 [8 z' s- }{
: e, Q% G1 z6 R8 o- y1 w& w$ v Single_Write_BH1750(0x01);
, U* S$ S! I3 s4 w. q' S9 T/ o
1 X  ]/ O( Y* C5 O  D}
9 C0 Q+ @/ ~4 p. [4 @//*********************************************************  I$ M$ P2 I) k8 k
//主程序********& r& T; J- W9 @, _! q$ P- C
//*********************************************************; O: K8 `4 a$ W% i  l! ]
void main()* v0 [6 b" p& B$ U7 P- L
{
float temp;" N: w8 {/ [: n$ X9 l  H! e
delay_nms(100);          //延时100ms
$ {& ~# m6 U. w InitLcd();          //初始化LCD0 V: W2 s  \- j; {8 |+ l
Init_BH1750();    //初始化BH17503 A+ M* S; o+ u

! o; K7 L0 p: o0 `5 J; S  while(1)             //循环
5 ~' W; ^4 }# y$ n0 F2 X# m  { 7 ?  f6 B! N9 H; E2 L, N
- a% w* Y, m& O1 q  k' I
Single_Write_BH1750(0x01); // power on. x: T+ F3 u) G! x# j: S+ p$ H- N$ B
Single_Write_BH1750(0x10); // H- resolution mode
1 l' C3 u% z  T: E. I6 E6 p9 F5 D* Y% v: j$ U" q
   delay_nms(180);             //延时180ms
# C7 H; b; B! t3 a/ |" C% T% {- p7 W, j2 h- _! t# [
Multiple_Read_BH1750();    //连续读出数据，存储在BUF中" m" Q, F: w& O7 o' \0 T, P3 C* o$ s; b

1 s+ M: \( H- r5 p" x; x dis_data=BUF[0];
1 a/ I7 H4 a+ s' g! X4 g dis_data=(dis_data<<8)+BUF[1];//合成数据，即光照数据; m2 d8 p# v/ s# \
# |6 ~4 s) g1 \' i4 h' p
temp=(float)dis_data/1.2;
9 P* @( R# K% i# C2 k& O/ t$ J0 E  k8 O8 Y3 U4 q/ W
conversion(temp);       //计算数据和显示$ a# ]2 N8 X  ^! z7 ~- E2 h
      DisplayOneChar(0,0,'L');
6 D! V5 X6 D. o7 ~       DisplayOneChar(1,0,'i'); 6 b# C7 q( Q8 _5 @
      DisplayOneChar(2,0,'g');
8 B/ l& ~8 `* Z       DisplayOneChar(3,0,'h'); ( L9 e8 W  m; m2 v+ ]& _
      DisplayOneChar(4,0,'t'); % r$ t# x8 J8 G) C3 }/ k( N

; X1 q/ y+ s5 Z) z$ `; W8 e+ \* q9 E/ J2 W$ p
…………限于本文篇幅余下代码请从论坛下载附件…………3 H5 d. ]2 z7 I
7 k  I- r% @1 [5 C# I

游客，如果您要查看本帖隐藏内容请回复

vwxyz000 · 发表于 2019-12-3 15:02

十分感谢楼主分享作业有着落了

清水寺 · 发表于 2021-4-14 18:40

感谢分享，帮了忙了

yao1997 · 发表于 2020-4-30 20:29

学习一下，谢谢分享。

尣月 · 发表于 2018-11-19 15:12

谢谢楼主分享

zx1339398443 · 发表于 2019-5-11 22:58

太感谢了！！

laijinhe · 发表于 2019-5-14 11:21

范特西 · 发表于 2019-5-17 16:36

分厂感谢分享

范特西 · 发表于 2019-5-17 16:40

其二过热过

for6iven · 发表于 2019-6-22 22:28

本帖最后由 for6iven 于 2019-6-22 22:30 编辑

感谢分享

CUGhentai · 发表于 2019-6-28 17:18

谢谢楼主分享

anguchou · 发表于 2019-12-4 11:34

:):)

觉醒的星猫 · 发表于 2019-12-13 18:06

感谢楼主的分享

chunming · 发表于 2019-12-26 18:55

qaqaq · 发表于 2020-3-2 21:11

1111111111111

wangoo1 · 发表于 2020-5-3 15:25

谢谢分享！！

帐号		自动登录	找回密码
密码			注册

转——用GY30,LCD,89C52单片机显示光照强度带源码任务书

EDA365欢迎您登录！

浏览过的版块

推荐内容 /1

转——用GY30,LCD,89C52单片机显示光照强度 带源码 任务书

EDA365欢迎您登录！

浏览过的版块

推荐内容 /1

转——用GY30,LCD,89C52单片机显示光照强度带源码任务书