单片机万年历带阴历

程序说明：1:公农历自动转换，星期根据公历日期自动换算。2:没有采用时间IC(如DS1302等)，而是直接用单片机内的定时器。3:可显示简单的国家法定节假日，如到了农历8月15，“单片机学徒”五个字会变成“中秋节”。4:在农历日期中采用初，廿等符合农历的用字。5:公历日期和时间可调，农历与星期是根据公历日期自动换算所得，所以不必调整。6:程序最终显示如下图所示。实际在本人办公桌上使用中。7:在实际制作中如有疑问，欢迎大家交流.单片机学徒于2011年3月。#includereg52.h#includeintrins.h#defineucharunsignedchar#defineuintunsignedint#defineportP0#defineTT49962ucharmonth,day,week,one,two,thr,fou,fiv,key_v,key_t,flagt;ucharyear,yyear,ymonth,yday,key;charhour,min,sec;bitflagjr=0;bitflagturn;bitflagnl=0;sbite=P2^3;sbitrw=P2^4;sbitrs=P2^5;sbitcs1=P2^6;sbitcs2=P2^7;sbitadd=P3^3;sbitok=P3^4;sbitset=P3^5;sbitdec=P3^6;sbitarmn=P3^1;sbitarmh=P3^7;voidrefweek();voidkey_t0(key_v);voiddisplayday();voidlcd_datey(uintx,uchary,ucharz);ucharmonthcode[]={0,31,0,31,30,31,30,31,31,30,31,30,31};ucharcodeday_code1[9]={0x0,0x1f,0x3b,0x5a,0x78,0x97,0xb5,0xd4,0xf3};uintcodeday_code2[3]={0x111,0x130,0x14e};ucharcodeyear_code[]={0x4d,0x4A,0xB8,//20010x0d,0x4A,0x4C,//20020x0d,0xA5,0x41,//20030x25,0xAA,0xB6,//20040x05,0x6A,0x49,//20050x7A,0xAd,0xBd,//20060x02,0x5d,0x52,//20070x09,0x2d,0x47,//20080x5C,0x95,0xBA,//20090x0A,0x95,0x4e,//20100x0B,0x4A,0x43,//20110x4B,0x55,0x37,//20120x0A,0xd5,0x4A,//20130x95,0x5A,0xBf,//20140x04,0xBA,0x53,//20150x0A,0x5B,0x48,//20160x65,0x2B,0xBC,//20170x05,0x2B,0x50,//20180x0A,0x93,0x45,//20190x47,0x4A,0xB9,//20200x06,0xAA,0x4C,//20210x0A,0xd5,0x41,//20220x24,0xdA,0xB6,//20230x04,0xB6,0x4A,//20240x69,0x57,0x3d,//20250x0A,0x4e,0x51,//20260x0d,0x26,0x46,//20270x5e,0x93,0x3A,//20280x0d,0x53,0x4d,//20290x05,0xAA,0x43,//20300x36,0xB5,0x37,//20310x09,0x6d,0x4B,//20320xB4,0xAe,0xBf,//20330x04,0xAd,0x53,//20340x0A,0x4d,0x48,//20350x6d,0x25,0xBC,//20360x0d,0x25,0x4f,//20370x0d,0x52,0x44,//20380x5d,0xAA,0x38,//20390x0B,0x5A,0x4C,//20400x05,0x6d,0x41,//20410x24,0xAd,0xB6,//20420x04,0x9B,0x4A,//20430x7A,0x4B,0xBe,//20440x0A,0x4B,0x51,//20450x0A,0xA5,0x46,//20460x5B,0x52,0xBA,//20470x06,0xd2,0x4e,//20480x0A,0xdA,0x42,//20490x35,0x5B,0x37,//20500x09,0x37,0x4B,//20510x84,0x97,0xC1,//20520x04,0x97,0x53,//20530x06,0x4B,0x48,//20540x66,0xA5,0x3C,//20550x0e,0xA5,0x4f,//20560x06,0xB2,0x44,//20570x4A,0xB6,0x38,//20580x0A,0xAe,0x4C,//20590x09,0x2e,0x42,//20600x3C,0x97,0x35,//20610x0C,0x96,0x49,//20620x7d,0x4A,0xBd,//20630x0d,0x4A,0x51,//20640x0d,0xA5,0x45,//20650x55,0xAA,0xBA,//20660x05,0x6A,0x4e,//20670x0A,0x6d,0x43,//20680x45,0x2e,0xB7,//20690x05,0x2d,0x4B,//20700x8A,0x95,0xBf,//20710x0A,0x95,0x53,//20720x0B,0x4A,0x47,//20730x6B,0x55,0x3B,//20740x0A,0xd5,0x4f,//20750x05,0x5A,0x45,//20760x4A,0x5d,0x38,//20770x0A,0x5B,0x4C,//20780x05,0x2B,0x42,//20790x3A,0x93,0xB6,//20800x06,0x93,0x49,//20810x77,0x29,0xBd,//20820x06,0xAA,0x51,//20830x0A,0xd5,0x46,//20840x54,0xdA,0xBA,//20850x04,0xB6,0x4e,//20860x0A,0x57,0x43,//20870x45,0x27,0x38,//20880x0d,0x26,0x4A,//20890x8e,0x93,0x3e,//20900x0d,0x52,0x52,//20910x0d,0xAA,0x47,//20920x66,0xB5,0x3B,//20930x05,0x6d,0x4f,//20940x04,0xAe,0x45,//20950x4A,0x4e,0xB9,//20960x0A,0x4d,0x4C,//20970x0d,0x15,0x41,//20980x2d,0x92,0xB5,//2099};ucharcodeshuzi[][16]={{0xFF,0x0F,0x07,0xF3,0xFB,0xFB,0xF3,0x07,0xFF,0xF0,0xE0,0xCF,0xDF,0xDF,0xCF,0xE0},{0xFF,0xFF,0xF7,0xF7,0x03,0x03,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xC0,0xC0,0xFF,0xFF},{0xFF,0xCF,0xC7,0xF3,0xFB,0xFB,0x73,0x07,0xFF,0xCF,0xC7,0xD3,0xD9,0xDC,0xDE,0xDF},{0xFF,0xEF,0xE7,0x73,0x7B,0x7B,0x33,0x87,0xFF,0xF7,0xE7,0xCF,0xDF,0xDF,0xCE,0xE0},{0xFF,0xFF,0x7F,0x1F,0x87,0xE3,0x03,0x03,0xFF,0xF9,0xF8,0xFA,0xFB,0xFB,0xC0,0xC0},{0xFF,0x03,0x03,0x3B,0xBB,0xBB,0x3B,0x7B,0xFF,0xF6,0xE6,0xCF,0xDF,0xDF,0xCF,0xE0},{0xFF,0x0F,0x07,0x33,0xBB,0xBB,0x33,0x67,0xFF,0xF0,0xE0,0xCF,0xDF,0xDF,0xCF,0xE0},{0xFF,0xFB,0xFB,0xFB,0x7B,0x1B,0x8B,0xE3,0xFF,0xFF,0xFF,0xC3,0xC0,0xFC,0xFF,0xFF},{0xFF,0xCF,0x87,0x33,0x7B,0x7B,0x33,0x87,0xFF,0xF1,0xE0,0xCE,0xDF,0xDF,0xCE,0xE0},{0xFF,0x0F,0x07,0xF3,0xFB,0xFB,0xF3,0x07,0xFF,0xF7,0xE6,0xCC,0xDD,0xDD,0xCC,0xE0}};ucharcodeshisu[][16]={{0xFF,0x3F,0x0F,0x87,0xE7,0xF7,0x07,0x0F,0xFF,0xF8,0xF0,0xF7,0xF3,0xF0,0xF8,0xFE},{0xFF,0xFF,0xDF,0x5F,0x0F,0x07,0xE7,0xFF,0xFF,0xFF,0xF3,0xF0,0xF8,0xFF,0xFF,0xFF},{0xFF,0xFF,0xFF,0xCF,0x47,0x77,0x37,0x87,0xFF,0xF5,0xF1,0xF8,0xF2,0xF3,0xF3,0xF3},{0xFF,0xFF,0xEF,0xCF,0x47,0x77,0x37,0x87,0xFF,0xF9,0xF1,0xF7,0xF7,0xF7,0xF0,0xF8},{0xFF,0xFF,0xFF,0x7F,0x3F,0x9F,0x0F,0x07,0xFF,0xFD,0xFC,0xFC,0xF5,0xF0,0xF0,0xFC},{0xFF,0xBF,0x8F,0x87,0xA7,0x27,0x67,0xF7,0xF9,0xF1,0xF7,0xF7,0xF3,0xF0,0xF8,0xFF},{0xFF,0x7F,0x1F,0x0F,0xA7,0xB7,0x37,0x47,0xFF,0xF8,0xF0,0xF7,0xF7,0xF3,0xF0,0xF8},{0xFF,0xCF,0xC7,0xE7,0x67,0x27,0x8F,0xC7,0xFF,0xFF,0xF1,0xF0,0xF8,0xFF,0xFF,0xFF},{0xFF,0xFF,0x7F,0x0F,0x07,0x77,0x37,0x87,0xFF,0xF0,0xF0,0xF6,0xF7,0xF7,0xF0,0xF0},{0xFF,0xFF,0x8F,0x07,0x77,0x77,0x07,0x0F,0xFF,0xF3,0xF3,0xF7,0xF7,0xF1,0xF8,0xFE},};ucharcodegonli[][16]={{0xFF,0x0F,0xF7,0xFB,0xFB,0xFB,0xF7,0x0F,0xFF,0xF0,0xEF,0xDF,0xDF,0xDF,0xEF,0xF0},{0xFF,0xFF,0xF7,0xF7,0x03,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xC0,0xFF,0xFF,0xFF},{0xFF,0xCF,0xF7,0xFB,0xFB,0xFB,0x77,0x8F,0xFF,0xCF,0xD7,0xDB,0xDD,0xDE,0xDF,0xDF},{0xFF,0xEF,0xF7,0x7B,0x7B,0x7B,0xB7,0xCF,0xFF,0xF7,0xEF,0xDF,0xDF,0xDF,0