万年历c语言代码
⑴ 万年历的c语言程序代码包括节假日农历，农历转公历，公历农历查询某
直接给来你整个工程吧，自实现了星期计算、公历转农历、农历转公历、节气查询。非常不错的代码，你要的年份范围可以自己决定，支持从公元1600年到公元6400年的四千八百年数据。数据经过我精心设计的原创压缩算法压缩，体积非常小，效率很高。
链接 密码：n51c（之前的不知啥原因被HX了，原创的都会被这样，鉴于需要的朋友很多，重新更换了链接）。
如果需要开发日历的完整开发包（支持更长年份），可私信。
⑵ 用c语言编写一个万年历程序
#include <stdio.h> #include <stdlib.h> int leap(int); //判断是否为闰年 int md(int m,int y); //返回本月的天数 void prtweek(void); //输出表头 int fw(int m,int y); //返回本月一号是星期几 void prtmonth(int m); //输出月份表头 int main(int argc, char* argv[]) { int y,m,i,test,week; printf("Year:"); scanf("%d",&y); for (m=1; m<=12; m++) { test=1; prtmonth(m); prtweek(); week=fw(m,y); if (week!=6) for (i=0; i<=week; i++) { putchar('\t'); test++; } for (i=1; i<=md(m,y); i++,test++) { printf("%d\t",i); if (test%7==0) { putchar('\n'); } } putchar('\n'); system("pause");//暂停，以便观察输出 } return 0; } int leap(int y) { return (y%4==0&&y%100||y%400==0)?1:0; } int md(int m,int y) { int d; switch (m) { case 1: case 3: case 5: case 7: case 8: case 10: case 12:d=31;break; case 4: case 6: case 9: case 11:d=30;break; case 2:d=leap(y)?29:28;break; } return d; } void prtweek(void) { printf("%s\t%s\t%s\t%s\t%s\t%s\t%s\t\n","Sun","Mon","Tue","Wed","Thur","Fri","Sat"); } int fw(int m,int y) { int f; if (m<3) { m+=12; y--; } f=(1+2*m+3*(m+1)/5+y+y/4-y/100+y/400)%7; return f; } void prtmonth(int m) { switch (m) { default: case 1:puts("===January===");break; case 2:puts("===February===");break; case 3:puts("===March===");break; case 4:puts("===April===");break; case 5:puts("===May===");break; case 6:puts("===June===");break; case 7:puts("===July===");break; case 8:puts("===August===");break; case 9:puts("===September===");break; case 10:puts("===October===");break; case 11:puts("===November===");break; case 12:puts("===December===");break; } }
⑶ 万年历（C语言编程）
||||#include<stdio.h>
#include<time.h>
int leap (int year)//判断闰年
{
if(year%4==0&&year%100!=0||year%400==0)
return 1;
else return 0;
}
int days_month (int month,int year)//判断月
{
if(month==1||month==3||month==5||month==7||month==8||month==10||month==12)
return 31;
if(month==4||month==6||month==9||month==11)
return 30;
if(month==2&&leap(year)==1) return 29;
else return 28;
}
int firstday(int month,int year)//判断年
{
int w;
w=(1+2*month+3*(month+1)/5+year+year/4+year/400-year/100)%7+1;
return w;
}
main()
{
//调用系统时间
time_t tval;
struct tm *now;
tval = time(NULL);
now = localtime(&tval);
printf("现在时间: %4d年 %d月 %02d日 %d:%02d:%02d\n", now->tm_year+1900, now->tm_mon+1, now->tm_mday,
now->tm_hour, now->tm_min, now->tm_sec);
//调用结束
int i,j=1,k=1,a,b,month,year;
b=days_month(now->tm_mon+1,now->tm_year+1900);
a=firstday (now->tm_mon+1,now->tm_year+1900);
printf(" Sun Mon Tue Wed Thu Fri Sat \n");
if(a==7)
{
for(i=1;i<=b;i++)
{
printf("%4d",i);
if(i%7==0)
{
printf("\n");
}
}
}
if(a!=7)
{
while (j<=4*a)
{
printf(" ");
j++;
}
for(i=1;i<=b;i++)
{
printf("%4d",i);
if(i==7*k-a)
{
printf("\n");
k++;
}
}
}
printf("\n");
}
⑷ 用c语言设计一个简单的万年历怎么写代码
#include"stdio.h"#include"stdlib.h"main(){intYear,Month;//年、月intFirstDay_Year,FirstDay_Month;//某年的第一天是星期几,某年某月的第一天是星期几(范围是0~6,其中0代表星期日)intIsLeapYear;//是否为闰年，0表示不是闰年,1表示是闰年inti,d,y;//临时变量charYN;//YesNo,程序是否要继续intDays[13]={0,31,28,31,30,31,30,31,31,30,31,30,31};//Days[1~12]存储每个月有多少天，其中二月的天数是可变的(闰年29天,平年28天),这里初始化为28天printf("C语言简单万年历\n");//打印标题XunHuan://循环标号(可以通过goto跳转到这里)printf("请输入年份:");//提示输入年份(0~9999)scanf("%d",&Year);//把输入的年份赋值给变量Yearprintf("请输入月份:");//提示输入月份(1~12)scanf("%d",&Month);//把输入的月份赋值给变量Monthy=Year;FirstDay_Year=5*(y/4)+(y%4)-(y/100)+(y/400);//蔡勒公式(计算某年的第一天是星期几)IsLeapYear=(y%4==4&&y%100!=100||y%400==0)?1:0;//判断是否为闰年Days[2]=(IsLeapYear==1)?29:28;//闰年二月29天,非闰年二月28天for(i=1,d=0;i
⑸ 求个c语言版的万年历代码
#include"stdio.h"
#include"stdlib.h"
main()
{
intYear,Month;//年、月
intFirstDay_Year,FirstDay_Month;//某年的第一天是星期几,某年某月的第一天是星期几(范围是0~6,其中0代表星期日)
intIsLeapYear;//是否为闰年，0表示不是闰年,1表示是闰年
inti,d,y;//临时变量
charYN;//YesNo,程序是否要继续
intDays[13]={0,31,28,31,30,31,30,31,31,30,31,30,31};
//Days[1~12]存储每个月有多少天，其中二月的天数是可变的(闰年29天,平年28天),这里初始化为28天
printf("C语言简单万年历 ");//打印标题
XunHuan://循环标号(可以通过goto跳转到这里)
printf("请输入年份<0000~9999>:");//提示输入年份(0~9999)
scanf("%d",&Year);//把输入的年份赋值给变量Year
printf("请输入月份<0~12>:");//提示输入月份(1~12)
scanf("%d",&Month);//把输入的月份赋值给变量Month
y=Year;
FirstDay_Year=5*(y/4)+(y%4)-(y/100)+(y/400);//蔡勒公式(计算某年的第一天是星期几)
IsLeapYear=(y%4==4&&y%100!=100||y%400==0)?1:0;
//判断是否为闰年
Days[2]=(IsLeapYear==1)?29:28;//闰年二月29天,非闰年二月28天
for(i=1,d=0;i<Month;i++)
d=d+Days[i];
FirstDay_Month=(d+FirstDay_Year)%7;//当月的第一天是星期几(0代表星期日)
printf(" **************************************************** ");
printf(" 公元%d年%2d月",Year,Month);//打印年月
printf(" **************************************************** ");
printf("星期日星期一星期二星期三星期四星期五星期六 ");
//打印星期表头
for(i=0;i<FirstDay_Month;i++)
printf("%7c",'');//当某月的第一天不是星期日时打印空格占位
for(d=1;d<=Days[Month];d++)//循环,从每个月的第一天开始打印
{
printf("%7d",d);
if(((d+FirstDay_Month)%7)==0&&d<Days[Month])
printf(" ");//当输出了星期六而且还未输出所有天数时,换行
}
printf(" **************************************************** ");
printf(" ");
printf("是否继续(Y/N)? ");
scanf("%c",&YN);
scanf("%c",&YN);
if(YN=='Y'||YN=='y')
gotoXunHuan;
}
⑹ 单片机万年历的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);
}
}
⑺ C语言程序设计万年历
#include <stdio.h>
int leap (int year)
{if(year%4==0&&year%100!=0||%400==0) //判断是否是闰年
return 1;
else return 0;
}
int days_month (int month,int year) //判断大月和小月
{
if(month==1||month==3||month==5||month==7||month==8||month==10||month==12) //找出大月
return 31;
if(month==4||month==6||month==9||month==11) //找出小月
return 30;
if(month==2&&leap(year)==1) return 29; //判断二月是29天还是29天
else return 28;
}
int firstday(int month,int year)
{int w;
w=(1+2*month+3*(month+1)/5+year+year/4+year/400-year/100)%7+1; //判断每个月开始的第一天是星期几
return w;
}
main()
{int i,j=1,k=1,a,b,month,year;
printf("\n input month and year:\n");
scanf("%d%d",&month,&year); //输入月和年
b=days_month(month,year);
a=firstday (month,year);
printf(" Sun Mon Tue Wed Thu Fri Sat \n"); //输出对应当月的日历
if(a==7)
{for(i=1;i<=b;i++)
{printf("%4d",i);
if(i%7==0)
{printf("\n");
}
}
}
if(a!=7)
{while (j<=4*a)
{printf(" ");
j++;
}
for(i=1;i<=b;i++)
{printf("%4d",i);
if(i==7*k-a)
{printf("\n");
k++;
}
}
}
printf("\n");
}
⑻ 万年历查询程序. C语言代码
除了天数差计算，基本上是完成了你所提出的功能（天数差计算其实已经提供了年内序数计算方方法，可以在此基础上完善即可）。包含星期计算、公历转农历、农历转公历、节气查询。数据与算法均为原创，绝非网上复制而来。附件中有源代码，同时附带农历数据提取工具，可提取1600到7000年之间的任意年份区间，提取后的数据为压缩数据，占用空间小，同时数据包含数九、三伏、入梅和出梅，非常适合写一份完整的万年历。
//判断闰年，参数：年份，返回值：0-平年，1-闰年
intIsLeapYear(intiYear);
//计算日期在年内的序数，参数：年，月，日，年内序数，返回值：0-失败，1-成功
intGetDaysNumInYear(intiYear,intiMonth,intiDay,int*nDays);
//从年内序数计算月、日，参数：年，年内序数，月，日，返回值：0-失败，1-成功
intGetDateFromDays(intiYear,intnDays,int*iMonth,int*iDay);
//检验年、月、日的合法性，参数：年，月，日，返回值：0-失败，1-成功
intDateCheck(intiYear,intiMonth,intiDay);
//获取农历新年的公历年内序数，参数：农历年，返回值：农历新年的公历年内序数
intLunarGetNewYearOrdinal(intiLunarYear);
//获取农历月的天数，参数：农历年，农历月，是否为闰月，返回值：该农历月的天数，为0代表参数无效
intLunarGetDaysofMonth(intiLunarYear,intiLunarMonth,intIsLeapMonth);
//展开大小月数据表（某一年的），参数：农历年，从上一年十一月开始到当前年份（闰）十二月的每月天数，返回值：0-失败，1-成功
intLunarExpandDX(intiLunarYear,intiDayOfMonth[15]);
//获取农历某一年的闰月情况，参数：农历年，返回值，该年的闰月月份，0表示无闰月
intLunarGetLeapMonth(intiLunarYear);
//公历转农历，参数：公历年、月、日，农历年、月、日，是否为闰月，返回值：0-失败，1-成功
intGongli2Nongli(intiYear,intiMonth,intiDay,int*iLunarYear,int*iLunarMonth,int*iLunarDay,int*iIsLeapMonth);
//农历转公历，参数：家历年、月、日，是否为闰月，公历年、月、日，返回值：0-失败，1-成功
intNongli2Gongli(intiLunarYear,intiLunarMonth,intiLunarDay,intiIsLeapMonth,int*iYear,int*iMonth,int*iDay);
//得到指定年份的节气信息，首个是小寒
intGetJieQi(intiYear,intuMonth,unsignedintuJieQi[2]);
//计算星期
unsignedintGetDayOfWeek(intiYear,intuMonth,intuDay);
源代码请看附件吧。提取码：ooj7
⑼ 用C语言怎么编写这个万年历
核心算法：星期（0～6）=(年份系数+月份系数+日期)%7;
其中，年份系数我以2007年做参照，已知2007年，年份系数是0，往前往后分别是递减和递增。增减规律：非闰年为±1，闰年1～2月-2或+1，闰年3～12月+2或者-1。
其中，12个月份系数对应：0,3,3,6,1,4,6,2,5,0,3,5。
根据以上规律，只要利用循环，就可以的到对应系数和星期。
日历实现翻页功能，按键盘左右方向键可以翻译查看当年其他月份，按向上方向键可以返回菜单。
下面是代码：
#include <stdio.h>
#include <malloc.h>
#include <string.h>
#include <conio.h>
#include <math.h>
#include <time.h>
#define XY 2007
#define X07 0//以2007年年系数0做参照
int isLeapYear(int year);//判断是否是闰年，是返回1，否返回0
int addyx(int yx,int n);//年系数自增，0~6,n：自增的跨度，返回自增后的年系数
int getYX(int year,int month);//获得年系数0~6
int getMX(int month);//获得月系数
int getWeek(int yx,int mx,int day);//通过年月系数(yx:年系数；mx:月系数)及日期获取星期
char *getStrWeek(int yx,int mx,int day);//通过年月系数(yx:年系数；mx:月系数)及日期获取星期对应的中文字符串
int getMaxDay(int year,int month);//通过年月获取当月最大天数
void prCalendar(int year,int month);//打印日历
int showMeun();//打印主菜单
int getDuration(int year,int month,int day);//通过日期获取距今天数
int calendar[6][7];
int main()
{
//int year,month,day,yx,mx;
while(1)
{
if(!showMeun())
break;
}
return 0;
}
int showMeun()//打印主菜单
{
int n,year,month,day,yx,mx;
while(1)
{
system("cls");
printf("1、输入年份，显示该年每个月的日历 ");
printf("2、输入年月，显示该月的天数 ");
printf("3、输入日期，显示距离今天的天数 ");
printf("4、输入日期，查询这一天是星期几 ");
printf("0、结束程序 ");
n=-1,year=0,month=0,day=0;
while(n<0 || n>4)
{
printf("请输入选择的菜单序号：");
scanf("%d",&n);
}
switch(n)
{
case 1:while(year<=0 || year>9999)
printf("请输入年份:"),scanf("%d",&year);
prCalendar(year,1);
break;
case 2:while(year<=0 || year>9999 || month<=0 || month>12)
printf("请输入年份及月份:"),scanf("%d%d",&year,&month);
printf("%4d年%2d月共有%d天 按任意键继续。。。。。。 ",year,month,getMaxDay(year,month)),getch();
break;
case 3:while(year<=0 || year>9999 || month<=0 || month>12 || day<0 || day>getMaxDay(year,month))
printf("请输入日期:"),scanf("%d%d%d",&year,&month,&day);
printf("距离今日有%d天 按任意键继续。。。。。。 ",getDuration(year,month,day)),getch();
break;
case 4:while(year<=0 || year>9999 || month<=0 || month>12 || day<0 || day>getMaxDay(year,month))
printf("请输入日期:"),scanf("%d%d%d",&year,&month,&day);
yx=getYX(year,month);
mx=getMX(month);
printf("%4d年%2d月%2d日是%s 按任意键继续。。。。。。 ",year,month,day,getStrWeek(yx,mx,day)),getch();
break;
case 0:return 0;
}
}
return n;
}
void prCalendar(int year,int month)//打印日历
{
char c1,c2;
int i,j,*p=NULL,yx,mx,cnt,w,maxDay;
while(1)
{
p=&calendar[0][0];
yx=getYX(year,month),mx=getMX(month);
cnt=0,w=getWeek(yx,mx,1);
maxDay=getMaxDay(year,month);
for(i=0;i<6;i++)
for(j=0;j<7;j++)
{
if(cnt<w)
p++,cnt++;
calendar[i][j]=0;
}
for(i=1;i<=maxDay;i++)
*p=i,p++;
system("cls");
printf(" %4d 年%2d月 ",year,month);
printf("日 一 二 三 四 五 六 ");
for(i=0;i<6;i++,printf(" "))
for(j=0;j<7;j++)
if(calendar[i][j]==0)
printf(" ");
else
printf("%2d ",calendar[i][j]);
printf("<- 按方向键向左或向右翻页 -> ");
printf(" 按向上方向键返回主菜单 ");
c1=getch();
c2=getch();
if(c1==-32 && c2==75)//左键
{
if(month==1)
month=12;
else
month--;
}
if(c1==-32 && c2==77)//右键
{
if(month==12)
month=1;
else
month++;
}
if(c1==-32 && c2==72)//上键
{
showMeun();
break;
}
}
}
int getDuration(int year,int month,int day)//通过日期获取距今天数
{
int i,y,m,d,sum=0,sum2=0,minY,maxY,minM,maxM,minD,maxD;
time_t tt;
struct tm *tmp;
time(&tt);
tmp=localtime(&tt);
y=1900+tmp->tm_year,m=1+tmp->tm_mon,d=tmp->tm_mday;//获取当前日期的年月日
if(year<y)
minY=year,maxY=y,minM=month,maxM=m,minD=day,maxD=d;
if(year>y)
minY=y,maxY=year,minM=m,maxM=month,minD=d,maxD=day;
if(year!=y)
{
for(i=minY;i<maxY;i++)//按相差年份累加（不包含右端最大年份）
if(isLeapYear(i))
sum+=366;//闰年
else
sum+=365;
for(i=1;i<minM;i++)//扣除左端年份已过月份对应天数
sum-=getMaxDay(minY,i);
sum-=minD;//扣除左端当月已过天数
for(i=1;i<maxM;i++)//累加右端最大年份已过月份对应天数（不包含最大年份当月）
sum+=getMaxDay(maxY,i);
sum+=maxD;//累加右端当月已过天数
}
else//如果年份相同，累加两边一年内已过天数，求差值
{
for(i=1;i<month;i++)
sum+=getMaxDay(month,i);
sum+=day;
for(i=1;i<m;i++)
sum2+=getMaxDay(m,i);
sum2+=d;
return abs(sum2-sum);
}
return sum;
}
int getMaxDay(int year,int month)//通过年月获取当月最大天数
{
int days[12]={31,28,31,30,31,30,31,31,30,31,30,31};
if(isLeapYear(year) && month==2)
return days[month-1]+1;
return days[month-1];
}
char *getStrWeek(int yx,int mx,int day)//通过年月系数(yx:年系数；mx:月系数)及日期获取星期对应的中文字符串
{
int w;
static char week[7];
memset(week,0,7);
strcpy(week,"星期");
w=getWeek(yx,mx,day);
switch(w)
{
case 0:strcat(week,"日");break;
case 1:strcat(week,"一");break;
case 2:strcat(week,"二");break;
case 3:strcat(week,"三");break;
case 4:strcat(week,"四");break;
case 5:strcat(week,"五");break;
case 6:strcat(week,"六");break;
}
return week;
}
int getWeek(int yx,int mx,int day)//通过年月系数(yx:年系数；mx:月系数)及日期获取星期对应的数值0~6
{
return (yx+mx+day)%7;
}
int getMX(int month)//获得月系数
{
int xmonth[12]={0,3,3,6,1,4,6,2,5,0,3,5};//月系数：1-12月，每月的系数。
return xmonth[month-1];
}
int getYX(int year,int month)//获得年系数0~6
{
int yx=0,nyear=XY,isly,flag;
if(nyear==year)
return 0;
if(nyear<year)
flag=0,nyear++;
else
flag=1,nyear--;
while(1)
{
isly=isLeapYear(nyear);
if(!isly){//非闰年年系数累加1
if(!flag)
yx=addyx(yx,1);
else
yx=addyx(yx,-1);
}
if(isly && month>=1 && month<=2){//闰年1~2月年系数累加1,3`12月年系数累加2
if(!flag)
yx=addyx(yx,1);
else
yx=addyx(yx,-2);
}
else if(isly && month>=3 && month<=12){
if(!flag)
yx=addyx(yx,2);
else
yx=addyx(yx,-1);
}
if(nyear==year)
break;
if(!flag && nyear<year)
nyear++;
if(flag && nyear>year)
nyear--;
}
return yx;
}
int addyx(int yx,int n)//年系数自增，0~6,n：自增的跨度，返回自增后的年系数
{
if(n>0)
{
if(yx+n<=6)
return yx+n;
if(yx+n>6)
return yx+n-7;
}
if(n<0)
{
if(yx+n>=0)
return yx+n;
if(yx+n<0)
return yx+n+7;
}
return -1;
}
int isLeapYear(int year)//判断是否是闰年，是返回1，否返回0
{
if((year%4==0 && year%100!=0)||(year%400==0))
return 1;
return 0;
}
⑽ 万年历的C语言程序
已经编译运行确认过。
#include <stdio.h>
#include <stdlib.h>
int leap(int); /*判断是否为闰年*/
int md(int m,int y); /*返回本月的天数*/
void prtweek(void); /*输出表头*/
int fw(int m,int y); /*返回本月一号是星期几*/
void prtmonth(int m); /*输出月份表头*/
int main(void)
{
int y,m,i,test,week;
printf("请输入您要查询的年份: ");
scanf("%d",&y);
for (m=1; m<=12; m++) {
test=1;
prtmonth(m);
prtweek();
week=fw(m,y);
if (week!=6)
for (i=0; i<=week; i++) {
putchar('\t');
test++;
}
for (i=1; i<=md(m,y); i++,test++) {
printf("%d\t",i);
if (test%7==0) {
putchar('\n');
}
}
putchar('\n');
system("pause");//暂停，以便观察输出
}
return 0;
}
int leap(int y)
{
return (y%4==0&&y%100||y%400==0)?1:0;
}
int md(int m,int y)
{
int d;
switch (m) {
case 1:
case 3:
case 5:
case 7:
case 8:
case 10:
case 12:d=31;break;
case 4:
case 6:
case 9:
case 11:d=30;break;
case 2:d=leap(y)?29:28;break;
}
return d;
}
void prtweek(void)
{
printf("%s\t%s\t%s\t%s\t%s\t%s\t%s\t\n","Sun","Mon","Tue","Wed","Thur","Fri","Sat");
}
int fw(int m,int y)
{
int f;
if (m<3) {
m+=12;
y--;
}
f=(1+2*m+3*(m+1)/5+y+y/4-y/100+y/400)%7;
return f;
}
void prtmonth(int m)
{
switch (m) {
default:
case 1:puts("===January===");break;
case 2:puts("===February===");break;
case 3:puts("===March===");break;
case 4:puts("===April===");break;
case 5:puts("===May===");break;
case 6:puts("===June===");break;
case 7:puts("===July===");break;
case 8:puts("===August===");break;
case 9:puts("===September===");break;
case 10:puts("===October===");break;
case 11:puts("===November===");break;
case 12:puts("===December===");break;
}
}