1602万年历程序

Ⅰ 万年历程序设计C++

这个需要时间，我也是刚学C++的，但是有预感，这个还是可以做的。。还是自己多做做吧，有助于你的编程水平的提高

Ⅱ 单片机和lcd1602编写万年历C语言程序,求高手啊

下面是我的程序，还有仿真图，不懂可以再问我，祝你成功

/*******************************************

ds1302计时+lcd1602显示

*******************************************/

#include<reg51.h>

#include<intrins.h>

#defineucharunsignedchar

#defineuintunsignedint

sbitrs=P2^0;

sbitrw=P2^1;

sbite=P2^2;

sbitT_RST=P1^5;

sbitT_CLK=P1^6;

sbitT_IO=P1^7;

sbitACC0=ACC^0;

sbitACC7=ACC^7;

/*******************************************

向1302写一个字节

*******************************************/

voidinput_BYTE(uchardat)

{

uchari;

ACC=dat;

for(i=8;i>0;i--)

{

T_IO=ACC0;

T_CLK=1;

T_CLK=0;

ACC=(ACC>>1);

}

}

/*******************************************

1302读出一个字节

*******************************************/

ucharoutput_BYTE()

{

uchari;

for(i=8;i>0;i--)

{

ACC=(ACC>>1);

ACC7=T_IO;

T_CLK=1;

T_CLK=0;

}

return(ACC);

}

/*******************************************

写数据

*******************************************/

voidwrite_1302(ucharadd,uchardat)

{

T_RST=0;

T_CLK=0;

T_RST=1;

input_BYTE(add);

input_BYTE(dat);

T_CLK=1;

T_RST=0;

}

/*******************************************

读数据

*******************************************/

ucharread_1302(ucharadd)

{

ucharinf;

T_RST=0;

T_CLK=0;

T_RST=1;

input_BYTE(add);

inf=output_BYTE();

T_CLK=1;

T_RST=0;

return(inf);

}

voidinit_1302()

{

write_1302(0x8e,0x00);//关闭写保护;

/*write_1302(0x90,0xaa);//设置充电方式;

write_1302(0x80,0x00);//秒寄存器初始化;

write_1302(0x82,0x46);//分.......

write_1302(0x84,0x22);//时.......

write_1302(0x86,0x17);//日........

write_1302(0x88,0x03);//月.......

write_1302(0x8a,0x04);//星期...

write_1302(0x8c,0x11);//年......*/

write_1302(0x8e,0x80);//打开写保护;

}

ucharcom,inf;

ucharcodetable[]="DS1302";

ucharcodetable1[]="0123456789";

ucharcodetable2[]="WEEK-";

voiddelay1(uchart)

{

ucharx,y;

for(x=t;x>0;x--)

for(y=110;y>0;y--);

}

/*******************************************

给1602写指令

*******************************************/

voidwrite_com(ucharcom)

{

rs=0;

P0=com;

delay1(5);

e=1;

delay1(5);

e=0;

}

/*******************************************

给1602写数据

*******************************************/

voidwrite_date(uchardate)

{

rs=1;

P0=date;

delay1(5);

e=1;

delay1(5);

e=0;

}

/*******************************************

1602初始化

*******************************************/

voinit()

{

e=0;

rw=0;

write_com(0x38);

write_com(0x0c);

write_com(0x06);

write_com(0x01);

}

/*******************************************

主函数

*******************************************/

voidmain()

{

uchari;

uchart_sec,sec1,sec2;

uchart_min,min1,min2;

uchart_hour,hour1,hour2;

uchart_mon,mon1,mon2;

uchart_day,day1,day2;

uchart_year,year1,year2;

ucharweek,week1;

ucharnum;

unit();

init_1302();

while(1)

{

t_sec=read_1302(0x81);//miao;

sec1=t_sec&0x0f;

sec2=(t_sec>>4);

t_min=read_1302(0x83);//fen;

min1=t_min&0x0f;

min2=(t_min>>4);

t_hour=read_1302(0x85);//shi;

hour1=t_hour&0x0f;

hour2=(t_hour>>4);

t_day=read_1302(0x87);//ri;

day1=t_day&0x0f;

day2=(t_day>>4);

t_mon=read_1302(0x89);//yue;

mon1=t_mon&0x0f;

mon2=(t_mon>>4);

week=read_1302(0x8b);//xingqi;

week1=week&0x0f;

t_year=read_1302(0x8d);//nian;

year1=t_year&0x0f;

year2=(t_year>>4);

write_com(0x80);

for(i=0;i<6;i++)

{

write_date(table[i]);

}

write_com(0x80+0x40);

for(i=0;i<5;i++)

{

write_date(table2[i]);

}

write_com(0x80+0x07);

write_date(table1[year2]);

write_com(0x80+0x08);

write_date(table1[year1]);

write_com(0x80+0x09);

write_date('/');

write_com(0x80+0x0a);

write_date(table1[mon2]);

write_com(0x80+0x0b);

write_date(table1[mon1]);

write_com(0x80+0x0c);

write_date('/');

write_com(0x80+0x0d);

write_date(table1[day2]);

write_com(0x80+0x0e);

write_date(table1[day1]);

write_com(0x80+0x40+0x05);

write_date(table1[week1]);

write_com(0x80+0x40+0x07);

write_date(table1[hour2]);

write_com(0x80+0x40+0x08);

write_date(table1[hour1]);

write_com(0x80+0x40+0x09);

write_date(':');

write_com(0x80+0x40+0x0a);

write_date(table1[min2]);

write_com(0x80+0x40+0x0b);

write_date(table1[min1]);

write_com(0x80+0x40+0x0c);

write_date(':');

write_com(0x80+0x40+0x0d);

write_date(table1[sec2]);

write_com(0x80+0x40+0x0e);

write_date(table1[sec1]);

}

}

Ⅲ 求51单片机 1602+1302可以显示农历的万年历或农历部分的c语言程序

与MCS-51单片机产品兼容 、8K字节在系统可编程Flash存储器、 1000次擦写周期、 全静态操作：0Hz～33Hz 、 三级加密程序存储器 、 32个可编程I/O口线 、三个16位定时器/计数器 八个中断源 、全双工UART串行通道、 低功耗空闲和掉电模式 、掉电后中断可唤醒 、看门狗定时器 、双数据指针 、掉电标识符 。

功能特性描述
At89s52 是一种低功耗、高性能CMOS8位微控制器，具有 8K 在系统可编程Flash 存储器。使用Atmel 公司高密度非 易失性存储器技术制造，与工业80C51 产品指令和引脚完 全兼容。片上Flash允许程序存储器在系统可编程，亦适于 常规编程器。在单芯片上，拥有灵巧的8 位CPU 和在系统 可编程Flash，使得AT89S52为众多嵌入式控制应用系统提 供高灵活、超有效的解决方案。 AT89S52具有以下标准功能： 8k字节Flash，256字节RAM， 32 位I/O 口线，看门狗定时器，2 个数据指针，三个16 位 定时器/计数器，一个6向量2级中断结构，全双工串行口， 片内晶振及时钟电路。另外，AT89S52 可降至0Hz 静态逻 辑操作，支持2种软件可选择节电模式。空闲模式下，CPU 停止工作，允许RAM、定时器/计数器、串口、中断继续工 作。掉电保护方式下，RAM内容被保存，振荡器被冻结， 单片机一切工作停止，直到下一个中断或硬件复位为止。8 位微控制器 8K 字节在系统可编程 Flash AT89S52

P0 口：P0口是一个8位漏极开路的双向I/O口。作为输出口，每位能驱动8个TTL逻
辑电平。对P0端口写“1”时，引脚用作高阻抗输入。
当访问外部程序和数据存储器时，P0口也被作为低8位地址/数据复用。在这种模式下，
P0具有内部上拉电阻。
在flash编程时，P0口也用来接收指令字节；在程序校验时，输出指令字节。程序校验
时，需要外部上拉电阻。
P1 口：P1 口是一个具有内部上拉电阻的8 位双向I/O 口，p1 输出缓冲器能驱动4 个
TTL 逻辑电平。对P1 端口写“1”时，内部上拉电阻把端口拉高，此时可以作为输入
口使用。作为输入使用时，被外部拉低的引脚由于内部电阻的原因，将输出电流（IIL）。
此外，P1.0和P1.2分别作定时器/计数器2的外部计数输入（P1.0/T2）和时器/计数器2
的触发输入（P1.1/T2EX），具体如下表所示。
在flash编程和校验时，P1口接收低8位地址字节。
引脚号第二功能
P1.0 T2（定时器/计数器T2的外部计数输入），时钟输出
P1.1 T2EX（定时器/计数器T2的捕捉/重载触发信号和方向控制）
P1.5 MOSI（在系统编程用）
P1.6 MISO（在系统编程用）
P1.7 SCK（在系统编程用）
P2 口：P2 口是一个具有内部上拉电阻的8 位双向I/O 口，P2 输出缓冲器能驱动4 个
TTL 逻辑电平。对P2 端口写“1”时，内部上拉电阻把端口拉高，此时可以作为输入
口使用。作为输入使用时，被外部拉低的引脚由于内部电阻的原因，将输出电流（IIL）。
在访问外部程序存储器或用16位地址读取外部数据存储器（例如执行MOVX @DPTR）
时，P2 口送出高八位地址。在这种应用中，P2 口使用很强的内部上拉发送1。在使用
8位地址（如MOVX @RI）访问外部数据存储器时，P2口输出P2锁存器的内容。
在flash编程和校验时，P2口也接收高8位地址字节和一些控制信号。
P3 口：P3 口是一个具有内部上拉电阻的8 位双向I/O 口，p2 输出缓冲器能驱动4 个
TTL 逻辑电平。对P3 端口写“1”时，内部上拉电阻把端口拉高，此时可以作为输入
口使用。作为输入使用时，被外部拉低的引脚由于内部电阻的原因，将输出电流（IIL）。
P3口亦作为AT89S52特殊功能（第二功能）使用，如下表所示。
在flash编程和校验时，P3口也接收一些控制信号。

端口引脚 第二功能
P3.0 RXD(串行输入口)
P3.1 TXD(串行输出口)
P3.2 INTO(外中断0)
P3.3 INT1(外中断1)
P3.4 TO(定时/计数器0)
P3.5 T1(定时/计数器1)
P3.6 WR(外部数据存储器写选通)
P3.7 RD(外部数据存储器读选通)
此外，P3口还接收一些用于FLASH闪存编程和程序校验的控制信号。
RST——复位输入。当振荡器工作时，RST引脚出现两个机器周期以上高电平将是单片机复位。
ALE/PROG——当访问外部程存储器或数据存储器时，ALE（地址锁存允许）输出脉冲用于锁存地址的低8位字节。一般情况下，ALE仍以时钟振荡频率的1/6输出固定的脉冲信号，因此它可对外输出时钟或用于定时目的。要注意的是：每当访问外部数据存储器时将跳过一个ALE脉冲。
对FLASH存储器编程期间，该引脚还用于输入编程脉冲（PROG）。
如有必要，可通过对特殊功能寄存器（SFR）区中的8EH单元的D0位置位，可禁止ALE操作。该位置位后，只有一条MOVX和MOVC指令才能将ALE激活。此外，该引脚会被微弱拉高，单片机执行外部程序时，应设置ALE禁止位无效。
PSEN——程序储存允许（PSEN）输出是外部程序存储器的读选通信号，当AT89C52由外部程序存储器取指令（或数据）时，每个机器周期两次PSEN有效，即输出两个脉冲，在此期间，当访问外部数据存储器，将跳过两次PSEN信号。
EA/VPP——外部访问允许，欲使CPU仅访问外部程序存储器（地址为0000H-FFFFH），EA端必须保持低电平（接地）。需注意的是：如果加密位LB1被编程，复位时内部会锁存EA端状态。
如EA端为高电平（接Vcc端），CPU则执行内部程序存储器的指令。
FLASH存储器编程时，该引脚加上+12V的编程允许电源Vpp，当然这必须是该器件是使用12V编程电压Vpp。

Ⅳ 单片机万年历的c语言程序

没分啊 那也给你发一个吧
DS1302+DS18B20 用1602显示
我在PROTUES仿真上做的 你可以根据程序画电路图 很简单
程序 采用模块化方式
/*初始化*/
#define uint unsigned int
#define uchar unsigned char
uchar code tab[]=" 20 - - " ;
uchar code table[]=" : : ";
uchar code ttable[]={"Now temperature:"} ;
sbit RS=P3^0;
sbit E=P3^1;
sbit button1=P1^0;
sbit button2=P1^3;
sbit button3=P1^6;
sbit RST=P2^5;
sbit SCLK=P2^6;
sbit IO=P2^7;
sbit ACC7=ACC^7;
sbit DQ=P3^6;
char hour,minute,second,n,k,week,day,month,year1=20 ,year,nn,flag;
uchar key=0;
uint tem,a;
void delay(uint x)
{
while(x--);
}
void write_zl(uchar zl)
{E=0;
RS=0;
P0=zl;
E=1;
delay(500);
E=0;
}
void write_sj(uchar sj)
{E=0;
RS=1;
P0=sj;
E=1;
delay(500);
E=0;
}
void init_lcd()
{
write_zl(0x38);//开显示
write_zl(0x01);//清屏
write_zl(0x06);//整屏不移动
write_zl(0x0C);//不开光标
}
/*18B20*/部分
void init_18b20()
{ DQ=1;
delay(8); //延时
DQ=0;
delay(80);
DQ=1;
delay(20);
}
void write_dat(uchar dat)
{ uchar i,k;
k=dat;
for(i=0;i<8;i++)
{ DQ=0;
DQ=k&0x01;//从低位开始
delay(5);
DQ=1;
k>>=1;
}
delay(4);
}

int read_sj()
{
uchar j,date;
for(j=0;j<8;j++)
{
DQ=1;
delay(1);
DQ=0;
date=date>>1;
DQ=1;
if(DQ==1) //
date|=0x80;
delay(4);}
return(date);
}
void temperaturechange()
{ uint tempH,tempL;
init_18b20();
write_dat(0xcc);//只对一个操作就跳过读序列号操作
write_dat(0x44); //启动温度转换
delay(60000);
delay(33750);//需要93.75ms
init_18b20();
write_dat(0xcc);
write_dat(0xbe);//读温度寄存器

tempL=read_sj();//读取温度低位LSB
tempH=read_sj();//读取温度高位MSB
if(tempH&0x80) //高5位是1为负数
{ a=1;
tem=tempH;
tem<<=8; //共16位
tem=tem|tempL; //合并高低位数
tem=~tem+1;
tem=tem*(0.0625);
}
else
{
a=0;
tem=((tempH*256)+tempL)*0.0625;//转换实际温度
}
}
void write_temperature(uint temp) //被调用的函数必须在前
{ uint ,shi,ge;
=temp/100;
shi=temp%100/10;
ge=temp%10;
if(a==1)
{ if(shi>0)
{write_zl(0x80+0x50+3);
write_sj('-');
write_zl(0x80+0x50+4);
write_sj(0x30+shi); }
else
{
write_zl(0x80+0x50+3);
write_sj(0x00);
write_zl(0x80+0x50+4);
write_sj('-');}
}

else
{
if(>0) //若显示shi肯定显示
{
write_zl(0x80+0x50+3);
write_sj(0x30+);
write_zl(0x80+0x50+4);
write_sj(0x30+shi);
}
else
{
if(shi>0) //否则判断shi是否显示
{
write_zl(0x80+0x50+4);
write_sj(0x30+shi);
}
else
{
write_zl(0x80+0x50+4);
write_sj(0x00);
}
write_zl(0x80+0x50+3);
write_sj(0x00);
}
}

write_zl(0x80+0x50+5); //个位公用总的显示
write_sj(0x30+ge);
}

/*DS1302部分*/
void DS1302_write(uchar shju)
{ uchar s,j;
s=shju;
for(j=0;j<8;j++)
{ IO=s&0x01;
SCLK=0;
SCLK=1;

s=s>>1;
}}
uchar DS1302_readbyte()
{ uchar i,R=0;
SCLK=0;
delay(10);
for(i=8;i>0;i--)
{
ACC=ACC>>1;
ACC7=IO;
SCLK=1;
SCLK=0;
}
return(ACC);
/*{
R=R>>1;
if(IO==1)
R=R|0x80;
SCLK=1;
SCLK=0;
}
return(R); */}

void DS1302write(uchar dz,uchar shij)//初始化1302
{ RST=1;
SCLK=0;
DS1302_write(dz);
DS1302_write(shij);
SCLK=1;
RST=0;
}
void start1302()
{ uchar num;
for(num=0;num<13;num++)
{ write_sj(tab[num]);}
for(num=13;num<16;num++)
{ write_sj(tab[num]);}
write_zl(0x80+0x40);
for(num=0;num<12;num++)
{ write_sj(table[num]);
}}
void write_hms(uchar add,uchar sj) //被调用的函数必须在前
{ uchar shi,ge;
shi=sj/10;
ge=sj%10;
write_zl(0x80+0x40+add);
write_sj(0x30+shi);
write_sj(0x30+ge); }
void write_nyr(uchar add,uchar sj)
{ uchar shi,ge;
shi=(sj/10);
ge=(sj%10);
write_zl(0x80+add);
write_sj(0x30+shi);
write_sj(0x30+ge); }
void write_XQ(uchar wk)
{ write_zl(0x80+13);
switch(wk)
{ case 2: write_sj('M'); write_sj('O');write_sj('N'); break;
case 3: write_sj('T'); write_sj('U');write_sj('E'); break;
case 4: write_sj('W'); write_sj('E');write_sj('D'); break;
case 5: write_sj('T'); write_sj('H');write_sj('U'); break;
case 6: write_sj('F'); write_sj('R');write_sj('I'); break;
case 7: write_sj('S'); write_sj('A');write_sj('T'); break;
case 1: write_sj('S'); write_sj('U');write_sj('N'); break;
}
}
void write_day(uchar rue)
{
switch(rue)
{
case 1: nn=31;break;
case 2: if((year%4==0&&year%100!=0)||year%400==0)
nn=29;
else
nn=28;break;
case 3: nn=31;break;
case 4: nn=30;break;
case 5: nn=31;break;
case 6: nn=30;break;
case 7: nn=31;break;
case 8: nn=31;break;
case 9: nn=30;break;
case 10: nn=31;break;
case 11: nn=30;break;
case 12: nn=31;break;
}}
void keyboard()
{
if(button1==0)
{ delay(5);
if(button1==0)
{ while(button1==0);
key++; flag=1;
switch(key)
{ case 1: write_zl(0x80+0x40+10);
write_zl(0x0f); break;//shan shuo
case 2: write_zl(0x80+0x40+7); break;
case 3: write_zl(0x80+0x40+4); break;
case 4: write_zl(0x80+10); break;
case 5: write_zl(0x80+7); break;
case 6: write_zl(0x80+4); break;
case 7: write_zl(0x80+2); break;
case 8: key=0;
write_zl(0x0c);
flag=0;
DS1302write(0x80,second);
DS1302write(0x82,minute);
DS1302write(0x84,hour);
DS1302write(0x86,day);
DS1302write(0x88,month);
DS1302write(0x8A,week);
DS1302write(0x8C,year);break;
}
}}
if(button2==0)
{ delay(10);
if(button2==0)
{ while(button2==0);
switch(key)
{case 1: second++;if(second==60)second=0;
write_hms(10,second); write_zl(0x80+0x40+10); break;
case 2: minute++;if(minute==60)minute=0;
write_hms(7,minute);write_zl(0x80+0x40+7); break;
case 3: hour++;if(hour==24)hour=0;
write_hms(4,hour); write_zl(0x80+0x40+4); break;
case 4: day++;week++;
if(week==8)week=1;write_XQ(week);
write_day(month); if(day==nn+1)day=1;
write_nyr(10,day);write_zl(0x80+10); break;
case 5: month++;if(month==13)month=1;
write_nyr(7,month);write_zl(0x80+7); break;
case 6: year++ ;if(year==100)year=0;
write_nyr(4,year);write_zl(0x80+4); break;
case 7: year1++ ;if(year1==100)year1=0;
write_nyr(2,year1);write_zl(0x80+2); break;
}}}
if(button3==0)
{delay(10);
if(button3==0)
{ while(button3==0);
switch(key)
{case 1: second--;if(second<0)second=59;
write_hms(10,second); write_zl(0x80+0x40+10); break;
case 2: minute--;if(minute<0)minute=59;
write_hms(7,minute);write_zl(0x80+0x40+7); break;
case 3: hour--;if(hour<0)hour=23;
write_hms(4,hour);write_zl(0x80+0x40+4); break;
case 4: week--;if(week==0)week=7;write_XQ(week);
day--; write_day(month); if(day==0)day=nn;
write_nyr(10,day);write_zl(0x80+10); break;
case 5: month--;if(month==0)month=12;
write_nyr(7,month);write_zl(0x80+7); break;
case 6: year-- ;if(year<0)year=99;
write_nyr(4,year);write_zl(0x80+4); break;
case 7: year1-- ;if(year1<0)year1=99;
write_nyr(2,year1);write_zl(0x80+2); break;}
}}
}

void DS1302_sfm()
{ uchar a,b;
RST=1; //高电平期间启动一次数据转换
DS1302_write(0x81);
second=DS1302_readbyte();
RST=0;// 结束转换
a=second/16;//BCD码转换
b=second%16;
second=a*10+b;
write_hms(10,second);
//分
RST=1;
DS1302_write(0x83);
minute= DS1302_readbyte();
a=minute/16;
b=minute%16;
minute=a*10+b;
write_hms(7,minute);
RST=0;
//时
RST=1;
DS1302_write(0x85);
hour= DS1302_readbyte();
RST=0;
a=hour/16;
b=hour%16;
hour=a*10+b;
write_hms(4,hour);
//日
RST=1;
DS1302_write(0x87);
day= DS1302_readbyte();
RST=0;
a=day/16;
b=day%16;
day=a*10+b;
write_nyr(10,day);
//月
RST=1;
DS1302_write(0x89);
month= DS1302_readbyte();
RST=0;
a=month/16;
b=month%16;
month=a*10+b;
write_nyr(7,month);
// 周
RST=1;
DS1302_write(0x8B);
week= DS1302_readbyte();
RST=0;
a=week/16;
b=week%16;
week=a*10+b;
write_XQ(week);
// 年
SCLK=0;
delay(5);
RST=1;
DS1302_write(0x8D);
IO=1;
year= DS1302_readbyte();
RST=0;
delay(5);
SCLK=1;
a=year/16;
b=year%16;
year=a*10+b;
write_nyr(4,year);
}
/* 总程序*/
#include<reg51.h>
#include<init.h>
#include<ds1302.h>
#include<18b20.h>
void main()
{
init_lcd();

start1302();
while(1)
{
RST=0;
keyboard();
if(flag==0) //标志位为0才能读取1302，否则按键无效
DS1302_sfm();

write_zl(0x80+0x10);
for(n=0;n<16;n++)
write_sj(ttable[n]);
temperaturechange();
write_temperature(tem);
}
}

Ⅳ stc89c52 用1602显示万年历 时间只走一次

目录 III
第一章 绪 论 - 1 -
1.1课题的背景 - 1 -
1.2课题意义 - 2 -
1.3本章小结 - 3 -
第二章 总体设计方案与论证 - 4 -
2.1 电源模块方案的选择与论证 - 4 -
2.2 时钟电路方案的选择与论证 - 4 -
2.3 显示电路方案的选择与论证 - 5 -
2.4 闹钟电路方案的选择与论证 - 5 -
2.5 键扫描电路方案的选择与论证 - 6 -
2.6 本章小结 - 6 -
第三章 系统硬件设计 - 7 -
3.1 主控芯片STC89C52的介绍 - 7 -
3.1.1 STC89C52的主要性能参数 - 7 -
3.1.2 STC89C52单片机的功能特性概述： - 8 -
3.2时钟部分功能介绍及电路设计 - 11 -
3.3显示模块功能介绍及电路设计 - 14 -
3.4闹钟电路模块介绍及电路设计 - 16 -
3.5功能按键模块介绍及电路设计 - 17 -
3.6电源模块介绍及电路设计 - 17 -
3.7 本章小结 - 18 -
第四章 系统软件设计 - 19 -
4.1日历程序设计 - 19 -
4.2 时间调整程序设计 - 20 -
4.3 闹钟设置程序设计 - 22 -
4.4 闹钟蜂鸣程序设计 - 23 -
4.5本章小结 - 23 -
第五章 系统调试 - 24 -
5.1系统的调试 - 24 -
5.2系统的调试出现的问题及解决 - 24 -
5.3本章小结 - 24 -
第六章 结 论 - 25 -
参考文献 - 26 -
致 谢 - 27 -
附录 - 28 -
附录一 ：本设计电路原理图 - 28 -
附录二：数字日历钟电路设计的C程序 - 29 -

Ⅵ 跪求个利用51单片机1602显示屏DS1302做的万年历c编程序，带有公历，农历，星期，时间功能，一定要有农历

农历计算方式，
///月份数据表
code uchar day_code1[9]={0x0,0x1f,0x3b,0x5a,0x78,0x97,0xb5,0xd4,0xf3};
code uint day_code2[3]={0x111,0x130,0x14e};
/*
函数功能:输入BCD阳历数据,输出BCD阴历数据(只允许1901-2099年)
调用函数示例:Conversion(c_sun,year_sun,month_sun,day_sun)
如:计算2004年10月16日Conversion(0,0x4,0x10,0x16);
c_sun,year_sun,month_sun,day_sun均为BCD数据,c_sun为世纪标志位,c_sun=0为21世
纪,c_sun=1为19世纪
调用函数后,原有数据不变,读c_moon,year_moon,month_moon,day_moon得出阴历BCD数据
*/
bit c_moon;
data uchar year_moon,month_moon,day_moon,week;
/*子函数,用于读取数据表中农历月的大月或小月,如果该月为大返回1,为小返回0*/
bit get_moon_day(uchar month_p,uint table_addr)
{
uchar temp;
switch (month_p)
{
case 1:{temp=year_code[table_addr]&0x08;
if (temp==0)return(0);else return(1);}
case 2:{temp=year_code[table_addr]&0x04;
if (temp==0)return(0);else return(1);}
case 3:{temp=year_code[table_addr]&0x02;
if (temp==0)return(0);else return(1);}
case 4:{temp=year_code[table_addr]&0x01;
if (temp==0)return(0);else return(1);}
case 5:{temp=year_code[table_addr+1]&0x80;
if (temp==0) return(0);else return(1);}
case 6:{temp=year_code[table_addr+1]&0x40;
if (temp==0)return(0);else return(1);}
case 7:{temp=year_code[table_addr+1]&0x20;
if (temp==0)return(0);else return(1);}
case 8:{temp=year_code[table_addr+1]&0x10;
if (temp==0)return(0);else return(1);}
case 9:{temp=year_code[table_addr+1]&0x08;
if (temp==0)return(0);else return(1);}
case 10:{temp=year_code[table_addr+1]&0x04;
if (temp==0)return(0);else return(1);}
case 11:{temp=year_code[table_addr+1]&0x02;
if (temp==0)return(0);else return(1);}
case 12:{temp=year_code[table_addr+1]&0x01;
if (temp==0)return(0);else return(1);}
case 13:{temp=year_code[table_addr+2]&0x80;
if (temp==0)return(0);else return(1);}
}
}
/*
函数功能:输入BCD阳历数据,输出BCD阴历数据(只允许1901-2099年)
调用函数示例:Conversion(c_sun,year_sun,month_sun,day_sun)
如:计算2004年10月16日Conversion(0,0x4,0x10,0x16);
c_sun,year_sun,month_sun,day_sun均为BCD数据,c_sun为世纪标志位,c_sun=0为21世
纪,c_sun=1为19世纪
调用函数后,原有数据不变,读c_moon,year_moon,month_moon,day_moon得出阴历BCD数据
*/
void Conversion(bit c,uchar year,uchar month,uchar day)
{ //c=0 为21世纪,c=1 为19世纪 输入输出数据均为BCD数据
uchar temp1,temp2,temp3,month_p;
uint temp4,table_addr;
bit flag2,flag_y;
temp1=year/16; //BCD->hex 先把数据转换为十六进制
temp2=year%16;
year=temp1*10+temp2;
temp1=month/16;
temp2=month%16;
month=temp1*10+temp2;
temp1=day/16;
temp2=day%16;
day=temp1*10+temp2;
//定位数据表地址
if(c==0)
{
table_addr=(year+0x64-1)*0x3;
}
else
{
table_addr=(year-1)*0x3;
}
//定位数据表地址完成
//取当年春节所在的公历月份
temp1=year_code[table_addr+2]&0x60;
temp1=_cror_(temp1,5);
//取当年春节所在的公历月份完成
//取当年春节所在的公历日
temp2=year_code[table_addr+2]&0x1f;
//取当年春节所在的公历日完成
// 计算当年春年离当年元旦的天数,春节只会在公历1月或2月
if(temp1==0x1)
{
temp3=temp2-1;
}
else
{
temp3=temp2+0x1f-1;
}
// 计算当年春年离当年元旦的天数完成
//计算公历日离当年元旦的天数,为了减少运算,用了两个表
//day_code1[9],day_code2[3]
//如果公历月在九月或前,天数会少于0xff,用表day_code1[9],
//在九月后,天数大于0xff,用表day_code2[3]
//如输入公历日为8月10日,则公历日离元旦天数为day_code1[8-1]+10-1
//如输入公历日为11月10日,则公历日离元旦天数为day_code2[11-10]+10-1
if (month<10)
{
temp4=day_code1[month-1]+day-1;
}
else
{
temp4=day_code2[month-10]+day-1;
}
if ((month>0x2)&&(year%0x4==0))
{ //如果公历月大于2月并且该年的2月为闰月,天数加1
temp4+=1;
}
//计算公历日离当年元旦的天数完成
//判断公历日在春节前还是春节后
if (temp4>=temp3)
{ //公历日在春节后或就是春节当日使用下面代码进行运算
temp4-=temp3;
month=0x1;
month_p=0x1; //month_p为月份指向,公历日在春节前或就是春节当日month_p指向首月
flag2=get_moon_day(month_p,table_addr);
//检查该农历月为大小还是小月,大月返回1,小月返回0
flag_y=0;
if(flag2==0)temp1=0x1d; //小月29天
else temp1=0x1e; //大小30天
temp2=year_code[table_addr]&0xf0;
temp2=_cror_(temp2,4); //从数据表中取该年的闰月月份,如为0则该年无闰月
while(temp4>=temp1)
{
temp4-=temp1;
month_p+=1;
if(month==temp2)
{
flag_y=~flag_y;
if(flag_y==0)
month+=1;
}
else month+=1;
flag2=get_moon_day(month_p,table_addr);
if(flag2==0)temp1=0x1d;
else temp1=0x1e;
}
day=temp4+1;
}
else
{ //公历日在春节前使用下面代码进行运算
temp3-=temp4;
if (year==0x0)
{
year=0x63;c=1;
}
else year-=1;
table_addr-=0x3;
month=0xc;
temp2=year_code[table_addr]&0xf0;
temp2=_cror_(temp2,4);
if (temp2==0)
month_p=0xc;
else
month_p=0xd; //
/*month_p为月份指向,如果当年有闰月,一年有十三个月,月指向13,无闰月指向12*/
flag_y=0;
flag2=get_moon_day(month_p,table_addr);
if(flag2==0)temp1=0x1d;
else temp1=0x1e;
while(temp3>temp1)
{
temp3-=temp1;
month_p-=1;
if(flag_y==0)month-=1;
if(month==temp2)flag_y=~flag_y;
flag2=get_moon_day(month_p,table_addr);
if(flag2==0)temp1=0x1d;
else temp1=0x1e;
}
day=temp1-temp3+1;
}
c_moon=c; //HEX->BCD ,运算结束后,把数据转换为BCD数据
temp1=year/10;
temp1=_crol_(temp1,4);
temp2=year%10;
year_moon=temp1|temp2;
temp1=month/10;
temp1=_crol_(temp1,4);
temp2=month%10;
month_moon=temp1|temp2;
temp1=day/10;
temp1=_crol_(temp1,4);
temp2=day%10;
day_moon=temp1|temp2;
}
/*************************************************************************
/*函数功能:输入BCD阳历数据,输出BCD星期数据(只允许1901-2099年)
调用函数示例:Conver_week(c_sun,year_sun,month_sun,day_sun)
如:计算2004年10月16日Conversion(0,0x4,0x10,0x16);
c_sun,year_sun,month_sun,day_sun均为BCD数据,c_sun为世纪标志位,c_sun=0为21世
纪,c_sun=1为19世纪
调用函数后,原有数据不变,读week得出阴历BCD数据
*/
code uchar table_week[12]={0,3,3,6,1,4,6,2,5,0,3,5}; //月修正数据表
/*
算法:日期+年份+所过闰年数+月较正数之和除7 的余数就是星期但如果是在
闰年又不到3 月份上述之和要减一天再除7
星期数为0
*/
void Conver_week(bit c,uchar year,uchar month,uchar day)
{//c=0 为21世纪,c=1 为19世纪 输入输出数据均为BCD数据
uchar temp1,temp2;
temp1=year/16; //BCD->hex 先把数据转换为十六进制
temp2=year%16;
year=temp1*10+temp2;
temp1=month/16;
temp2=month%16;
month=temp1*10+temp2;
temp1=day/16;
temp2=day%16;
day=temp1*10+temp2;
if (c==0){year+=0x64;} //如果为21世纪,年份数加100
temp1=year/0x4; //所过闰年数只算1900年之后的
temp2=year+temp1;
temp2=temp2%0x7; //为节省资源,先进行一次取余,避免数大于0xff,避免使用整型数据
temp2=temp2+day+table_week[month-1];
if (year%0x4==0&&month<3)temp2-=1;
week=temp2%0x7;
}

Ⅶ 求不需要时钟芯片单片万年历LCD1602显示程序。坐等，急急急 基于STC89C52

这是一个1602计时的程序，稍微改一下就是万年历了

//12MHz
#include<AT89X51.H>
unsignedcharSec,Min,Hour;
#defineDBP2
#defineRSP3_0
#defineRWP3_1
#defineEP3_2
voiddelay1ms(void)//误差0us
{
unsignedchara,b,c;
for(c=1;c>0;c--)
for(b=142;b>0;b--)
for(a=2;a>0;a--);
}
voidnop(unsignedchartime){while(time--);}
voidLCD_WriteCmd(unsignedcharcmd)
{
RS=0;
DB=cmd;
E=0;
nop(5);
E=1;
nop(5);
}
voidLCD_WriteData(unsignedchardat)
{
RS=1;
DB=dat;
E=0;
nop(5);
E=1;
nop(5);
}

voidInit1602(void)
{
RW=0;
LCD_WriteCmd(0x38);
delay1ms();
LCD_WriteCmd(0x0c);
delay1ms();
LCD_WriteCmd(0x06);
delay1ms();
LCD_WriteCmd(0x01);
delay1ms();
}

voidLCD_Clear()
{
LCD_WriteCmd(0x01);
delay1ms();
}
voidLCD_SetAddress(unsignedcharx,unsignedchary)
{
if(y)
LCD_WriteCmd(0xc0+x);
else
LCD_WriteCmd(0x80+x);
delay1ms();
}
voidLCD_DrawChar(unsignedchardat)
{
LCD_WriteData(dat);
delay1ms();
}
voidInitTimer0(void)
{
TMOD=0x01;
TH0=0x3C;
TL0=0x0B0;
EA=1;
ET0=1;
TR0=1;
}

voidmain(void)
{
InitTimer0();//初始化50ms定时器中断
Init1602();//初始化1602
LCD_Clear();//1602清屏
while(1)
{
LCD_SetAddress(4,0);//显示时间
LCD_DrawChar(Hour/10+'0');
LCD_DrawChar(Hour%10+'0');
LCD_DrawChar(':');
LCD_DrawChar(Min/10+'0');
LCD_DrawChar(Min%10+'0');
LCD_DrawChar(':');
LCD_DrawChar(Sec/10+'0');
LCD_DrawChar(Sec%10+'0');
}
}

voidTimer0Interrupt(void)interrupt1
{
staticunsignedcharcont;
TH0+=0x3C;
TL0+=0x0B0;
if(++cont==20)//20*50ms=1s
{
cont=0;
if(++Sec==60)
{
Sec=0;
if(++Min==60)
{
Min=0;
if(++Hour==24)
{
Hour=0;
}
}
}
}
}

效果: