功能介绍:采用51单片机作为主控CPU,采用ds1302时间模块获取当前的时间,采用光敏模块采集当前的光照值,通过按键设置补光定时时间,当时间到达,补光自动打开,LED亮,并且相关数值都通过LCD1602显示,文末有资料分享:
38-基于51单片机的智能大棚鸡棚养殖棚定时补光器(程序+原理图+元件清单全套资料)

程序打开办法:特别注意:下载资料包以后一定要先解压!!!(建议解压到桌面上,文件路径太深会导致程序打开异常),解压后再用keil5打开。

程序部分展示,有中文注释,新手容易看懂
void LcdDisplay()
{
writecom(0xc0);
writedata('0'+TIME[2]/16); //时
writedata('0'+(TIME[2]&0x0f));
writedata('-');
writedata('0'+TIME[1]/16); //分
writedata('0'+(TIME[1]&0x0f));
writedata('-');
writedata('0'+TIME[0]/16); //秒
writedata('0'+(TIME[0]&0x0f));
writedata(' ');
writedata(' ');
writedata(' ');
writedata('0'+shi/10);
writedata('0'+shi%10);
writedata('-');
writedata('0'+fen/10);
writedata('0'+fen%10);
writecom(0x80);
writedata('2');
writedata('0');
writedata('0'+TIME[6]/16); //年
writedata('0'+(TIME[6]&0x0f));
writedata('-');
writedata('0'+TIME[4]/16); //月
writedata('0'+(TIME[4]&0x0f));
writedata('-');
writedata('0'+TIME[3]/16); //日
writedata('0'+(TIME[3]&0x0f));
writedata(0x8D);
writedata('0'+(TIME[5]&0x07)); //星期
writedata(' ');
if(gm==1||((shi/10==TIME[2]/16)&&(shi%10==TIME[2]%16)&&(fen/10==TIME[1]/16)&&(fen%10==TIME[1]%16)))
{
writedata(' ');
writedata('O');
writedata('N');
led=0;
}
else
{
writedata('O');
writedata('F');
writedata('F');
led=1;
}
if(k3==0)
{
shi=0;fen=0;
}
}
/*******************************************************************************
* 函数名 : Delay10ms
* 函数功能 : 延时函数,延时10ms
* 输入 : 无
* 输出 : 无
*******************************************************************************/
void Delay10ms(void) //误差 0us
{
unsigned char a,b,c;
for(c=1;c>0;c--)
for(b=38;b>0;b--)
for(a=130;a>0;a--);
}
/*******************************************************************************
* 函 数 名 : void Timer0() interrupt 1
* 函数功能 : 定时器0中断函数
* 输 入 : 无
* 输 出 : 无
*******************************************************************************/
void Timer0() interrupt 1
{
static unsigned int count;
TH0=0XFC; //给定时器赋初值,定时1ms
TL0=0X18;
count++;
if(count==10)
{
count=0;
key_proy();
}
下面是原理图文件展示:



本文介绍了使用51单片机控制的智能大棚鸡棚养殖棚补光器,包含时间获取、光照检测、按键设置和LCD1602显示等功能。程序部分展示了如何通过定时器0实现定时控制,并附有详细步骤和中文注释。
1137

被折叠的 条评论
为什么被折叠?



