單片機設計LCD數字鐘（萬年歷）程序與電路如下：

#include
#include //庫函數頭文件，代碼中引用了_nop_()函數
// 定義控制信號端口
sbit RS=P2^4; //P2.4
sbit RW=P2^5; //P2.5
sbit E=P2^6; //P2.6
sbit set=P3^4; //設置鍵
sbit enter=P3^5; //確認鍵
sbit add1=P3^6; //加1鍵
sbit sub1=P3^7; //減1鍵
bit k=0,f=0;//k為0表示運行狀態，k為1表示設置狀態；f為0表示第一行顯示，f為1表示第二行顯示
char sec,min,hour,week,day,month,year,n,m;
unsigned char count,key;
unsigned char lcdd[]="0123456789";
/*聲明調用函數*/
void dispd(); //日期顯示函數
void dispt(); //時間顯示函數
unsigned char keys();//按鍵掃描函數
void lcd_w_cmd(unsigned char com); //寫命令字函數
void lcd_w_dat(unsigned char dat); //寫數據函數
unsigned char lcd_r_start(); //讀狀態函數
void int1(); //LCD初始化函數
void delay(unsigned char t); //可控延時函數
void delay1(); //軟件實現延時函數，5個機器周期
/*主函數*/
void main()
{
TMOD=0x01; //設置為定時器模式1
TH0=0x3c; //晶振6MHz，定時時間100ms
TL0=0xb0;
IE=0x82; //開全局中斷和定時中斷
TR0=1; //啟動定時器
sec=0; //秒
min=0; //分
hour=0; //時
week=0; //星期
day=1; //日
month=1; //月
year=0; //年
count=0; //中斷次數清0
n=-3; //設置鍵按下次數，第一行日期
m=-3; //設置鍵按下次數，第二行時間
P0=0xff; // 送全1到P0口
int1(); // 初始化LCD
delay(255);

while(1)
{
key=keys(); //讀取按鍵
switch(key)
{
case 0xe0: //按下設置鍵
{
TR0=0;
k=1;
if(f==0)
{
n=n+3;
if(n==9)
{
n=0;
m=0;
f=1;
}

}
else
{
m=m+3;
if(m==12)
{
m=0;
n=0;
f=0;
}

}
if(f==0)
{
lcd_w_cmd(0x0d);
lcd_w_cmd(0x86+n);
}
else
{
lcd_w_cmd(0x0d);
lcd_w_cmd(0xc4+m);
}
} break;
case 0xd0: //按下確認鍵
{
k=0;
TR0=1;
n=-3;
m=-3;
f=0;
} break;
case 0xb0: //按下加1鍵
{
if(k==1)
{
if(f==0)
{
if(n==0){year++;if(year==100) year=0;}
else if(n==3) {month++;if(month==13) month=1;}
else {day++;if(day==32) day=1;}
dispd(); //調用第一行顯示函數
lcd_w_cmd(0x0d); //光標閃爍
lcd_w_cmd(0x86+n);//返回設置值顯示地址
}
else
{
if(m==0){hour++;if(hour==24) hour=0;}
else if(m==3) {min++;if(min==60) min=0;}
else if(m==6){sec++;if(sec==60) sec=0;}
else {week++;if(week==7) week=0;}
dispt(); //調用第二行顯示函數
lcd_w_cmd(0x0d); //光標閃爍
lcd_w_cmd(0xc4+m);//返回設置值顯示地址
}
}
} break;
case 0x70: //按下減1鍵
{
if(k==1)
{
if(f==0)
{
if(n==0){year--;if(year
/*****定時中斷函數*****/
void timer0() interrupt 1
{
TH0=0x3c;
TL0=0xb0;
count++;
if(count==10)
{
count=0;
sec++;
if(sec==60)
{
sec=0;
min++;
if(min==60)
{
min=0;
hour++;
if(hour==24)
{
hour=0;
week++;
day++;
if(week==7) week=0;
if(day==29&&month==2&&year%4!=0) {day=1;month++;}
else if(day==30&&month==2&&year%4==0) {day=1;month++;}
else if(day==31&&(month==4||month==6||month==9||month==11)) {day=1;month++;}
else if(day==32&&(month==1||month==3||month==5||month==7||month==8||month==10||month==12)) {day=1;month++;}
if(month==13)
{
month=1;
year++;
if(year==100) year=0;
}
}
}
}
}
}
/*按鍵掃描函數*/
unsigned char keys()
{
unsigned char cod,del;
P3=0xf0;
cod=P3&0xf0; //讀入P3口鍵值
if(cod!=0xf0) //先檢測有無按鍵按下
{
delay(100); //去抖
if(cod!=0xf0)
{
cod=P3&0xf0; //讀入鍵值
do //等待鍵釋放
{
P3=0xf0;
del=P3&0xf0;
}while(del!=0xf0);
return(cod);//返回鍵值
}
}
return(0xf0); //返回該值
}
/*第一行顯示日期函數*/
void dispd()
{
lcd_w_cmd(0x0c); //設置光標不顯示、不閃爍
delay(20);
lcd_w_cmd(0x83); //第一行起始顯示地址0x80+0x03
delay(20);
lcd_w_dat('2');
delay(2);
lcd_w_dat('0');
delay(2);
lcd_w_dat(lcdd[year/10]);
delay(2);
lcd_w_dat(lcdd[year%10]);
delay(2);
lcd_w_dat('-');
delay(2);

lcd_w_dat(lcdd[month/10]);
delay(2);
lcd_w_dat(lcdd[month%10]);
delay(2);
lcd_w_dat('-');
delay(2);

lcd_w_dat(lcdd[day/10]);
delay(2);
lcd_w_dat(lcdd[day%10]);
delay(2);

}
/*第二行顯示時間、星期函數*/
void dispt()
{
lcd_w_cmd(0x0c); //設置光標不顯示、不閃爍
delay(20);
lcd_w_cmd(0xc3); //第二行起始顯示地址0x80+0x43
delay(20);
lcd_w_dat(lcdd[hour/10]);
delay(2);
lcd_w_dat(lcdd[hour%10]);
delay(2);
lcd_w_dat(':');
delay(2);

lcd_w_dat(lcdd[min/10]);
delay(2);
lcd_w_dat(lcdd[min%10]);
delay(2);
lcd_w_dat(':');
delay(2);

lcd_w_dat(lcdd[sec/10]);
delay(2);
lcd_w_dat(lcdd[sec%10]);
delay(2);
lcd_w_dat(' ');
delay(2);
lcd_w_dat('W');
delay(2);
lcd_w_dat(lcdd[week]);
delay(2);
}