问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

求教一个51单片机程序。。(LCD电子时钟)

发布网友 发布时间:2022-05-01 09:12

我来回答

5个回答

热心网友 时间:2022-06-27 07:28

#include<reg52.h>
#define uint unsigned int
#define uchar unsigned char
uchar a,miao,shi,fen,ri,yue,nian,week,flag,key1n,temp;
#define yh 0x80
#define er 0x80+0x40//液晶屏的与 C51 之间的引脚连接定义
sbit rs=P2^5;
sbit en=P2^7;
sbit rw=P2^6;//如果硬件上 rw 接地,就不用写这句和后面的 rw=0
//DS1302 时钟芯片与 C51 之间的引脚连接定义
sbit IO=P3^6;
sbit SCLK=P3^5;
sbit RST=P3^7;
sbit ACC0=ACC^0;
sbit ACC7=ACC^7;//校时按键与 C51 的引脚连接定义
sbit key1=P3^2;//设置键
sbit key2=P3^3;//加键
sbit key3=P3^4;//减键
uchar code tab1[]={"20//////////"};//年显示的固定字符
uchar code tab2[]={"LOVE ::::::"};//时间显示的固定字符

//延时函数,后面经常调用
void delay(uint xms)//延时函数,有参函数
{
uint x,y;
for(x=xms;x>0;x--)
for(y=110;y>0;y--);
}
/********液晶写入指令函数与写入数据函数,以后可调用**************/
write_1602com(uchar com) //****液晶写入指令函数****
{
rs=0; //数据/指令选择置为指令
rw=0; //读写选择 置为写
P0=com; //送入数据
delay(1);
en=1; //拉高使能端,为制造有效的下降沿做准备
delay(1);
en=0;
//en 由高变低,产生下降沿,液晶执行命令
}

write_1602dat(uchar dat) //***液晶写入数据函数****
{
rs=1; //数据/指令选择置为数据
rw=0; //读写选择置为写
P0=dat; //送入数据
delay(1);
en=1; //en 置高电平,为制造下降沿做准备
delay(1);
en=0; //en 由高变低,产生下降沿,液晶执行命令

}

lcd_init() //***液晶初始化函数****//
{
write_1602com(0x38); //设置液晶工作模式,意思:16*2 行显示,5*7 点阵,8 位数据
write_1602com(0x0c); //开显示不显示光标
write_1602com(0x06); //整屏不移动,光标自动右移
write_1602com(0x01); //清显示
write_1602com(yh+1); //日历显示固定符号从第一行第 1 个位置之后开始显示
for(a=0;a<14;a++)
{
write_1602dat(tab1[a]); //向液晶屏写日历显示的固定符号部分
}
write_1602com(er+1);//时间显示固定符号写入位置,从第 2 个位置后开始显示
for(a=0;a<12;a++)
{
write_1602dat(tab2[a]);//写显示时间固定符号,两个冒号
}
}
/***************DS1302 有关子函数********************/
void write_byte(uchar dat)//写一个字节
{
ACC=dat;
RST=1;
for(a=8;a>0;a--)
{
IO=ACC0;//相当于汇编中的 RRC
SCLK=0;
SCLK=1;
ACC=ACC>>1;
}
}
uchar read_byte() //读一个字节
{
RST=1;
for(a=8;a>0;a--)
{
ACC7=IO;
SCLK=1;
SCLK=0;
ACC=ACC>>1;
}
return (ACC);
}
//----------------------------------------//
void write_1302(uchar add,uchar dat) //向 1302 芯片写函数,指定写入地址,数据
{
RST=0;
SCLK=0;
RST=1;
write_byte(add);
write_byte(dat);
SCLK=1;
RST=0;
}
uchar read_1302(uchar add) //从 1302 读数据函数,指定读取数据来源地址
{
uchar temp;
RST=0;
SCLK=0;
RST=1;
write_byte(add);
temp=read_byte();
SCLK=1;
RST=0;
return(temp);
}
uchar BCD_Decimal(uchar bcd)//BCD 码转十进制函数,输入 BCD,返回十进制
{
uchar Decimal;
Decimal=bcd>>4;
return(Decimal=Decimal*10+(bcd&=0x0F));
}
//--------------------------------------//
void ds1302_init()//1302 芯片初始化子函数(2010-01-07,12:00:00,week4)
{
RST=0;
SCLK=0;
write_1302(0x8e,0x00);//允许写,禁止写保护
write_1302(0x8e,0x80);//打开写保护
}
//时分秒显示子函数
void write_sfm(uchar add,uchar dat)//向 LCD 写时分秒,有显示位置加、现示数据,两个参数
{
uchar gw,sw;
gw=dat%10;//取得个位数字
sw=dat/10;//取得十位数字
write_1602com(er+add);//er 是头文件规定的值 0x80+0x40
write_1602dat(0x30+sw);//数字+30 得到该数字的 LCD1602 显示码
write_1602dat(0x30+gw);//数字+30 得到该数字的 LCD1602 显示码
}
//年月日显示子函数
void write_nyr(uchar add,uchar dat)//向 LCD 写年月日,有显示位置加数、显示数据,两个参数
{
uchar gw,sw;
gw=dat%10;//取得个位数字
sw=dat/10;//取得十位数字
write_1602com(yh+add);//设定显示位置为第一个位置+add
write_1602dat(0x30+sw);//数字+30 得到该数字的 LCD1602 显示码
write_1602dat(0x30+gw);//数字+30 得到该数字的 LCD1602 显示码
}
void write_week(uchar week)//写星期函数
{
write_1602com(yh+0x0c);//星期字符的显示位置
switch(week)
{
case 1:write_1602dat('M');//星期数为一时,显示
write_1602dat('o');
write_1602dat('n');break;
case 2:write_1602dat('T');//星期数据为二时显示
write_1602dat('u');
write_1602dat('e');break;
case 3:write_1602dat('W');//星期数据为三时显示
write_1602dat('e');
write_1602dat('d');break;
case 4:write_1602dat('T');//星期数据为四是显示
write_1602dat('h');
write_1602dat('u');break;
case 5:write_1602dat('F');//星期数据为五时显示
write_1602dat('r');
write_1602dat('i');break;
case 6:write_1602dat('S');//星期数据为六时显示
write_1602dat('t');
write_1602dat('a');break;
case 7:write_1602dat('S');//星期数据为日时显示
write_1602dat('u');
write_1602dat('n');break;
}
}
//****************键盘扫描有关函数**********************
void keyscan()
{
if(key1==0)//key1 为功能键(设置键)
{
delay(9);//延时,用于消抖动
if(key1==0)//延时后再次确认按键按下
{
delay(20);
while(!key1);
key1n++;
if(key1n==9)
key1n=1;//设置按键共有秒、分、时、星期、日、月、年、返回,8 个功能循环
switch(key1n)
{
case 1:TR0=0;//关闭定时器
write_1602com(er+0x0E);//设置按键按动一次,秒位置显示光标
write_1602com(0x0f);//设置光标为闪烁
temp=(miao)/10*16+(miao)%10;//秒数据写入 DS1302
write_1302(0x8e,0x00);
write_1302(0x80,0x80|temp);//miao
write_1302(0x8e,0x80);break;
case 2:write_1602com(er+11);//按 2 次 fen 位置显示光标
break;
case 3:write_1602com(er+8);//按动 3 次,shi
break;
case 4:write_1602com(yh+0x0e);//按动 4 次,week
break;
case 5:write_1602com(yh+0x0a);//按动 5 次,ri
break;
case 6:write_1602com(yh+0x07);//按动 6 次,yue
break;
case 7:write_1602com(yh+0x04);//按动 7 次,nian
break;
case 8:write_1602com(0x0c);//按动到第 8 次,设置光标不闪烁
TR0=1;//打开定时器
TR0=1;
temp=(miao)/10*16+(miao)%10;
write_1302(0x8e,0x00);
write_1302(0x80,0x00|temp);//miao 数据写入 DS1302
write_1302(0x8e,0x80);break;
}
}
}
//------------------------------加键 key2----------------------------//
if(key1n!=0)//当 key1 按下以下。再按以下键才有效(按键次数不等于零)
{
if(key2==0)//上调键
{
delay(10);
if(key2==0)
{
delay(20);
while(!key2);
switch(key1n)
{
case 1:miao++;//设置键按动 1 次,调秒
if(miao==60)
miao=0;
write_sfm(0x0D,miao);
temp=(miao)/10*16+(miao)%10;
write_1302(0x8e,0x00);
write_1302(0x80,temp);
write_1302(0x8e,0x80);
write_1602com(er+0x0E);
break;
case 2:fen++;
if(fen==60)
fen=0;
write_sfm(0x0A,fen);
temp=(fen)/10*16+(fen)%10;
write_1302(0x8e,0x00);
write_1302(0x82,temp);
write_1302(0x8e,0x80);
write_1602com(er+11);
break;
case 3:shi++;
if(shi==24)
shi=0;
write_sfm(7,shi);
temp=(shi)/10*16+(shi)%10;
write_1302(0x8e,0x00);
write_1302(0x84,temp);
write_1302(0x8e,0x80);
write_1602com(er+8);
break;
case 4:week++;
if(week==8)
week=1;
write_1602com(yh+0x0C) ;
write_week(week);
temp=(week)/10*16+(week)%10;
write_1302(0x8e,0x00);
write_1302(0x8a,temp);
write_1302(0x8e,0x80);
write_1602com(yh+0x0e);
break;
case 5:ri++;
if(ri==32)
ri=1;
write_nyr(9,ri);
temp=(ri)/10*16+(ri)%10;
write_1302(0x8e,0x00);
write_1302(0x86,temp);
write_1302(0x8e,0x80);
write_1602com(yh+10);
break;
case 6:yue++;
if(yue==13)
yue=1;
write_nyr(6,yue);
temp=(yue)/10*16+(yue)%10;
write_1302(0x8e,0x00);
write_1302(0x88,temp);
write_1302(0x8e,0x80);
write_1602com(yh+7);
break;
case 7:nian++;
if(nian==100)
nian=0;
write_nyr(3,nian);
temp=(nian)/10*16+(nian)%10;
write_1302(0x8e,0x00);
write_1302(0x8c,temp);
write_1302(0x8e,0x80);
write_1602com(yh+4);
break;
}
}
}
//------------------减键 key3,各句功能参照'加键'注释---------------
if(key3==0)
{
delay(10);
//调延时,消抖动
if(key3==0)
{
delay(20);
while(!key3);
switch(key1n)
{
case 1:miao--;
if(miao==-1)
miao=59;
write_sfm(0x0D,miao);
temp=(miao)/10*16+(miao)%10;
write_1302(0x8e,0x00);
write_1302(0x80,temp);
write_1302(0x8e,0x80);
write_1602com(er+0x0E);
break;
case 2:fen--;
if(fen==-1)
fen=59;
write_sfm(10,fen);
temp=(fen)/10*16+(fen)%10;
write_1302(0x8e,0x00);
write_1302(0x82,temp);
write_1302(0x8e,0x80);
write_1602com(er+11);
break;
case 3:shi--;
if(shi==-1)
shi=23;
write_sfm(7,shi);
temp=(shi)/10*16+(shi)%10;
write_1302(0x8e,0x00);
write_1302(0x84,temp);
write_1302(0x8e,0x80);
write_1602com(er+8);
break;
case 4:week--;
if(week==0)
week=7;
write_1602com(yh+0x0C);
write_week(week);
temp=(week)/10*16+(week)%10;
write_1302(0x8e,0x00);
write_1302(0x8a,temp);
write_1302(0x8e,0x80);
write_1602com(yh+0x0e);
break;
case 5:ri--;
if(ri==0)
ri=31;
write_nyr(9,ri);
temp=(ri)/10*16+(ri)%10;//十进制转换成 DS1302 要求的 DCB 码
write_1302(0x8e,0x00);//允许写,禁止写保护
write_1302(0x86,temp);//向 DS1302 内写日期寄存器 86H 写入调整后的日期数据 BCD 码
write_1302(0x8e,0x80);//打开写保护
write_1602com(yh+10);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
break;
case 6:yue--;
if(yue==0)
yue=12;
write_nyr(6,yue);
temp=(yue)/10*16+(yue)%10;//十进制转换成 DS1302 要求的 DCB 码
write_1302(0x8e,0x00);//允许写,禁止写保护
write_1302(0x88,temp);//向 DS1302 内写月份寄存器 88H 写入调整后的月份数据 BCD 码
write_1302(0x8e,0x80);//打开写保护
write_1602com(yh+7);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
break;
case 7:nian--;
if(nian==-1)
nian=99;
write_nyr(3,nian);
temp=(nian)/10*16+(nian)%10;//十进制转换成 DS1302 要求的 DCB 码
write_1302(0x8e,0x00);//允许写,禁止写保护
write_1302(0x8c,temp);//向 DS1302 内写年份寄存器 8cH 写入调整后的年份数据 BCD 码
write_1302(0x8e,0x80);//打开写保护
write_1602com(yh+4);//因为设置液晶的模式是写入数据后,指针自动加一,所以需要光标回位
break;
}
}
}
}
}
void init()
//定时器、计数器设置函数
{
TMOD=0x11;
//指定定时/计数器的工作方式为 3
TH0=0;
//定时器 T0 的高四位=0
TL0=0;
//定时器 T0 的低四位=0
EA=1;
//系统允许有开放的中断
ET0=1;
//允许 T0 中断
TR0=1;
//开启中断,启动定时器
}
//*******************主函数**************************
void main()
{
lcd_init();//调用液晶屏初始化子函数
ds1302_init();//调用 DS1302 时钟的初始化子函数
init(); //调用定时计数器的设置子函数
delay(80);
while(1)
//无限循环下面的语句:
{
keyscan();
//调用键盘扫描子函数
}
}
void timer0() interrupt 1 //取得并显示日历和时间
{ //读取秒时分周日月年七个数据(DS1302 的读寄存器与写寄存器不一样)
miao = BCD_Decimal(read_1302(0x81));
fen = BCD_Decimal(read_1302(0x83));
shi = BCD_Decimal(read_1302(0x85));
ri = BCD_Decimal(read_1302(0x87));
yue = BCD_Decimal(read_1302(0x89));
nian=BCD_Decimal(read_1302(0x8d));
week=BCD_Decimal(read_1302(0x8b));
//显示秒、时、分数据:
write_sfm(13,miao); //秒,从第二行第 8 个字后开始显示(调用时分秒显示子函数)
write_sfm(10,fen); //分,从第二行第 5 个字符后开始显示
write_sfm(7,shi); //小时,从第二行第 2 个字符后开始显示
//显示日、月、年数据:
write_nyr(9,ri); //日期,从第二行第 9 个字符后开始显示
write_nyr(6,yue); //月份,从第二行第 6 个字符后开始显示
write_nyr(3,nian); //年,从第二行第 3 个字符后开始显示
write_week(week);
}

热心网友 时间:2022-06-27 07:28

你的单片机信息和单片机原理图都没提供,源代码是没法写的啊,要的话留邮箱,我这有stc89c52的源程序,功能差不多,你可以修改一下追问问题里面的图片是我的QQ,能QQ联系一下吗

追答我的程序功能,你看有没有帮助。我q243793299
采用LCD1602显示
-------------------------

K4 ---设定闹钟使能与禁止

按K4键后,LCD1602的第二行的最右边有小喇叭显示,闹钟使能。

再按K4键,不显示小喇叭,闹钟禁止。

-------------------------

K3 ---时间设定键

设定顺序:年,月,日,星期,时,分,秒。

被选中的设定位闪动。

K2 ---加键

设定数增加

K1 ---减键

设定数减少

每当有键按下,蜂鸣器会响一声。

-------------------------
双键功能:
-------------------------

K1 ---+K2

先按住K1,然后再按K2,写入程序默认时间值。

06/05/01 Week:1
Time: 23:59:00

-------------------------

K1 ---+K3

先按住K1,然后再按一下K3,程序进入查看定时时间值。

06/05/01 Week:1
Alarm:23:59:00 × ←小喇叭显示

此界面显示2-3秒后,返回到正常时间显示界面。

-------------------------

K1 ---+K4

先按住K1,然后再按一下K4,程序进入设定定时时间值。

设定顺序:时,分。 (K4键选择)

被选中的设定位闪动。

K2 ---加键

设定数增加

K1 ---减键

设定数减少

每当有键按下,蜂鸣器会响一声。

当定时时间与现行时间相等时,蜂鸣器响一分钟。

可以按K4键止闹。

-------------------------

热心网友 时间:2022-06-27 07:28

看要一下你是个什么开发板,上面有没有时钟IC了,没有专用的时钟IC,时间做出来有可能不是很准确

热心网友 时间:2022-06-27 07:29

给我个邮箱 给你程序...
(我用的是时钟DS1302)

热心网友 时间:2022-06-27 07:30

很简单了来自:求助得到的回答
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
除了IQ ,EQ...还有什么Q??? ...我打不开QQ空间,网页下面显示网页有错误,但是网页打开已完成._百度... 电脑上能上QQ QQ空间也能上 但是别的网页打不开 怎么回事 求大神... adobe怎么更改gpucache文件夹路径? 怎么回向消除自己的罪障? 最正确的心经回向文 ...弟子申洪愿以本次持诵佛号的功德回向给亲爸亲妈,亲妹,亲弟,妻子... 如何在win10下安装docker? windows(win10)上的docker使用:安装(国内镜像)、操作 win10安装dockerWin10下Docker安装和使用 赛尔号我的圣者炎龙打麒麟够了么? 赛尔号的麒麟第六轮回怎么打,圣者炎龙只有烧伤有效,疲惫没用。 我有一块17英寸LCD显示器,想把他做成一个电子挂钟,不知道该如何着手,请高人赐教! 睡前做什么事更容易快速睡着? 赛尔号圣者炎龙可以单过青龙吗?不用布鲁可以吗? 我要做一个液晶显示多功能数字时钟设计,谁能给我一些资料,谢谢 睡觉前想些什么容易入睡 赛尔号里的圣者炎龙和天幕四龙将里的火龙哪个更强?如果都是满个体极品性格? 睡前想什么才睡得快 LCD显示的电子钟 设计任务:以89C51单片机控制的时钟,在LCD显示器上显示当前的时间。 51信用卡还款后为什么还显示欠款 赛尔号圣者炎龙在2016年怎么得 睡觉前想什么东西能快点睡着 51信用卡借款多久到账呢 4399赛尔号圣者炎龙怎么打爱拍创意 要做一个用AT89C51单片机为核心,可以进行LCD显示,可以显示时分秒,可以报时,报警的多功能电子钟,怎样做 赛尔号圣者炎龙龙炎吐息为什么对青龙使用时没有把体力转化到自身体内,而是直接阵亡? 赛尔号奇美拉 圣者炎龙 铂修斯哪个好 赛尔号圣者炎龙绝版了吗??没绝版在哪获得?? LCD显示的电子钟需要些什么材料,最好说明规格和大概数量,谢谢 晚上睡觉时脑子里应该想些什么才能很快入睡?/ 4399赛尔号圣者炎龙怎么打玄武 如何快速入睡的方法 睡前八个方法让你快速进行睡眠 赛尔号猛虎王,泰古拉,奇美拉,鱼龙王,始祖灵兽,圣者炎龙买哪一只好 单片机问题求解。 电子时钟(LCD显示)的程序及原理图。 睡觉时想些什么东西(事情)比较容易入睡 赛尔号暴风女,圣者炎龙,盖尔特,魔化犀牛哪个好 赛尔号拉奥斯怎么打(用圣者炎龙可以吗) 赛尔号的青龙和白虎可不可以用圣者炎龙的炎龙吐息打?? 睡觉时想什么事情比较容易入睡? 赛尔号暴风女和圣者炎龙谁好。 赛尔号圣者炎龙怎么打朱雀和青龙 如何把电脑上的字体调大一些? 连接oracle远程服务器问题: 如何将电脑字体调大,不影响清晰度 海尔洗衣机型号里面的BZ是什么意思? 如 XQS75-BZ1128 那个BZ啥意思? 另外1128 牲畜的畜可以组什么词 畜牲的畜能组什么词 畜牲的畜组什么词 畜字,能组哪些词