该程序为51单片机c语言电子万年历
#include"reg52.h"
//#include<stdio.h>
#defineucharunsignedchar
#defineuintunsignedint
sbitlcden=P3^4;
sbitlcdrs=P3^5;
sbitDATA=P0^7;
sbitRST=P0^5;
voidDisplaySecond(ucharx);
voidDisplayMinute(ucharx);
voidDisplayHour(ucharx);
voidDisplayDay(ucharx);
voidDisplayMonth(ucharx);
voidDisplayYear(ucharx);
voidDisplayWeek(ucharx);
write_data(0+0x30);
write_com(0x83);
write_data(i+0x30);
write_com(0x84);
write_data(j+0x30);
write_com(0x85);
write_data('/');
}
voidDisplayWeek(ucharx)
{uchari;
write_data(j+0x30);
write_com(0x88);
write_data('/');
}
voidDisplayYear(ucharx)
{
uchari,j;
i=x/10;
j=x%10;
write_com(0x81);
write_data(2+0x30);
write_com(0x82);
voidwrite_com(ucharcom)
{
lcdrs=0;
P2=com;
delayms(5);
lcden=1;
delayms(5);
lcden=0;
}
voidwrite_data(uchardate)
{
lcdrs=1;
P2=date;
delayms(5);
lcden=1;
delayms(5);
ucharsecond,minute,hour,day,month,year,week,count=0;
ucharReadValue,num,time;
voiddelayms(uintx)
{
uinti,j;
for(i=x;i>0;i--)
for(j=110;j>0;j--);
}
////////////////////////////////////////////////////////////
SCLK=0;//拉低SCLK，形成脉冲下降沿
delayms(2);//稍微等待
}
returndat;//将读出的数据返回
}
ucharReadSet1302(ucharCmd)
{
uchardat;
RST=0;//拉低RST
SCLK=0;//确保写数居前SCLK被拉低
RST=1;//启动数据传输
Write1302(Cmd);//写入命令字
WriteSet1302(0x88,((2/10)<<4|(2%10)));//根据写月寄存器命令字，写入月的初始值
WriteSet1302(0x8c,((14/10)<<4|(14%10)));//nian
//WriteSet1302(0x8a,((4/10)<<4|(4%10)));
}
/////////////////////////////////////////////////////////////////
x=x*3;
//write_com(0x8c);write_data(table2[x]);
//write_com(0x8d);write_data(table2[x+1]);
//write_com(0x8e);write_data(table2[x+2]);
write_com(0x8c);
for(i=0;i<3;i++)
day=((ReadValue&0x70)>>4)*10+(ReadValue&0x0F);
ReadValue=ReadSet1302(0x89);
month=((ReadValue&0x70)>>4)*10+(ReadValue&0x0F);
ReadValue=ReadSet1302(0x8d);
voiddis_temp(uintt);
voidread_date(void);
voidturn_val(charnewval,ucharflag,
ucharnewaddr,uchars1num);
voidkey_scan(void);
charcode;
ucharcodetable2[]="TUEWESTHUFRISATSUNMON"+0x46);
write_data(i+0x30);
write_com(0x80+0x47);
write_data(j+0x30);
}
voidDisplayMinute(ucharx)
{
uchari,j;
i=x/10;
j=x%10;
write_com(0x80+0x43);
voidDisplaySecond(ucharx)
{
uchari,j;
i=x/10;
j=x%10;
write_com(0x80+0x46);
write_data(i+0x30);
write_com(0x80+0x47);
write_data(j+0x30);
write_com(0x80+0x48);
write_data(i+0x30);
write_com(0x80+0x44);
write_data(j+0x30);
write_com(0x80+0x45);
write_data(':');
}
voidDisplayHour(ucharx)
{
uchari,j;
i=x/10;
j=x%10;
write_com(0x80+0x40);
for(i=0;i<8;i++)//连续读8个二进制位数据
{
dat>>=1;//将dat的各数据位右移1位，因为先读出的是字节的最低位
if(DATA==1)//如果读出的数据是1
dat|=0x80;//将1取出，写在dat的最高位
SCLK=1;//将SCLK置于高电平，为下降沿读出
delayms(2);//稍微等待
voidinit();
voiddis_temp(uintt);
voidWrite1302(uchardat);
voidWriteSet1302(ucharCmd,uchardat);
ucharRead1302(void);
ucharReadSet1302(ucharCmd);
voidInit_DS1302(void);
{
write_data(table2[x]);
x++;
}
}
voidread_date(void)
{
ReadValue=ReadSet1302(0x81);
second=((ReadValue&0x70)>>4)*10+(ReadValue&0x0F);
ReadValue=ReadSet1302(0x83);
SCLK=1;//上升沿写入数据
delayms(2);//稍微等待，使硬件做好准备
SCLK=0;//重新拉低SCLK，形成脉冲
dat>>=1;//将dat的各数据位右移1位，准备写入下一个数据位
}
}
voidWriteSet1302(ucharCmd,uchardat)
{
RST=0;//禁止数据传递
SCLK=0;//确保写数居前SCLK被拉低
write_data('');
dis_temp(get_temp());
}
voidDisSecond(ucharx)
{
uchari,j;
ReadValue=ReadSet1302(0x81);
second=((ReadValue&0x70)>>4)*10+(ReadValue&0x0F);
i=x/10;
sbitSCLK=P0^6;
sbitmenu=P3^0;//菜单
sbitadd=P3^1;//加一
sbitdec=P3^7;//减一
sbitled0=P1^0;
sbitled1=P1^1;
sbitled2=P1^2;
sbitled3=P1^3;
sbitds=P3^2;
//sbitbeep=P3^3;
minute=((ReadValue&0x70)>>4)*10+(ReadValue&0x0F);
ReadValue=ReadSet1302(0x85);
hour=((ReadValue&0x70)>>4)*10+(ReadValue&0x0F);