STC89C52单片机,用C语言编程温度报警器。
万年历只是一个计时器。添加一个液晶显示屏用于显示。
应该都是在线的。你可以搜索一下。
我为你搜索了一个万年历程序。
一、阳历算法
具体算法见函数void get_solar_day_date(void),从而确定阳历的周排列方式。
表1:
变量定义:
公共:
无符号int temp _ total _ day
无符号字符gc _ solar _ calendar _ year
无符号字符gc _ solar _ calendar _ month
无符号字符gc _ solar _ calendar _ date
无符号字符gc _ lunar _ calendar _ year
无符号字符gc _ lunar _ calendar _ month
无符号字符gc _ lunar _ calendar _ date
无符号字符start _ day _ of _ week
描述:函数get_solar_day_date(void)的输入变量是gc_solar_calendar_year和gc_solar_calendar_month。
输出变量:start_day_of_week和temp_total_day
Void get_solar_day_date(无效)
{
无符号字符temp 01;
/* -计算当前年月日是星期几。Mon ~孙?- */
/*条件初始化执行两次,以减少运算数据量。temp_total_day是一个整型变量*/
start _ day _ of _ week = 2;temp _ total _ day = 0;计算_温度= 1;
if(GC _ solar _ calendar _ year & gt;99)
{ start _ day _ of _ week = 6;计算_温度= 100;}
for(temp 01 = calculate _ temp;temp 01 & lt;gc _太阳历_年;temp01++)
{ if(temp 01% 4 = = 0){ start _ day _ of _ week+= 2;temp _ total _ day+= 366;}
else { start _ day _ of _ week+= 1;temp _ total _ day+= 365;}}
for(temp 01 = 1;temp 01 & lt;gc _太阳历_月;temp01++)
{开关(温度01)
{case 1,3,5,7,8,10,12:start _ day _ of _ week+= 3;temp _ total _ day+= 31;打破;
情况2:如果((GC _ solar _ calendar _ year % 4)= = 0);& amp(gc _太阳历_年!= 200))
{ start _ day _ of _ week+= 1;temp _ total _ day+= 29;}
else { start _ day _ of _ week+= 0;temp _ total _ day+= 28;}破;
案例4,6,9,11:start _ day _ of _ week+= 2;temp _ total _ day+= 30;打破;}}
start _ day _ of _ week % = 7;
/*-算完当天是星期几(Mon~Sun?)和总天数- */
}
二、农历算法
2000年需要200 × 2 = 400字节,农历压缩数据表lunar_calendar_month_table[]如下。
const charlunar _ calendar _ month _ table[]= {//从农历1900到2100。
/*每个月的总天数指针*/
月份123456789 1011112
闰年31 29 31 30 31 30 31 31 30 31
非闰年31 28 31 3031 3031 31 3031。
/*从1901~2100*/
/*(0110)11000001(0110)闰月,11000001
农历月总日:1:29 0:30*/
0x00,0x04,0xad,0x08,0x5a,0x01,0xd5,0x54,0xb4,0x09,0x64,0x05,0x59,0x45,
0x95,0,0xa6,0x04,0x55,0x24,0xad,0x08,0x5a,0x62,0xda,0x04,0xb4,0x05,
0xb4,0x55,0x52,0x0d,0x94,0,0x4a,0x2a,0x56,0x02,0x6d,0x71,0x6d,0x01,
0xda,0x02,0xd2,0x52,0xa9,0x05,0x49,0x0d,0x2a,0x45,0x2b,0x09,0x56,0x01,
0xb5,0x20,0x6d,0x01,0x59,0x69,0xd4,0,0xa8,0x05,0xa9,0x56,0xa5,0x04,
0x2b,0x09,0x9e,0x38,0xb6,0x08,0xec,0x74,0x6c,0x05,0xd4,0,0xe4,0x6a,
0x52,0x05,0x95,0,0x5a,0x42,0x5b,0x04,0xb6,0x04,0xb4,0x22,0x6a,0x05,
0x52,0x75,0xc9,0,0x52,0x05,0x35,0x55,0x4d,0,0x5a,0x02,0x5d,0x31,
0xb5,0x02,0x6a,0x8a,0x68,0x05,0xa9,0,0x8a,0x6a,0x2a,0x05,0x2d,0x09,
0xaa,0x48,0x5a,0x01,0xb5,0x09,0xb0,0x39,0x64,0x05,0x25,0x75,0x95,0,
0x96,0x04,0x4d,0x54,0xad,0x04,0xda,0x04,0xd4,0x44,0xb4,0x05,0x54,0x85,
0x52,0x0d,0x92,0,0x56,0x6a,0x56,0x02,0x6d,0x02,0x6a,0x41,0xda,0x02,
0xb2,0xa1,0xa9,0x05,0x49,0x0d,0,0x6d,0x2a,0x09,0x56,0x01,0xad,0x50,
0x6d,0x01,0xd9,0x02,0xd1,0x3a,0xa8,0x05,0x29,0x85,0xa5,0x0c,0x2a,0x09,
0x96,0x54,0xb6,0x08,0x6c,0x09,0x64,0x45,0xd4,0,0xa4,0x05,0x51,0x25,
0x95,0,0x2a,0x72,0x5b,0x04,0xb6,0x04,0xac,0x52,0x6a,0x05,0xd2,0,
0xa2,0x4a,0x4a,0x05,0x55,0x94,0x2d,0,0x5a,0x02,0x75,0x61,0xb5,0x02,
0x6a,0x03,0x61,0x45,0xa9,0,0x4a,0x05,0x25,0x25,0x2d,0x09,0x9a,0x68,
0xda,0x08,0xb4,0x09,0xa8,0x59,0x54,0x03,0xa5,0,0x91,0x3a,0x96,0x04,
0xad,0xb0,0xad,0x04,0xda,0x04,0xf4,0x62,0xb4,0x05,0x54,0x0b,0x44,0x5d,
0x52,0,0x95,0x04,0x55,0x22,0x6d,0x02,0x5a,0x71,0xda,0x02,0xaa,0x05,
0xb2,0x55,0x49,0x0b,0x4a,0,0x2d,0x39,0x36,0x01,0x6d,0x80,0x6d,0x01,
0xd9,0x02,0xe9,0x6a,0xa8,0x05,0x29,0x0b,0x9a,0x4c,0xaa,0x08,0xb6,0x08,
0xb4,0x38,0x6c,0x09,0x54,0x75,0xd4,0,0xa4,0x05,0x45,0x55,0x95,0,
0x9a,0x04,0x55,0x44,0xb5,0x04,0x6a,0x82,0x6a,0x05,0xd2,0,0x92,0x6a,
0x4a,0x05,0x55,0,0x2a,0x4a,0x5a,0x02,0xb5,0x02,0xb2,0x31,0x69,0x03,
0x31,0x73,0xa9,0,0x4a,0x05,0x2d,0x55,0x2d,0x09,0x5a,0x01,0xd5,0x48,
0xb4,0x09,0x68,0x89,0x54,0x0b,0xa4,0,0xa5,0x6a,0x95,0x04,0xad,0x08,
0x6a,0x44,0xda,0x04,0x74,0x05,0xb0,0x25,0x54,0x03,};
一种确定阳历日和阴历日对应关系的算法:
对于阳历日和阴历日之间的任何其他对应关系,可以通过以下算法得到结果。具体算法是通过例如get_lunar_day(void)来实现的:
描述:函数get_lunar_day(void)的输入变量是gc_solar_calendar_year和gc_solar_calendar。
输出变量:gc_lunar_calendar_year,gc_lunar_calendar_month和gc_lunar_calendar_date。
Void get_lunar_day(void)/*计算输入的阳历年和阳历月,对应阴历时间阳历月的第一天年、月、日*/
{无符号char temp _ leap _ month
无符号字符temp _ flag
无符号字符calculate _ temp
无符号字符mc _ tpumenus _ temp _ loop
无符号字符MC _ TPU menus _ temp _ 01;
temp _闰月= 0;temp _ flag = 1;
//条件初始化两次,减少运算数据量。
if(GC _ solar _ calendar _ year & gt;99)
{ gc _ lunar _ calendar _ year = 99gc _农历_日历_月份= 11;
gc _ lunar _ calendar _ date = 25temp _ total _ day+= 25;计算_温度= 100;}
其他
{ GC _ lunar _ calendar _ year = 0;gc _农历_日历_月份= 11;
gc _农历_日历_日期= 11;temp _ total _ day+= 11;计算_温度= 1;}
if(GC _ solar _ calendar _ year & gt;calculate _ temp | | GC _ solar _ calendar _ month & gt;1)
{ for(MC _ TPU menus _ temp _ loop = 1;mc _ tpumenus _ temp _ loop & gt0;){
temp _ total _ day-= calendar _ calculate _ lunar _ month _ total _ day();
temp _ leap _ month = TPU menus _ lunar _ calendar _ month _ table[2 * GC _ lunar _ calendar _ year+
temp _闰月=(temp _ leap _ month & gt;& gt4)& amp;0x0F
if(GC _ lunar _ calendar _ month = = temp _ leap _ month)
{switch(gc_lunar_calendar_year)
{案例6,14,19,25,33,36,38,41,44,52,55,79,117,
136,147,150,155,158,185,193:
if(temp _ total _ day & lt;31){ GC _ lunar _ calendar _ date = temp _ total _ day;
MC _ TPU menus _ temp _ loop = 0;temp _ flag = 0;}
else temp _ total _ day-= 30;
打破;//当前月份:temp_leap_month
默认值:
if(temp _ total _ day & lt;30)
{ GC _ lunar _ calendar _ date = temp _ total _ day;MC _ TPU menus _ temp _ loop = 0;
temp _ flag = 0;/*当前月份:temp_leap_month*/ }
else temp _ total _ day-= 29;打破;}}
if(temp _ flag){ GC _ lunar _ calendar _ month++;
if(GC _ lunar _ calendar _ month = = 13){ GC _ lunar _ calendar _ month = 1;
gc _农历_日历_ 年份++;}
if(temp _ total _ day & lt;61)//if temp _ total _ day & gt;60、忽略比较
{ MC _ TPU menus _ temp _ 01 = calendar _ calculate _ lunar _ month _ total _ day();
if(temp _ total _ day & lt;(MC _ tpumenus _ temp _ 01+1))
{ MC _ TPU menus _ temp _ loop = 0;GC _ lunar _ calendar _ date = temp _ total _ day;
} }
} } }
gc _ lunar _闰月=(temp _ flag & lt;& lt4)| temp _闰月;/*设置闰月标志*/
说明:函数Calendar _ Calculate _ Lunar _ Month _ Total _ Day(void)根据输入变量gc_lunar_calen和gc_lunar_calendar_month,结合压缩数据表lunar_calendar_month_table,计算出对应的农历天数。
无符号字符calendar _ calculate _ lunar _ month _ total _ day(空)
{
无符号字符MC _ TPU menus _ temp _ 01;
无符号字符mc _ tpumenus _ temp _ 02
if(GC _ lunar _ calendar _ month & lt;9)
{ MC _ tpumenus _ temp _ 01 = lunar _ calendar _ month _ table[2 * GC _ lunar _ calendar _ year];
MC _ tpumenus _ temp _ 02 = GC _ lunar _ calendar _ month-1;}
否则{
MC _ tpumenus _ temp _ 01 = lunar _ calendar _ month _ table[2 * GC _ lunar _ calendar _ year+1];
MC _ TPU menus _ temp _ 02 = GC _ lunar _ calendar _ month-9;}
if((MC _ TPU menus _ temp _ 01 & gt;& gtMC _ TPU menus _ temp _ 02)& amp;0x01)返回(29);
否则返回(30);}
阳历日与农历节气的对应
压缩节气数据表:
根据规律可以得到四个数据表(每个节气月有两个节气,每个节气需要两个数据表):
const unsigned char calendar _ solar _ term _ table _ 01[12][33]= {
{7,6,6,6,6,6,6,6,5,6,6,6,5,5,6,6,5,5,5,5,5,5,5,5,4,5,5},//month 1
{5,4,5,5,5,4,4,5,5,4,4,4,4,4,4,4,4,3,4,4,4,3,3,4,4,3,3,3}, //2
{6,6,6,7,6,6,6,6,5,6,6,6,5,5,6,6,5,5,5,6,5,5,5,5,4,5,5,5,5}, //3
{5,5,6,6,5,5,5,6,5,5,5,5,4,5,5,5,4,4,5,5,4,4,4,5,4,4,4,4,5}, //4
{6,6,6,7,6,6,6,6,5,6,6,6,5,5,6,6,5,5,5,6,5,5,5,5,4,5,5,5,5}, //5
{6,6,7,7,6,6,6,7,6,6,6,6,5,6,6,6,5,5,6,6,5,5,5,6,5,5,5,5,4,5,5,5,5}, //6
{7,8,8,8,7,7,8,8,7,7,7,8,7,7,7,7,6,7,7,7,6,6,7,7,6,6,6,7,7}, //7
{8,8,8,9,8,8,8,8,7,8,8,8,7,7,8,8,7,7,7,8,7,7,7,7,6,7,7,7,6,6,7,7,7}, //8
{8,8,8,9,8,8,8,8,7,8,8,8,7,7,8,8,7,7,7,8,7,7,7,7,6,7,7,7,7}, //9
{9,9,9,9,8,9,9,9,8,8,9,9,8,8,8,9,8,8,8,8,7,8,8,8,7,7,8,8,8}, //10
{8,8,8,8,7,8,8,8,7,7,8,8,7,7,7,8,7,7,7,7,6,7,7,7,6,6,7,7,7}, //11
{7,8,8,8,7,7,8,8,7,7,7,8,7,7,7,7,6,7,7,7,6,6,7,7,6,6,6,7,7}, //12
};//这个数据表显示了每个月第一个节气的规律。
const unsigned char calendar _ solar _ term _ year _ 01[12][9]= {
{13,49,85,17,149,185,201,250,250},//月1
{13,45,81,117,149,185,201,250,250}, //2
{13,48,84,112,148,184,200,201,250}, //3
{13,45,76,108,140,172,200,201,250}, //4
{13,44,72,104,132,168,200,201,250}, //5
{5 ,33,68,96 ,124,152,188,200,201}, //6
{29,57,85,120,148,176,200,201,250}, //7
{13,48,76,104,132,168,196,200,201}, //8
{25,60,88,120,148,184,200,201,250}, //9
{16,44,76,108,144,172,200,201,250}, //10
{28,60,92,124,160,192,200,201,250}, //11
{17,53,85,124,156,188,200,201,250}, //12
};//这个数据表显示了每个月第一个节气的发生规律对应的阳历年份范围。
const unsigned char calendar _ solar _ term _ table _ 02[12][29]= {
{21,21,21,21,21,20,21,21,21,20,20,21,21,20,20,20,20,20,20,20,20,19,20,20,20,19,19
{20,19,19,20,20,19,19,19,19,19,19,19,19,18,19,19,19,18, 18,19,19,18,18,18,18,18,18
{21,21,21,22,21,21,21,21,20,21,21,21,20,20,21,21,20,20,20,21,20,20,20,20,19,20,20
{20,21,21,21,20,20,21,21,20,20,20,21,20,20,20,20,19,20,20,20,19,19,20,20,19,19,19
{21,22,22,22,21,21,22,22,21,21,21,22,21,21,21,21,20,21,21,21,20,20,21,21,20,20,20
{22,22,22,22,21,22,22,22,21,21,22,22,21,21,21,22,21,21,21,21,20,21,21,21,20,20,21
{23,23,24,24,23,23,23,24,23,23,23,23,22,23,23,23,22,22,23,23,22,22,22,23,22,22,22
{23,24,24,24,23,23,24,24,23,23,23,24,23,23,23,23,22,23,23,23,22,22,23,23,22,22,22
{23,24,24,24,23,23,24,24,23,23,23,24,23,23,23,23,22,23,23,23,22,22,23,23,22,22,22
{24,24,24,24,23,24,24,24,23,23,24,24,23,23,23,24,23,23,23,23,22,23,23,23,22,22,23
{23,23,23,23,22,23,23,23,22,22,23,23,22,22,22,23,22,22,22,22,21,22,22,22,21,21,22
{22,22,23,23,22,22,22,23,22,22,22,22,21,22,22,22,21,21,22,22,21,21,21,22,21,21,21
};//这个数据表显示了每个月第二个节气的规律。
const unsigned char calendar _ solar _ term _ year _ 02[12][8]= {
{13,45,81,113,149,185,201},{21,57,93,125,161,193,201},{21,56,88,120,152,188,200,20
{21,49,81,116,144,176,200,201},{17,49,77,112,140,168,200,201},
{28,60,88,116,148,180,200,201},{25,53,84,112,144,172,200,201},
{29,57,89,120,148,180,200,201},{17,45,73,108,140,168,200,201},
{28,60,92,124,160,192,200,201},{16,44,80,112,148,180,200,201},
{17,53,88,120,156,188,200,201},};
//这个数据表显示了每个月第二个节气的发生规律对应的阳历年份范围。
每个太阳月对应的两个节气的日期,可以根据条件定律算法,通过下面两个函数来实现。
无符号char calendar _ calculate _ solar _ term _ 1(void)
{
zpage无符号char done _ index
zpage无符号char solar _ term
done _ index = 0;
while(GC _ solar _ calendar _ year & gt;= calendar _ solar _ term _ year _ 01[GC _ solar _ calendar _ mon
[done _ index]){ done _ index++;}
solar _ term = calendar _ solar _ term _ table _ 01[GC _ solar _ calendar _ month-1][4 * done _ ind
GC _ sun _ calendar _ year % 4];
if((GC _ solar _ calendar _ year = = 121)& amp;& amp(gc_solar_calendar_month == 4))太阳能术语= 5
if((GC _ solar _ calendar _ year = = 132)& amp;& amp(gc_solar_calendar_month == 4))太阳能术语= 5
if((GC _ solar _ calendar _ year = = 194)& amp;& amp(gc_solar_calendar_month == 6))节气= 6
return(节气);
}//计算阳历月份对应的第一个节气。
无符号字符calendar _ calculate _ solar _ term _ 2(void)
{
zpage无符号char done _ index
zpage无符号char solar _ term
done _ index = 0;
while(GC _ solar _ calendar _ year & gt;= calendar _ solar _ term _ year _ 02[GC _ solar _ calendar _ mon
[done _ index]){ done _ index++;}
solar _ term = calendar _ solar _ term _ table _ 02[GC _ solar _ calendar _ month-1][4 * done _ ind
GC _ sun _ calendar _ year % 4];
if((GC _ solar _ calendar _ year = = 171)& amp;& amp(gc_solar_calendar_month == 3))太阳能术语= 2
if((GC _ solar _ calendar _ year = = 181)& amp;& amp(gc_solar_calendar_month == 5))太阳能术语= 2
return(节气);
}//计算阳历月份对应的第二个节气。
以上是万年历的完整算法。它首先计算出对应阳历月份的第一天对应的星期几,然后根据数据确定对应的阴历日期;农历中的节气是通过条件律算法实现的。