單片機(jī)萬年歷程序(能自動(dòng)調(diào)整誤差)

1、#include /52單片機(jī)頭文件#include /包含左右循環(huán)移位子函數(shù)的庫#include #include/*宏定義*/#define uchar 無符號(hào)字符#define uint 無符號(hào)整數(shù)/*參數(shù)定義*/char 苗,shi,fen,fge,fshi,sge,sshi,mge,mshi,count,a,b,c,flag,num,keynum,count1;叉年，行奇，月，日；/*定義時(shí)間調(diào)整按鈕*/sbit resget=P36;sbit key_mode=P33;sbit key_up=P34;sbit key_down=P35;/*發(fā)光DS1302的控制*/位 yi=P10

2、;位 er=P11;sbit san=P12;位 si=P13;/*定義數(shù)碼管的驅(qū)動(dòng)位*/位 fg=P20;位 fs=P21;sbit sg=P22;sbit ss=P23;/*數(shù)碼管顯示表*/uchar碼表=0 xc0,0 xf9,0 xa4,0 xb0,0 x99,0 x92,0 x82,0 xf8,0 x80,0 x90,0 x88,0 x80,0 xc6,0 xc0,0 x86,0 x8e,0 xff,0 x9c；/*設(shè)置初始化時(shí)間*/無效 set1302();無效du1302（）；無效集（uchar sel，uchar sel_1）；無效的顯示字（）；void qiehuan();無

3、效調(diào)正（）；無效先世（）；/* * */函數(shù)名：delay()/函數(shù)：延時(shí)/參數(shù)：z（設(shè)置z的值可以設(shè)置延遲z MS）/* * */無效延遲（單位 z） 單位 x,y;對(duì)于(x=z;x0;x-)for(y=175;y0;y-);/*用于顯示函數(shù)的延遲* * */無效延遲1（無效）無符號(hào)字符 i=30;當(dāng)我 - ）;/* * */函數(shù)名：display()/功能：數(shù)碼管顯示子功能/參數(shù)：輸入每一位的顯示/調(diào)用函數(shù)：delay()/* * */無效顯示（uchar aa、uchar bb、uchar cc、uchar dd）ss=0；P0=表aa；延遲（2）；P0=表16；ss=1； SG=0；P

4、0=表bb；延遲（2）；P0=表16；SG=1；fs=0;P0=表cc；延遲（2）；P0=表16；fs=1；fg=0;P0=表dd；延遲（2）；P0=表16；fg=1；/* * */函數(shù)名：keyscan()/功能：鍵盤掃描，調(diào)整時(shí)間/參數(shù)：1為時(shí)間設(shè)置功能鍵，2為時(shí)間加法操作，3為分鐘加法操作/調(diào)用函數(shù)：delay(), display()/* * */uchar id;無效鍵掃描（）如果（resget=0）延遲（5）；如果（resget=0）set1302();身份證=0；顯示(shi/16,shi%16,fshi,fge);杜1302（）；如果（鍵模式=0）延遲（5）；如果（鍵模式=0）

5、如果 (id+=6)身份證=0；而（key_mode=0）顯示字（）；如果（id！=0）開關(guān)（ID）案例一：display(16,16,fen/16,fen%16);yi=er=0;break;案例2：display(shi/16,shi%16,16,16);yi=er=0;break;案例3：display(16,16,ri/16,ri%16);san=0;yi=er=1;break;案例4：display(yue/16,yue%16,16,16);san=0;break;案例5：display(16,16,16,xingqi%16);san=1;break;案例6：display(2,0,

6、nian/16,nian%16);break;如果（id！=0）如果（key_up=0）延遲（5）；如果（key_up=0）而（key_up=0）show_word();set(id,0);/調(diào)用時(shí)間函數(shù)如果（key_down=0）延遲（5）；如果（key_down=0）而（key_down=0）show_word();set(id,1);/調(diào)用時(shí)間函數(shù)無效的顯示字（）開關(guān)（ID）案例一：display(16,16,fen/16,fen%16);break;案例2：顯示(shi/16,shi%16,16,16);break;案例3：顯示(16,16,ri/16,ri%16);break;案例4

7、：顯示(yue/16,yue%16,16,16);break;案例5：display(16,16,16,xingqi%16);break;案例6：display(2,0,nian/16,nian%16);break;/* * /位 SCLK=P17;位 SDA=P16;位 RST=P15;/* * * /無效延遲（uchar z） ucharx,y;對(duì)于(x=z;x0;x-)for(y=1;y0;y-);/* * * /無效 DS1302WriteByte（uchar 數(shù)據(jù)）uchar我;SCLK=0；延遲（1）；對(duì)于(i=0;i=1 ; / * /飛 DS1302ReadByte()ucha

8、r 我，那個(gè)；延誤（1）；對(duì)于 (i = 0 ; i = 1;如果（SDA = 1）那=那| 0 x80;SCLK = 1；延誤（1）；SCLK = 0；延誤（1）；歸期 ;/ * /飛DS1302Read（飛cmd）。uchar 數(shù)據(jù)；RST = 0;SCLK = 0；RST = 1;DS1302WriteByte(cmd);dat=DS1302ReadByte();SCLK=1；RST=0；返回?cái)?shù)據(jù)；/* * /void DS1302Write（uchar cmd，uchar dat）RST=0；SCLK=0；RST=1；DS1302WriteByte(cmd);DS1302WriteBy

9、te(dat);SCLK=1；RST=0；/*根據(jù)按鍵選擇調(diào)整對(duì)應(yīng)時(shí)間* * /無效集（字符 sel，字符 sel_1）字符地址，時(shí)間；字符最大值，最小值；if(sel=1)address=0 x82;max=59;min=0;/minif(sel=2)address=0 x84;max=23;min=0;/小時(shí)if(sel=3)address=0 x86;max=31;min=1;/天if(sel=4)address=0 x88;max=12;min=1;/月if(sel=5)address=0 x8a;max=7;min=1;/周if(sel=6)address=0 x8c;max=99;

10、min=0;/年時(shí)間=DS1302Read(地址+1)/16*10+DS1302Read(地址+1)%16;如果（sel_1=0）時(shí)間+；否則時(shí)間；如果（時(shí)間最大）時(shí)間=分鐘；如果（時(shí)間= 0 & & num = 10 & & num = 18 & & num = 26 & & 數(shù)字 = 34 & & num = 42 & & num = 50 & & num = 55 & & num = 60 ) /顯示（16,16,16，數(shù)字%16）；這=er=1； 如果 ( id = 0 & & keynum = 1 )顯示(she/16,she%16,fen/16,fen%16); /* * * */函數(shù)名：main()/函數(shù)：主函數(shù)/調(diào)用函數(shù)：init()、delay()、display()/* * * */void main() /主函數(shù)在里面（）;而 (1)keyscan();/用于時(shí)間調(diào)整tiaozheng();/對(duì)于時(shí)間的自動(dòng)調(diào)整，在零點(diǎn)、六點(diǎn)、十二點(diǎn)、十八點(diǎn)自動(dòng)調(diào)整qiehuan();/自動(dòng)顯示和固定顯示切換xianshi();/數(shù)碼管顯示/* * */函數(shù)名：ti