?? 多功能電子時鐘 c程序.c
字號:
0x0A,0x4d,0x4C, //2097
0x0d,0x15,0x41, //2098
0x2d,0x92,0xB5, //2099
};
///月份數據表
code uchar date_code1[9]={0x0,0x1f,0x3b,0x5a,0x78,0x97,0xb5,0xd4,0xf3};
code uint date_code2[3]={0x111,0x130,0x14e};
bit c_moon;
data uchar year_moon,month_moon,date_moon,week;
bit get_moon_date(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 date) //
{
uchar temp1,temp2,temp3,month_p;
uint temp4,table_addr;
bit flag2,flag_y;
temp1=year/16; //BCD->hex 先把數據轉換為十六進制
temp2=year%16;
year=temp1*10+temp2;
temp1=month/16;
temp2=month%16;
month=temp1*10+temp2;
temp1=date/16;
temp2=date%16;
date=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;
if(temp1==0x1){
temp3=temp2-1;
}
else{
temp3=temp2+0x1f-1;
}
if (month<10){
temp4=date_code1[month-1]+date-1;
}
else{
temp4=date_code2[month-10]+date-1;
}
if ((month>0x2)&&(year%0x4==0)){ //如果公歷月大于2月并且該年的2月為閏月,天數加1
temp4+=1;
}
if (temp4>=temp3){ //公歷日在春節后或就是春節當日使用下面代碼進行運算
temp4-=temp3;
month=0x1;
month_p=0x1; //month_p為月份指向,公歷日在春節前或就是春節當日month_p指向首月
flag2=get_moon_date(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_date(month_p,table_addr);
if(flag2==0)temp1=0x1d;
else temp1=0x1e;
}
date=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_date(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_date(month_p,table_addr);
if(flag2==0)temp1=0x1d;
else temp1=0x1e;
}
date=temp1-temp3+1;
}
c_moon=c; //HEX->BCD ,運算結束后,把數據轉換為BCD數據
temp1=year/10;
temp1=_crol_(temp1,4);
temp2=year%10;
year_moon=temp1|temp2;
temp1=month/10;
temp1=_crol_(temp1,4);
temp2=month%10;
month_moon=temp1|temp2;
temp1=date/10;
temp1=_crol_(temp1,4);
temp2=date%10;
date_moon=temp1|temp2;
}
void nl() //
{
unsigned char yy1,yy2;
if(cen==0x19) {cen_m=1;}
if(cen==0x20) {cen_m=0;}
Conversion(cen_m,year,month,date);
lcm_w_test(0,0x85);
lcm_w_test(1,month_moon/16+'0');
lcm_w_test(1,month_moon%16+'0');
lcm_w_test(1,'-');
lcm_w_test(1,date_moon/16+'0');
lcm_w_test(1,date_moon%16+'0');
yy1=(year_moon/16)*10+year_moon%16;
yy2=yy1%12;
switch(yy2)
{
case 0: lcm_w_test(0,0x83);lcm_w_word("龍");
break;
case 1: lcm_w_test(0,0x83);lcm_w_word("蛇");
break;
case 2: lcm_w_test(0,0x83);lcm_w_word("馬");
break;
case 3: lcm_w_test(0,0x83);lcm_w_word("羊");
break;
case 4: lcm_w_test(0,0x83);lcm_w_word("猴");
break;
case 5: lcm_w_test(0,0x83);lcm_w_word("雞");
break;
case 6: lcm_w_test(0,0x83);lcm_w_word("狗");
break;
case 7: lcm_w_test(0,0x83);lcm_w_word("豬");
break;
case 8: lcm_w_test(0,0x83);lcm_w_word("鼠");
break;
case 9: lcm_w_test(0,0x83);lcm_w_word("牛");
break;
case 10: lcm_w_test(0,0x83);lcm_w_word("虎");
break;
case 11: lcm_w_test(0,0x83);lcm_w_word("兔");
break;
}
}
/*主程序---------------------------------------------------------------------*/
main()
{
uchar e=0,r=0,t=0;
K1=1;K2=1;K3=1;K4=1; //
rt=0;
rr=0;
InitialSound(); //初始音樂
beep=1;
LCM_BLA=1; //背光燈開
bt=1;
ds_int(); //初始化DS12CR887
lcm_init(); //初始化液晶顯示器
lcm_clr(); //清屏
welcome(); //顯示歡迎信息
DelayM(3000); //顯示停留3秒
lcm_clr();
welcome2();
Play(Music_happy,0,3,300); //
beep=1; //
DelayM(421);
lcm_clr(); //
Disp_Img(GN); //調入一幅圖畫
DelayM(4210);
lcm_clr(); //清屏
while(1) //
{
if (w == 0 && r ==0 ) //正常走時
{
lcm_w_year(); //顯示年
lcm_w_month(); //顯示月
lcm_w_date(); //顯示日
lcm_w_day(); //顯示星期
lcm_w_hour(); //顯示時
lcm_w_min(); //顯示分
lcm_w_sec(); //顯示秒
days(); //
BLA_delay(); //
ring(); //
if(hour==0x6 && min==0x30 && sec==0x0) {lcm_clr();Disp_Img(GM);DelayM(4210);lcm_clr();} //
if(hour==0x0 && min==0x0 && sec==0x0) {lcm_clr();Disp_Img(GN);DelayM(4210);lcm_clr();} //
}
else {;}//否則啟動調時或調鈴
if (K1 == 0) // 設置時間
{
DelayM(20); //按鍵消抖
if(K1 == 0 && w == 1 && r ==0) //當是調時狀態 本鍵用于調整下一項
{
e++;
if (e >= 7 )
{
e = 0;
}
Set_time(e);//調整
}
if(K1 == 0 && w == 0 && r ==0) //當是正常狀態時就進入調時狀態
{
lcm_clr();//清屏
w=1; //進入調時
Set_time(e);//調整
}
if(K1 == 0 && w == 0 && r ==1) //當是正常狀態時就進入調時狀態
{
w = 0;//清屏
e = 0;
r = 0;
t = 0;
lcm_clr();
}
while(K1 == 0);//等待鍵松開
}
if (K2 == 0) // 當在調時狀態時就退出調時
{
DelayM(20);//按鍵消抖
if(K2 == 0 && w == 0 && r ==1)
{
t++;
if (t >= 8 )
{
t = 0;
}
Set_ring(t);
}
if(K2 == 0 && w == 0 && r ==0)
{
lcm_clr();//清屏
r=1; //進入調時
Set_ring(t);//調整
}
if(K2 == 0 && w == 1 && r ==0)
{
w = 0; //退出調時
e = 0; //"下一項"計數器清0
r = 0;
t = 0;
lcm_clr();
lcm_w_year(); //顯示年
lcm_w_month(); //顯示月
lcm_w_date(); //顯示日
lcm_w_day(); //顯示星期
lcm_w_hour(); //顯示時
lcm_w_min(); //顯示分
lcm_w_sec(); //顯示秒
BLA_delay();
}
while(K2 == 0);//等待鍵松開
}
if (K3 == 0)//加調整
{
DelayM(20);//按鍵消抖
if(K3 == 0 && w == 1 && r ==0)
{
Set_time(e);//調整
}
if(K3 == 0 && w == 0 && r ==1)
{
Set_ring(t);//調整
}
while(K3 == 0);//等待鍵松開
}
if (K4 == 0) //減調整
{
DelayM(20);//按鍵消抖
if(K4 == 0 && w == 1 && r ==0)
{
Set_time(e);//調整
}
if(K4 == 0 && w == 0 && r ==1)
{
Set_ring(t);//調整
}
while(K4 == 0);//等待鍵松開
}
}
}
//調試
//走時，設時，溫度，背光，光燈自動熄滅,鬧鈴設置,鬧鈴,生日提醒
//還差農歷，生日歌
//全部完成
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -