当前位置： 首页 > java >正文

万年历算法介绍(C代码)

java 2025/7/4 23:17:35

程序一

#define uchar unsigned char
#define uint unsigned int
#include "reg51.h"code uchar year_code[597]={0x04,0xAe,0x53,0x0A,0x57,0x48,0x55,0x26,0xBd, // 1901-19030x0d,0x26,0x50,0x0d,0x95,0x44,0x46,0xAA,0xB9, // 1904-19060x05,0x6A,0x4d,0x09,0xAd,0x42,0x24,0xAe,0xB6, // 1907-19090x04,0xAe,0x4A,0x6A,0x4d,0xBe,0x0A,0x4d,0x52, // 1910-19120x0d,0x25,0x46,0x5d,0x52,0xBA,0x0B,0x54,0x4e, // 1913-19150x0d,0x6A,0x43,0x29,0x6d,0x37,0x09,0x5B,0x4B, // 1916-19180x74,0x9B,0xC1,0x04,0x97,0x54,0x0A,0x4B,0x48, // 1919-19210x5B,0x25,0xBC,0x06,0xA5,0x50,0x06,0xd4,0x45, // 1922-19240x4A,0xdA,0xB8,0x02,0xB6,0x4d,0x09,0x57,0x42, // 1925-19270x24,0x97,0xB7,0x04,0x97,0x4A,0x66,0x4B,0x3e, // 1928-19300x0d,0x4A,0x51,0x0e,0xA5,0x46,0x56,0xd4,0xBA, // 1931-19330x05,0xAd,0x4e,0x02,0xB6,0x44,0x39,0x37,0x38, // 1934-19360x09,0x2e,0x4B,0x7C,0x96,0xBf,0x0C,0x95,0x53, // 1937-19390x0d,0x4A,0x48,0x6d,0xA5,0x3B,0x0B,0x55,0x4f, // 1940-19420x05,0x6A,0x45,0x4A,0xAd,0xB9,0x02,0x5d,0x4d, // 1943-19450x09,0x2d,0x42,0x2C,0x95,0xB6,0x0A,0x95,0x4A, // 1946-19480x7B,0x4A,0xBd,0x06,0xCA,0x51,0x0B,0x55,0x46, // 1949-19510x55,0x5A,0xBB,0x04,0xdA,0x4e,0x0A,0x5B,0x43, // 1952-19540x35,0x2B,0xB8,0x05,0x2B,0x4C,0x8A,0x95,0x3f, // 1955-19570x0e,0x95,0x52,0x06,0xAA,0x48,0x7A,0xd5,0x3C, // 1958-19600x0A,0xB5,0x4f,0x04,0xB6,0x45,0x4A,0x57,0x39, // 1961-19630x0A,0x57,0x4d,0x05,0x26,0x42,0x3e,0x93,0x35, // 1964-19660x0d,0x95,0x49,0x75,0xAA,0xBe,0x05,0x6A,0x51, // 1967-19690x09,0x6d,0x46,0x54,0xAe,0xBB,0x04,0xAd,0x4f, // 1970-19720x0A,0x4d,0x43,0x4d,0x26,0xB7,0x0d,0x25,0x4B, // 1973-19750x8d,0x52,0xBf,0x0B,0x54,0x52,0x0B,0x6A,0x47, // 1976-19780x69,0x6d,0x3C,0x09,0x5B,0x50,0x04,0x9B,0x45, // 1979-19810x4A,0x4B,0xB9,0x0A,0x4B,0x4d,0xAB,0x25,0xC2, // 1982-19840x06,0xA5,0x54,0x06,0xd4,0x49,0x6A,0xdA,0x3d, // 1985-19870x0A,0xB6,0x51,0x09,0x37,0x46,0x54,0x97,0xBB, // 1988-19900x04,0x97,0x4f,0x06,0x4B,0x44,0x36,0xA5,0x37, // 1991-19930x0e,0xA5,0x4A,0x86,0xB2,0xBf,0x05,0xAC,0x53, // 1994-19960x0A,0xB6,0x47,0x59,0x36,0xBC,0x09,0x2e,0x50, // 1997-19990x0C,0x96,0x45,0x4d,0x4A,0xB8,0x0d,0x4A,0x4C, // 2000-20020x0d,0xA5,0x41,0x25,0xAA,0xB6,0x05,0x6A,0x49, // 2003-20050x7A,0xAd,0xBd,0x02,0x5d,0x52,0x09,0x2d,0x47, // 2006-20080x5C,0x95,0xBA,0x0A,0x95,0x4e,0x0B,0x4A,0x43, // 2009-20110x4B,0x55,0x37,0x0A,0xd5,0x4A,0x95,0x5A,0xBf, // 2012-20140x04,0xBA,0x53,0x0A,0x5B,0x48,0x65,0x2B,0xBC, // 2015-20170x05,0x2B,0x50,0x0A,0x93,0x45,0x47,0x4A,0xB9, // 2018-20200x06,0xAA,0x4C,0x0A,0xd5,0x41,0x24,0xdA,0xB6, // 2021-20230x04,0xB6,0x4A,0x69,0x57,0x3d,0x0A,0x4e,0x51, // 2024-20260x0d,0x26,0x46,0x5e,0x93,0x3A,0x0d,0x53,0x4d, // 2027-20290x05,0xAA,0x43,0x36,0xB5,0x37,0x09,0x6d,0x4B, // 2030-20320xB4,0xAe,0xBf,0x04,0xAd,0x53,0x0A,0x4d,0x48, // 2033-20350x6d,0x25,0xBC,0x0d,0x25,0x4f,0x0d,0x52,0x44, // 2036-20380x5d,0xAA,0x38,0x0B,0x5A,0x4C,0x05,0x6d,0x41, // 2039-20410x24,0xAd,0xB6,0x04,0x9B,0x4A,0x7A,0x4B,0xBe, // 2042-20440x0A,0x4B,0x51,0x0A,0xA5,0x46,0x5B,0x52,0xBA, // 2045-20470x06,0xd2,0x4e,0x0A,0xdA,0x42,0x35,0x5B,0x37, // 2048-20500x09,0x37,0x4B,0x84,0x97,0xC1,0x04,0x97,0x53, // 2051-20530x06,0x4B,0x48,0x66,0xA5,0x3C,0x0e,0xA5,0x4f, // 2054-20560x06,0xB2,0x44,0x4A,0xB6,0x38,0x0A,0xAe,0x4C, // 2057-20590x09,0x2e,0x42,0x3C,0x97,0x35,0x0C,0x96,0x49, // 2060-20620x7d,0x4A,0xBd,0x0d,0x4A,0x51,0x0d,0xA5,0x45, // 2063-20650x55,0xAA,0xBA,0x05,0x6A,0x4e,0x0A,0x6d,0x43, // 2066-20680x45,0x2e,0xB7,0x05,0x2d,0x4B,0x8A,0x95,0xBf, // 2069-20710x0A,0x95,0x53,0x0B,0x4A,0x47,0x6B,0x55,0x3B, // 2072-20740x0A,0xd5,0x4f,0x05,0x5A,0x45,0x4A,0x5d,0x38, // 2075-20770x0A,0x5B,0x4C,0x05,0x2B,0x42,0x3A,0x93,0xB6, // 2078-20800x06,0x93,0x49,0x77,0x29,0xBd,0x06,0xAA,0x51, // 2081-20830x0A,0xd5,0x46,0x54,0xdA,0xBA,0x04,0xB6,0x4e, // 2084-20860x0A,0x57,0x43,0x45,0x27,0x38,0x0d,0x26,0x4A, // 2087-20890x8e,0x93,0x3e,0x0d,0x52,0x52,0x0d,0xAA,0x47, // 2090-20920x66,0xB5,0x3B,0x05,0x6d,0x4f,0x04,0xAe,0x45, // 2093-20950x4A,0x4e,0xB9,0x0A,0x4d,0x4C,0x0d,0x15,0x41, // 2096-20980x2d,0x92,0xB5};                              // 2099
};code uchar day_code1[9]={0x0,0x1f,0x3b,0x5a,0x78,0x97,0xb5,0xd4,0xf3};
code uint day_code2[3]={0x111,0x130,0x14e};
bit c_moon;
data uchar year_moon,month_moon,day_moon,week;bit get_moon_day(uchar month_p,uint table_addr)
{switch (month_p){case 1:{if((year_code[table_addr]&0x08)==0)return(0);else return(1);}case 2:{if((year_code[table_addr]&0x04)==0)return(0);else return(1);}case 3:{if((year_code[table_addr]&0x02)==0)return(0);else return(1);}case 4:{if((year_code[table_addr]&0x01)==0)return(0);else return(1);}case 5:{if((year_code[table_addr+1]&0x80)==0)return(0);else return(1);}case 6:{if((year_code[table_addr+1]&0x40)==0)return(0);else return(1);}case 7:{if((year_code[table_addr+1]&0x20)==0)return(0);else return(1);}case 8:{if((year_code[table_addr+1]&0x10)==0)return(0);else return(1);}case 9:{if((year_code[table_addr+1]&0x08)==0)return(0);else return(1);}case 10:{if((year_code[table_addr+1]&0x04)==0)return(0);else return(1);}case 11:{if((year_code[table_addr+1]&0x02)==0)return(0);else return(1);}case 12:{if((year_code[table_addr+1]&0x01)==0)return(0);else return(1);}case 13:{if((year_code[table_addr+2]&0x80)==0)return(0);else return(1);}}
}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 flag_y;//BCD->hex 先把数据转换为十六进制year=year/16*10+year;month=month/16*10+month;day=day/16*10+day;//定位数据表地址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-1if (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月为闰月,天数加1temp4+=1;}
//计算公历日离当年元旦的天数完成
//判断公历日在春节前还是春节后if (temp4>=temp3){ //公历日在春节后或就是春节当日使用下面代码进行运算temp4-=temp3;month=0x1;month_p=0x1;  //month_p为月份指向,公历日在春节前或就是春节当日month_p指向首月//检查该农历月为大小还是小月,大月返回1,小月返回0flag_y=0;if(get_moon_day(month_p,table_addr)==0)temp1=0x1d; //小月29天elsetemp1=0x1e; //大小30天temp2=year_code[table_addr]/16; 
//从数据表中取该年的闰月月份,如为0则该年无闰月
//效果和temp2=year_code[table_addr]&0xf0;temp2=_cror_(temp2,4)一样,但生成代码更简洁while(temp4>=temp1){temp4-=temp1;month_p+=1;if(month==temp2){flag_y=~flag_y;if(flag_y==0)month+=1;}elsemonth+=1;if(get_moon_day(month_p,table_addr)==0)temp1=0x1d;elsetemp1=0x1e;}day=temp4+1;}else{//公历日在春节前使用下面代码进行运算temp3-=temp4;if (year==0x0){year=0x63;c=1;}elseyear-=1;table_addr-=0x3;month=0xc;temp2=year_code[table_addr]/16;if(temp2==0)month_p=0xc;elsemonth_p=0xd;flag_y=0;if(get_moon_day(month_p,table_addr)==0)temp1=0x1d;elsetemp1=0x1e;while(temp3>temp1){temp3-=temp1;month_p-=1;if(flag_y==0)month-=1;if(month==temp2)flag_y=~flag_y;if(get_moon_day(month_p,table_addr)==0)temp1=0x1d;elsetemp1=0x1e;}day=temp1-temp3+1;}c_moon=c;//HEX->BCD ,运算结束后,把数据转换为BCD数据year_moon=(year/10*16)|(year);month_moon=(month/10*16)|(month);day_moon=(day/10*16)|(day);
}code uchar table_week[12]={0,3,3,6,1,4,6,2,5,0,3,5};
//月修正数据表void Conver_week(bit c,uchar year,uchar month,uchar day)
//c=0 为21世纪,c=1 为19世纪 输入输出数据均为BCD数据
{ uchar temp2;//BCD->hex 先把数据转换为十六进制year=year/16*10+year;month=month/16*10+month;day=day/16*10+day;if (c==0){year+=0x64;}  //如果为21世纪,年份数加100//所过闰年数只算1900年之后的temp2=year+year/0x4;temp2=temp2%0x7;  //为节省资源,先进行一次取余,避免数大于0xff,避免使用整型数据temp2=temp2+day+table_week[month-1];if (year%0x4==0&&month<3)temp2-=1;week=temp2%0x7;
}

----------------------------------------------------------------------------------------------------------

程序二

http://blog.csdn.net/u011082606/article/details/47337953

//功能：C51写的公历转农历和星期，文件另存入百度云盘“万年历程序”
#define uchar unsigned char
#define uint unsigned int
#include "intrins.h"code uchar year_code[597]={0x04,0xAe,0x53,0x0A,0x57,0x48,0x55,0x26,0xBd, // 1901-19030x0d,0x26,0x50,0x0d,0x95,0x44,0x46,0xAA,0xB9, // 1904-19060x05,0x6A,0x4d,0x09,0xAd,0x42,0x24,0xAe,0xB6, // 1907-19090x04,0xAe,0x4A,0x6A,0x4d,0xBe,0x0A,0x4d,0x52, // 1910-19120x0d,0x25,0x46,0x5d,0x52,0xBA,0x0B,0x54,0x4e, // 1913-19150x0d,0x6A,0x43,0x29,0x6d,0x37,0x09,0x5B,0x4B, // 1916-19180x74,0x9B,0xC1,0x04,0x97,0x54,0x0A,0x4B,0x48, // 1919-19210x5B,0x25,0xBC,0x06,0xA5,0x50,0x06,0xd4,0x45, // 1922-19240x4A,0xdA,0xB8,0x02,0xB6,0x4d,0x09,0x57,0x42, // 1925-19270x24,0x97,0xB7,0x04,0x97,0x4A,0x66,0x4B,0x3e, // 1928-19300x0d,0x4A,0x51,0x0e,0xA5,0x46,0x56,0xd4,0xBA, // 1931-19330x05,0xAd,0x4e,0x02,0xB6,0x44,0x39,0x37,0x38, // 1934-19360x09,0x2e,0x4B,0x7C,0x96,0xBf,0x0C,0x95,0x53, // 1937-19390x0d,0x4A,0x48,0x6d,0xA5,0x3B,0x0B,0x55,0x4f, // 1940-19420x05,0x6A,0x45,0x4A,0xAd,0xB9,0x02,0x5d,0x4d, // 1943-19450x09,0x2d,0x42,0x2C,0x95,0xB6,0x0A,0x95,0x4A, // 1946-19480x7B,0x4A,0xBd,0x06,0xCA,0x51,0x0B,0x55,0x46, // 1949-19510x55,0x5A,0xBB,0x04,0xdA,0x4e,0x0A,0x5B,0x43, // 1952-19540x35,0x2B,0xB8,0x05,0x2B,0x4C,0x8A,0x95,0x3f, // 1955-19570x0e,0x95,0x52,0x06,0xAA,0x48,0x7A,0xd5,0x3C, // 1958-19600x0A,0xB5,0x4f,0x04,0xB6,0x45,0x4A,0x57,0x39, // 1961-19630x0A,0x57,0x4d,0x05,0x26,0x42,0x3e,0x93,0x35, // 1964-19660x0d,0x95,0x49,0x75,0xAA,0xBe,0x05,0x6A,0x51, // 1967-19690x09,0x6d,0x46,0x54,0xAe,0xBB,0x04,0xAd,0x4f, // 1970-19720x0A,0x4d,0x43,0x4d,0x26,0xB7,0x0d,0x25,0x4B, // 1973-19750x8d,0x52,0xBf,0x0B,0x54,0x52,0x0B,0x6A,0x47, // 1976-19780x69,0x6d,0x3C,0x09,0x5B,0x50,0x04,0x9B,0x45, // 1979-19810x4A,0x4B,0xB9,0x0A,0x4B,0x4d,0xAB,0x25,0xC2, // 1982-19840x06,0xA5,0x54,0x06,0xd4,0x49,0x6A,0xdA,0x3d, // 1985-19870x0A,0xB6,0x51,0x09,0x37,0x46,0x54,0x97,0xBB, // 1988-19900x04,0x97,0x4f,0x06,0x4B,0x44,0x36,0xA5,0x37, // 1991-19930x0e,0xA5,0x4A,0x86,0xB2,0xBf,0x05,0xAC,0x53, // 1994-19960x0A,0xB6,0x47,0x59,0x36,0xBC,0x09,0x2e,0x50, // 1997-19990x0C,0x96,0x45,0x4d,0x4A,0xB8,0x0d,0x4A,0x4C, // 2000-20020x0d,0xA5,0x41,0x25,0xAA,0xB6,0x05,0x6A,0x49, // 2003-20050x7A,0xAd,0xBd,0x02,0x5d,0x52,0x09,0x2d,0x47, // 2006-20080x5C,0x95,0xBA,0x0A,0x95,0x4e,0x0B,0x4A,0x43, // 2009-20110x4B,0x55,0x37,0x0A,0xd5,0x4A,0x95,0x5A,0xBf, // 2012-20140x04,0xBA,0x53,0x0A,0x5B,0x48,0x65,0x2B,0xBC, // 2015-20170x05,0x2B,0x50,0x0A,0x93,0x45,0x47,0x4A,0xB9, // 2018-20200x06,0xAA,0x4C,0x0A,0xd5,0x41,0x24,0xdA,0xB6, // 2021-20230x04,0xB6,0x4A,0x69,0x57,0x3d,0x0A,0x4e,0x51, // 2024-20260x0d,0x26,0x46,0x5e,0x93,0x3A,0x0d,0x53,0x4d, // 2027-20290x05,0xAA,0x43,0x36,0xB5,0x37,0x09,0x6d,0x4B, // 2030-20320xB4,0xAe,0xBf,0x04,0xAd,0x53,0x0A,0x4d,0x48, // 2033-20350x6d,0x25,0xBC,0x0d,0x25,0x4f,0x0d,0x52,0x44, // 2036-20380x5d,0xAA,0x38,0x0B,0x5A,0x4C,0x05,0x6d,0x41, // 2039-20410x24,0xAd,0xB6,0x04,0x9B,0x4A,0x7A,0x4B,0xBe, // 2042-20440x0A,0x4B,0x51,0x0A,0xA5,0x46,0x5B,0x52,0xBA, // 2045-20470x06,0xd2,0x4e,0x0A,0xdA,0x42,0x35,0x5B,0x37, // 2048-20500x09,0x37,0x4B,0x84,0x97,0xC1,0x04,0x97,0x53, // 2051-20530x06,0x4B,0x48,0x66,0xA5,0x3C,0x0e,0xA5,0x4f, // 2054-20560x06,0xB2,0x44,0x4A,0xB6,0x38,0x0A,0xAe,0x4C, // 2057-20590x09,0x2e,0x42,0x3C,0x97,0x35,0x0C,0x96,0x49, // 2060-20620x7d,0x4A,0xBd,0x0d,0x4A,0x51,0x0d,0xA5,0x45, // 2063-20650x55,0xAA,0xBA,0x05,0x6A,0x4e,0x0A,0x6d,0x43, // 2066-20680x45,0x2e,0xB7,0x05,0x2d,0x4B,0x8A,0x95,0xBf, // 2069-20710x0A,0x95,0x53,0x0B,0x4A,0x47,0x6B,0x55,0x3B, // 2072-20740x0A,0xd5,0x4f,0x05,0x5A,0x45,0x4A,0x5d,0x38, // 2075-20770x0A,0x5B,0x4C,0x05,0x2B,0x42,0x3A,0x93,0xB6, // 2078-20800x06,0x93,0x49,0x77,0x29,0xBd,0x06,0xAA,0x51, // 2081-20830x0A,0xd5,0x46,0x54,0xdA,0xBA,0x04,0xB6,0x4e, // 2084-20860x0A,0x57,0x43,0x45,0x27,0x38,0x0d,0x26,0x4A, // 2087-20890x8e,0x93,0x3e,0x0d,0x52,0x52,0x0d,0xAA,0x47, // 2090-20920x66,0xB5,0x3B,0x05,0x6d,0x4f,0x04,0xAe,0x45, // 2093-20950x4A,0x4e,0xB9,0x0A,0x4d,0x4C,0x0d,0x15,0x41, // 2096-20980x2d,0x92,0xB5};                              // 2099//月份数据表
code uchar day_code1[9]={0x0,0x1f,0x3b,0x5a,0x78,0x97,0xb5,0xd4,0xf3};
code uint day_code2[3]={0x111,0x130,0x14e};bit c_moon;
data uchar year_moon,month_moon,day_moon,week;
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);}}
}void Conversion(bit c,uchar year,uchar month,uchar day)
{ //c=0 为21世纪,c=1 为20世纪 输入输出数据均为BCD数据uchar temp1,temp2,temp3,month_p;uint temp4,table_addr;bit flag2,flag_y;temp1=year/16;   //BCD->hex 先把数据转换为十六进制temp2=year;year=temp1*10+temp2;temp1=month/16;temp2=month;month=temp1*10+temp2;temp1=day/16;temp2=day;day=temp1*10+temp2;//定位数据表地址if(c==0){                   table_addr=(year+0x64-1)*0x3;/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;year_moon=temp1|temp2;temp1=month/10;temp1=_crol_(temp1,4);temp2=month;month_moon=temp1|temp2;temp1=day/10;temp1=_crol_(temp1,4);temp2=day;day_moon=temp1|temp2;
}code uchar table_week[12]={0,3,3,6,1,4,6,2,5,0,3,5}; //月修正数据表
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;year=temp1*10+temp2;temp1=month/16;temp2=month;month=temp1*10+temp2;temp1=day/16;temp2=day;day=temp1*10+temp2;if (c==0){year+=0x64;}  //如果为21世纪,年份数加100temp1=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;
}//test
uchar c_sun,year_sun,month_sun,day_sun;
void main()
{c_sun=0;year_sun=0x15;month_sun=0x8;day_sun=0x7;// Conver_week(c_sun,year_sun,month_sun,day_sun);Conversion(c_sun,year_sun,month_sun,day_sun);while(1);
}

----------------------------------------------------------------------------------------------------------

http://www.xdnf.cn/news/10998.html

相关文章：

  • SecureCRT for Mac：安全、可靠的终端仿真软件，让数据传输更放心
  • CGI详解（原理，配置及访问）
  • 目前国内氛围比较好的黑客论坛社区有哪些？
  • (爱加密系列教程十九)Android手机一键Root原理分析
  • ITIL流程是什么？理解和应用IT服务管理最重要的框架
  • 【NX】NX二次开发BlockUI集列表的详细使用步骤
  • 联发科MT8377 MT8389 MT6589 MT6577等芯片详细解析
  • 推荐一些电驴网站，坚决扁死VERYCD论坛
  • 《是男人就下100层》真的有隐藏剧情！B站up主数月破解，原作者点赞致谢
  • Matlab2012b安装步骤(附带Matlab2012b破解码及序列号)
  • 360度解读山内溥：百年任天堂的传奇“基因”(转)
  • 常用的黑盒测试方法
  • html css网页制作成品——保护环境网页设计模板 简单学生网页设计
  • javascript深入浅出
  • 计算机机考面试经验
  • 校招笔试题
  • 详解Supervisor进程守护监控
  • 鸿洋，郭霖Android开发大牛：从入门到精通系列学习路线以及进阶Android高级工程师书籍介绍
  • 什么是Ajax?Ajax如何发送请求（详）
  • win7查找计算机在哪里,win7搜索在哪
  • Debug技巧汇总
  • 防御DDoS攻击的五种ddos security安全解决方案
  • 【Mysql】实现中位数计算
  • 【教程§discuz!X2.5去除“powered by discuz!”方法小记§】
  • packetshaper产品学习
  • B2C大点名：国内B2C网站收集（更新至2009年6月2日）
  • AI 电商智能导购助手的新型产品交互形态设计和技术方案
  • C语言求最大公约数的三种方法
  • 下载和攻略之青空下的约定 この青空に約束を
  • 毕业论文格式如何快速修改