萬年歷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;
}
}