51单片机+1602液晶万年历程序(带按键)(3)

0x0d,0xAA,0x47, //2092

0x66,0xB5,0x3B, //2093

0x05,0x6d,0x4f, //2094

0x04,0xAe,0x45, //2095

0x4A,0x4e,0xB9, //2096

0x0A,0x4d,0x4C, //2097

0x0d,0x15,0x41, //2098

0x2d,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 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);}

}

}

=if(month(now())month(c2),year(now())-year(c2),if(day(now())>=day(c2),year(now())-year(c2),year(now())-year(c2)-1)))。 val sqlstr = "select opttime, firstimei, secondimei, thirdimei, applist, year, month, day from base_arrival where year=" + year + " and month=" + month + " and day=" + day。=date(year(a2+45),if(day(a2+45)>25,month(a2+45)+1,month(a2+45)),if(day(a2+45)<=15,15,if(day(a2+45)<=25,25,15)))。

{ //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;

}

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;

}

if (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月为闰月,天数加1

temp4+=1;

}

//计算公历日离当年元旦的天数完成

//判断公历日在春节前还是春节后

if (temp4>=temp3){ //公历日在春节后或就是春节当日使用下面代码进行运算

temp4-=temp3;

month=0x1;

春节俗称“年节”,是中华民族最隆重的传 欢度春节统佳节.自汉武帝太初元年始,以夏年（农历）正月初一为“岁首”（即“年”）,年节的日期由此固定下来,延续至今.年节古称“元旦”.1911年辛亥革命以后,开始采用公历（阳历）计年,遂称公历1月1日为“元旦”,称农历正月初一为“春节”. 岁时节日,亦被称为“传统节日”.它们历史。春节俗称“年节”，是中华民族最隆重的传统佳节，汉武帝时期之前，各朝各代春节的日期并不一致，自汉武帝太初元年始，以夏历（农历）正月为岁首，年节的日期由此固定下来，延续至今，1911年辛亥革命以后，开始采用公历计年，遂称公历1月1日为“元旦”，称农历正月初一为“春节”。一般至少要到正月十五(上元节)新年才结束，春节俗称“年节”，是中华民族最隆重的传统佳节，汉武帝时期之前，各朝各代春节的日期并不一致，自汉武帝太初元年始，以夏历(农历)正月为岁首，年节的日期由此固定下来，延续至今，1911年辛亥革命以后，开始采用公历计年，遂称公历1月1日为“元旦”，称农历正月初一为“春节”。

flag2=get_moon_day(month_p,table_addr); //检查该农历月为大小还是小月,大月返回1,小月返回0

flag_y=0;

if(flag2==0)temp1=0x1d; //小月29天

else temp1=0x1e; //大小30天

temp2=year_code[table_addr]&0xf0;

temp2=_cror_(temp2,4); //从数据表中取该年的闰月月份,如为0则该年无闰月

while(temp4>=temp1){

temp4-=temp1;

month_p+=1;

if(month==temp2){

flag_y=~flag_y;

if(flag_y==0)month+=1;

}

else month+=1;

flag2=get_moon_day(month_p,table_addr);

if(flag2==0)temp1=0x1d;

else temp1=0x1e;

}

day=temp4+1;

}

else{ //公历日在春节前使用下面代码进行运算

temp3-=temp4;

if (year==0x0){year=0x63;c=1;}

else year-=1;

table_addr-=0x3;

month=0xc;

temp2=year_code[table_addr]&0xf0;

temp2=_cror_(temp2,4);

if (temp2==0)month_p=0xc;

else month_p=0xd; //

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;

}

/*///////////农历转换分界线 */

void festival()//显示节日函数

{

if ( yue == 1 && ri == 1 ){ print(0x80," New Year's Day ");print(0x40,"Happy New Year!!"); }//1月

else if (month_moon== 0x01 && day_moon == 0x01 ){print(0x80,"Happy New Year!!");print(0x40,"Spring Festival!"); }

else if (month_moon== 0x01 && day_moon == 0x15 ){print(0x80," yuan xiao jie: ");print(0x40,"Lantern Festival"); }//元宵节

[root@tx3 ~]# awk '{ if ($2 >= 90 && $2 <= 100) {print $1,"a"} else if ($2 >= 80 && $2 < 90) {print $1,"b"} else if ($2 >= 70 && $2 < 80) {print $1,"c"} else if ($2 >= 60 && $2 < 70) {print $1,"d"} else {print $1,"e"} }' cj。 '.on february 2 world wetlands day (world wetlands day).on march 3.on march 22。said from the name that, in the world called “national day” or “national day” has china, france and so on approximately 40 countries。

else if ( yue == 2 && ri == 14 ){ print(0x80," Today is: ");print(0x40,"Valentine's Day!"); }

else if ( yue == 3 && ri == 8 ){ print(0x80," International ");print(0x40," Women' Day "); }

else if ( yue == 3 && ri == 12 ){ print(0x80," Today is: ");print(0x40,"China Arbor Day "); }

//else if ( yue == 3 && ri == 14 ){ print(0x80," Today is: ");print(0x40," White Day "); }

else if ( yue == 3 && ri == 15 ){ print(0x80," World Consumer ");print(0x40," Right Day "); }

[root@tx3 ~]# awk '{ if ($2 >= 90 && $2 <= 100) {print $1,"a"} else if ($2 >= 80 && $2 < 90) {print $1,"b"} else if ($2 >= 70 && $2 < 80) {print $1,"c"} else if ($2 >= 60 && $2 < 70) {print $1,"d"} else {print $1,"e"} }' cj。 in addition, the tibetans also celebrate some national and international festivals such as international working women's day (march 8th), international labor day (may 1st), chinese youth festival (may 4th),61。s (/, new year " (weather).aaaaaaaaaaaaaaaaaaaaathe international women', valentine'.on march 14th international police day (international policemen '.on march 21, arbor day)。

else if ( yue == 3 && ri == 21 ){ print(0x80," Today is: ");print(0x40,"World Forest Day"); }

[root@tx3 ~]# awk '{ if ($2 >= 90 && $2 <= 100) {print $1,"a"} else if ($2 >= 80 && $2 < 90) {print $1,"b"} else if ($2 >= 70 && $2 < 80) {print $1,"c"} else if ($2 >= 60 && $2 < 70) {print $1,"d"} else {print $1,"e"} }' cj。 '.on february 2 world wetlands day (world wetlands day).on march 3.on march 22。“it‘s a sunny day today. sunny day， sunny day. it’s a sunny day today. hot， hot，hot.”。

//if ( yue == 3 && ri == 23 ){ print(0x80,"World Meteorolo-");print(0x40," gical Day "); }

sheng ri 6 yue 24 ri。sheng ri 8 yue 25 ri。６yue-４ri-，nv-wang-lv-ling-zhang-xi-qi-yi-jun-zhan-ling-le-jun-huo-ku-，da-si-le-ying-guo-zai-zhang-xi-de-zui-gao-zhi-hui-guan-deng-luo-pu-，bing-zui-hou-chong-xin-zhan-ling-le-zhang-xi-，７yue-８ri-，ying-jun-tou-jiang-，nv-wang-pa-yi-chong-deng-wang-wei-。

else if ( yue == 4 && ri == 1 ){ print(0x80," Today is: ");print(0x40,"April Fools' Day"); }//4

the other.", ", clear view lid when the air clear. ching ming festival in mid-spring and late spring at the turn, which is 106 days after the winter solstice。 ching ming festival is a festival of ancestor worship。【the customs of the ching ming festival&mdash。

else if ( yue == 4 && ri == 7 ){ print(0x80," Today is: ");print(0x40,"World Health Day"); }

else if ( yue == 4 && ri == 8 ){ print(0x80," Today is: ");print(0x40," Easter Day "); }

else if (month_moon== 0x05 && day_moon == 0x05 ){print(0x80,"the Dragon-Boat ");print(0x40," Festival "); }

６yue-４ri-，nv-wang-lv-ling-zhang-xi-qi-yi-jun-zhan-ling-le-jun-huo-ku-，da-si-le-ying-guo-zai-zhang-xi-de-zui-gao-zhi-hui-guan-deng-luo-pu-，bing-zui-hou-chong-xin-zhan-ling-le-zhang-xi-，７yue-８ri-，ying-jun-tou-jiang-，nv-wang-pa-yi-chong-deng-wang-wei-。sheng ri 8 yue 25 ri。sheng ri 3 yue 15 ri。

６yue-４ri-，nv-wang-lv-ling-zhang-xi-qi-yi-jun-zhan-ling-le-jun-huo-ku-，da-si-le-ying-guo-zai-zhang-xi-de-zui-gao-zhi-hui-guan-deng-luo-pu-，bing-zui-hou-chong-xin-zhan-ling-le-zhang-xi-，７yue-８ri-，ying-jun-tou-jiang-，nv-wang-pa-yi-chong-deng-wang-wei-。[root@tx3 ~]# awk '{ if ($2 >= 90 && $2 <= 100) {print $1,"a"} else if ($2 >= 80 && $2 < 90) {print $1,"b"} else if ($2 >= 70 && $2 < 80) {print $1,"c"} else if ($2 >= 60 && $2 < 70) {print $1,"d"} else {print $1,"e"} }' cj。fa shou ri qi 2004 nian 8 yue 12 ri。

６yue-４ri-，nv-wang-lv-ling-zhang-xi-qi-yi-jun-zhan-ling-le-jun-huo-ku-，da-si-le-ying-guo-zai-zhang-xi-de-zui-gao-zhi-hui-guan-deng-luo-pu-，bing-zui-hou-chong-xin-zhan-ling-le-zhang-xi-，７yue-８ri-，ying-jun-tou-jiang-，nv-wang-pa-yi-chong-deng-wang-wei-。[root@tx3 ~]# awk '{ if ($2 >= 90 && $2 <= 100) {print $1,"a"} else if ($2 >= 80 && $2 < 90) {print $1,"b"} else if ($2 >= 70 && $2 < 80) {print $1,"c"} else if ($2 >= 60 && $2 < 70) {print $1,"d"} else {print $1,"e"} }' cj。sheng ri 8 yue 25 ri。

else if ( yue == 5 && ri == 12 ){ print(0x80," International ");print(0x40," Nurse Day "); }

for example, mother's day sends lily, we replace lily into rose. mother's day send lily message to bless happiness/peace. and the rose stands for love, and the mother's plot is logically empty.。the mother‘s day is coming and i would like to say "happy mother‘s day" in this letter. i love you and thank you so much for everything you did for me. this day, i will stay away and can‘t give you my appreciation at home. i know i will watch myself, so don‘t worry about me. i am doing very well on my study. my schoolmates and teachers are all very nice. though i can‘t be at home, i hope you have a wonderful mother‘s day.。anyway ,let mom enjoy the whole day and feel your love, and then the mother’s day can be a good one. as mother’s day is around the corner, it’s time to take actions。

本文来自电脑杂谈，转载请注明本文网址：
http://www.pc-fly.com/a/ruanjian/article-114123-3.html