日历程序求大神修改
#include<stdio.h>
#include<string.h>
#include<stdlib.h>
#include<conio.h>
#include<time.h>
#include<windows.h>
typedef struct
{
//农历年份
int lunar_year;
//农历月份
int lunar_month;
//农历日期
int lunar_day;
//本月天数
int current_mday;
//本年闰月
int leap_month;
//闰月标记
int leap_flag;
}Lunar_info;
typedef struct
{
//阳历年份
int era_year;
//阳历月份
int era_month;
//阳历日期
int era_day;
}Chinese_era;
int s_year;
int s_month;
int s_day;
/*1900-2050年的农历数据
数据格式说明：
5位十六进制数字 例:04bd8
1位:是否为闰月(30天) 0:不是 1:是
2、3、4位:转换二进制为:0100 1011 1101(1为30天，0为29天)
04bd8表示为(13个月):29,30,29,29,30,29,30,30,30(闰月),30,30,29,30;
5位:如果有闰月，则为月份，没有则为0, 此为8月*/
int lunar_info[]=
{
0x04bd8,0x04ae0,0x0a570,0x054d5,0x0d260,0x0d950,0x16554,0x056a0,0x09ad0,0x055d2,
0x04ae0,0x0a5b6,0x0a4d0,0x0d250,0x1d255,0x0b540,0x0d6a0,0x0ada2,0x095b0,0x14977,
0x04970,0x0a4b0,0x0b4b5,0x06a50,0x06d40,0x1ab54,0x02b60,0x09570,0x052f2,0x04970,
0x06566,0x0d4a0,0x0ea50,0x06e95,0x05ad0,0x02b60,0x186e3,0x092e0,0x1c8d7,0x0c950,
0x0d4a0,0x1d8a6,0x0b550,0x056a0,0x1a5b4,0x025d0,0x092d0,0x0d2b2,0x0a950,0x0b557,
0x06ca0,0x0b550,0x15355,0x04da0,0x0a5b0,0x14573,0x052b0,0x0a9a8,0x0e950,0x06aa0,
0x0aea6,0x0ab50,0x04b60,0x0aae4,0x0a570,0x05260,0x0f263,0x0d950,0x05b57,0x056a0,
0x096d0,0x04dd5,0x04ad0,0x0a4d0,0x0d4d4,0x0d250,0x0d558,0x0b540,0x0b6a0,0x195a6,
0x095b0,0x049b0,0x0a974,0x0a4b0,0x0b27a,0x06a50,0x06d40,0x0af46,0x0ab60,0x09570,
0x04af5,0x04970,0x064b0,0x074a3,0x0ea50,0x06b58,0x055c0,0x0ab60,0x096d5,0x092e0,
0x0c960,0x0d954,0x0d4a0,0x0da50,0x07552,0x056a0,0x0abb7,0x025d0,0x092d0,0x0cab5,
0x0a950,0x0b4a0,0x0baa4,0x0ad50,0x055d9,0x04ba0,0x0a5b0,0x15176,0x052b0,0x0a930,
0x07954,0x06aa0,0x0ad50,0x05b52,0x04b60,0x0a6e6,0x0a4e0,0x0d260,0x0ea65,0x0d530,
0x05aa0,0x076a3,0x096d0,0x04bd7,0x04ad0,0x0a4d0,0x1d0b6,0x0d250,0x0d520,0x0dd45,
0x0b5a0,0x056d0,0x055b2,0x049b0,0x0a577,0x0a4b0,0x0aa50,0x1b255,0x06d20,0x0ada0,
0x14b63
};
/*天干*/
char Gan[10][3]={"甲","乙","丙","丁","戊","己","庚","辛","壬","癸"};
/*地支*/
char Zhi[12][3]={"子","丑","寅","卯","辰","巳","午","未","申","酉","戌","亥"};
/*生肖*/
char Animals[12][3]={"鼠","牛","虎","兔","龙","蛇","马","羊","猴","鸡","狗","猪"};
/*24节气*/
char solar_term[24][5]=
{
"小寒","大寒","立春","雨水","惊蛰","春分",
"清明","谷雨","立夏","小满","芒种","夏至",
"小暑","大暑","立秋","处暑","白露","秋分",
"寒露","霜降","立冬","小雪","大雪","冬至"
};
/*24节气的分钟数*/
int sTermInfo[]=
{
0,21208,42467,63836,85337,107014,128867,150921,173149,195551,218072,240693,263343,
285989,308563,331033,353350,375494,397447,419210,440795,462224,483532,504758
};
/*农历日*/
char chinese_day[30][5]=
{
"初一","初二","初三","初四","初五","初六","初七",
"初八","初九","初十","十一","十二","十三","十四",
"十五","十六","十七","十八","十九","廿十","廿一",
"廿二","廿三","廿四","廿五","廿六","廿七","廿八",
"廿九","卅十"
};
/*农历月*/
char chinese_month[12][5]={"正","二","三","四","五","六","七","八","九","十","冬","腊"};
/******************************************************************************************************
** 函数名称:TIME
** 功能描述:取得系统当前时间
** 如:TIME() 返回系统当前时间
** 输 入:
** 输 出: 系统当前时间 成功
** Error: 系统差错 失败
*******************************************************************************************************/
void TIME()
{
static char *week[]={"一","二","三","四","五","六","日"};
time_t t;
struct tm *tp;
t=time(NULL);
tp=localtime(&t);
printf("%d年%02d月%02d日",tp->tm_year+1900,tp->tm_mon+1,tp->tm_mday);
printf(" %02d:%02d:%02d ",tp->tm_hour,tp->tm_min,tp->tm_sec);
printf("星期%s\t ",week[(tp->tm_wday)-1]);
}
/******************************************************************************************************
** 函数名称:buffer
** 功能描述:延迟刷新时间
** 如:buffer(2) 返回2秒后执行下一操作
** 输 入: n 秒
** 输 出: 对应秒数 成功
** Error: 输入错误 失败
*******************************************************************************************************/
void buffer(int n)
{
time_t start,end;
start=time(NULL);
end=time(NULL);
while(end-start<n)
end=time(NULL);
}
/*******************************************************************************************************
** 函数名称:leap
** 功能描述:返回阳历某年的天数,闰年返回366天,平年返回365天
** 如:leap(2000) 返回366天
** 输 入: year 公历年
** 输 出: 对应天数 成功
** Error: 输入错误 失败
********************************************************************************************************/
int leap(int year)
{
if(year%4==0&&year%100!=0||year%400==0) return 366;
else return 365;
}
/*******************************************************************************************************
** 函数名称:day
** 功能描述:返回阳历当月的天数
** 如:day(1) 返回31天
** 输 入: month 公历月
** 输 出: 对应天数 成功
** Error: 输入错误 失败
********************************************************************************************************/
int day(int month)
{
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(s_year)==366) return 29;
else return 28;
}
/*******************************************************************************************************
** 函数名称:get_solar_total
** 功能描述:返回1900年01月01日到M年M月的天数
** 如:get_solar_total(2000,01) 返回36555天
** 输 入: s_year,s_month
** 输 出: M年M月-1900-01-01 成功
** Error: 输入错误 失败
********************************************************************************************************/
int get_solar_total(int solar_year, int solar_month)
{
int total;
int temp_num;
total=0;
for (temp_num=1900;temp_num<solar_year;temp_num++)
{
total+=leap(temp_num);
}
for(temp_num=1;temp_num<solar_month;temp_num++)
{
total+=day(temp_num);
}
return total;
}
/*******************************************************************************************************
** 函数名称:get_week
** 功能描述:返回M年M月的1号为星期几,以1900.01.01为基准1为星期日
** 如:get_week(2000,01) 返回星期六
** 输 入: s_year,s_month
** 输 出: M年M月的一号是星期几 成功
** Error: 输入错误 失败
********************************************************************************************************/
int get_week(int solar_year, int solar_month)
{
int week;
int total;
/* 1900.01.01为星期一*/
week=2;
total=get_solar_total(solar_year, solar_month);
total%=7;
week=week+total;
week%=7;
if (week==0)
week=7;
return week;
}
/******************************************************************************************************
** 函数名称:get_leap_month
** 功能描述:确定是否存在农历的闰月
** 如:get_leap_month(1982) 返回存在闰4月
** 输 入: lunar_year
** 输 出: 是否存在闰月 成功
** Error: 输入错误 失败
*******************************************************************************************************/
int get_leap_month(int lunar_year)
{
return lunar_info[lunar_year-1900]&0xf;
}
/******************************************************************************************************
** 函数名称:get_leap_month_day
** 功能描述:若存在闰月,返回闰月的天数,30?29
** 如:get_leap_month_day(1982) 返回30天
** 输 入: lunar_year
** 输 出: 存在的是大月还是小月 成功
** Error: 输入错误 失败
*******************************************************************************************************/
int get_leap_month_day(int lunar_year)
{
if (get_leap_month(lunar_year))
return ((lunar_info[lunar_year-1900]&0x10000)?30:29);
else
return(0);
}
/******************************************************************************************************
** 函数名称:get_lunar_month_total
** 功能描述:确定农历当月天数,30?29
** 如:get_lunar_month_total(1982,4) 返回30天
** 输 入: lunar_year
** 输 出: 存在的是大月还是小月 成功
** Error: 输入错误 失败
*******************************************************************************************************/
int get_lunar_month_total(int lunar_year, int lunar_month)
{
return ((lunar_info[lunar_year-1900]&(0x10000>>lunar_month))?30:29);
}
/******************************************************************************************************
** 函数名称:get_lunar_year_total
** 功能描述:农历当年总天数,354?355
** 如:get_lunar_year_total(1982) 返回355天
** 输 入: lunar_year
** 输 出: 一年的总天数 成功
** Error: 输入错误 失败
*******************************************************************************************************/
int get_lunar_year_total(int lunar_year)
{
/*348 = 29*12 */
int sum=348;
int i;
for(i=0x8000;i>0x8; i>>=1)
sum+=(lunar_info[lunar_year-1900]&i)?1:0;
return(sum+get_leap_month_day(lunar_year));
}
/******************************************************************************************************
** 函数名称:get_chinese_era
** 功能描述:确定天干地支
** 如:get_chinese_era(2007-1864,str) 返回str='丁亥'
** 输 入: s-year-1864,str
** 输 出: 干+支 成功
** Error: 输入错误 失败
*******************************************************************************************************/
void get_chinese_era(int num, char *str)
{
strcpy(str, Gan[num%10]);
strcat(str, Zhi[num%12]);
}
/*24节气算法
void sTerm(int n)
{
double offDate;
//offDate=31556925974.7*(s_year-1900)+sTermInfo[n]*60000;
}*/
