设计一个基于单片机的万年历程序

Question

有偿 VX autism_xj 用24小时制式、随时可以调校时间。还需要增加公历日期显示功能（年、月、日），另允许通过转换功能键转换显示时间或日期。

Answer 1

#include<reg51.h>
#include"lcd.h"
#include"ds1302.h"

sbit K1=P3^1;
sbit K2=P3^0;
sbit K3=P3^2;
sbit K4=P3^3;  //管脚接线
unsigned char character0[24] = {0x08,0x0f,0x12,0x0f,0x0a,0x1f,0x02,0x02 ,
0x0F,0x09,0x0F,0x09,0x0F,0x09,0x13,0x00,//"月"代码 0x01
   0x0F,0x09,0x09,0x0F,0x09,0x09,0x0F,0x00,//"日"代码  0x02
}; //年
void Int0Configuration();
void LcdDisplay();
unsigned char SetState,SetPlace;
void Delay10ms(void);   //误差 0us
/*******************************************************************************
* 函数名         : main
* 函数功能    : 主函数
* 输入           : 无
* 输出           : 无
*******************************************************************************/

void main()
{
unsigned char i,h;
Int0Configuration();
LcdInit();
LcdWriteCom(0x40);
for (h=0;h<24;h++)
{
LcdWriteData(character0[h]);
}
LcdWriteCom(0x80);

// Ds1302Init();
while(1)
{
if(SetState==0)
{
Ds1302ReadTime();
}
else
{
if(K1==0) //检测按键K1是否按下
{   
Delay10ms(); //消除抖动
if(K1==0)
{   
SetPlace++;
if(SetPlace>=7)
SetPlace=0;
}

while((i<50)&&(K1==0))  //检测按键是否松开
{
Delay10ms();
i++;
}
i=0;
}
if(K2==0) //检测按键K2是否按下
{
Delay10ms(); //消除抖动
if(K2==0)
{
TIME[SetPlace]++;
if((TIME[SetPlace]&0x0f)>9)  //换成BCD码。
{
TIME[SetPlace]=TIME[SetPlace]+6;
}
if((TIME[SetPlace]>=0x60)&&(SetPlace<2)) //分秒只能到59
{
TIME[SetPlace]=0;
}
if((TIME[SetPlace]>=0x24)&&(SetPlace==2)) //小时只能到23
{
TIME[SetPlace]=0;
}
if((TIME[SetPlace]>=0x32)&&(SetPlace==3)) //日只能到31
{
TIME[SetPlace]=0;
}
if((TIME[SetPlace]>=0x13)&&(SetPlace==4)) //月只能到12
{
TIME[SetPlace]=0;
}
if((TIME[SetPlace]>=0x7)&&(SetPlace==5)) //周只能到7
{
TIME[SetPlace]=1;
}
// if(SetPlace==5) //月只能到12
// {
// TIME[SetPlace]=;
// }
}

while((i<50)&&(K2==0))  //检测按键是否松开
{
Delay10ms();
i++;
}
i=0;

}
}
LcdDisplay();


}

}
/*******************************************************************************
* 函数名         : LcdDisplay()
* 函数功能    : 显示函数
* 输入           : 无
* 输出           : 无
*******************************************************************************/

void LcdDisplay()
{
LcdWriteCom(0x80+0X40);

LcdWriteCom(0x0f);  
  LcdWriteCom(0xc0|(2-0x40));
LcdWriteCom(0x0c);  
Delay10ms();
LcdWriteData('0'+TIME[2]/16); //时
LcdWriteData('0'+(TIME[2]&0x0f));  
LcdWriteData(':');
LcdWriteData('0'+TIME[1]/16); //分
LcdWriteData('0'+(TIME[1]&0x0f));
LcdWriteData(':');
LcdWriteData('0'+TIME[0]/16); //秒
LcdWriteData('0'+(TIME[0]&0x0f));

LcdWriteCom(0x80);
LcdWriteData('2');
LcdWriteData('0');
LcdWriteData('0'+TIME[6]/16); //年
LcdWriteData('0'+(TIME[6]&0x0f));
LcdWriteData(0x00);
LcdWriteData('0'+TIME[4]/16); //月
LcdWriteData('0'+(TIME[4]&0x0f));
LcdWriteData(0x01);
LcdWriteData('0'+TIME[3]/16); //日
LcdWriteData('0'+(TIME[3]&0x0f));
LcdWriteData(0x02);
LcdWriteCom(0x8D);
LcdWriteData('0'+(TIME[5]&0x07)-1); //星期  
}
/*******************************************************************************
* 函数名         : Int0Configuration()
* 函数功能    : 配置外部中断0
* 输入           : 无
* 输出           : 无
*******************************************************************************/

void Int0Configuration()
{
//设置INT0
IT0=1;//跳变沿出发方式（下降沿）
EX0=1;//打开INT0的中断允许。
EA=1;//打开总中断
}
/*******************************************************************************
* 函数名         : Int0() 
* 函数功能    : 外部中断0 中断函数
* 输入           : 无
* 输出           : 无
*******************************************************************************/

void Int0() interrupt 0  
{
Delay10ms();
if(K3==0)
{  
SetState=~SetState;
SetPlace=0;
Ds1302Init();
}
}
/*******************************************************************************
* 函数名         : 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--);
}

来自：求助得到的回答