单片机万年历程序(能自动调整误差)

1、#include /52单片机头文件#include /包含左右循环移位子函数的库#include #include/*宏定义*/#define uchar 无符号字符#define uint 无符号整数/*参数定义*/char 苗,shi,fen,fge,fshi,sge,sshi,mge,mshi,count,a,b,c,flag,num,keynum,count1;叉年，行奇，月，日；/*定义时间调整按钮*/sbit resget=P36;sbit key_mode=P33;sbit key_up=P34;sbit key_down=P35;/*发光DS1302的控制*/位 yi=P10

2、;位 er=P11;sbit san=P12;位 si=P13;/*定义数码管的驱动位*/位 fg=P20;位 fs=P21;sbit sg=P22;sbit ss=P23;/*数码管显示表*/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；/*设置初始化时间*/无效 set1302();无效du1302（）；无效集（uchar sel，uchar sel_1）；无效的显示字（）；void qiehuan();无

3、效调正（）；无效先世（）；/* * */函数名：delay()/函数：延时/参数：z（设置z的值可以设置延迟z MS）/* * */无效延迟（单位 z） 单位 x,y;对于(x=z;x0;x-)for(y=175;y0;y-);/*用于显示函数的延迟* * */无效延迟1（无效）无符号字符 i=30;当我 - ）;/* * */函数名：display()/功能：数码管显示子功能/参数：输入每一位的显示/调用函数：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；/* * */函数名：keyscan()/功能：键盘扫描，调整时间/参数：1为时间设置功能键，2为时间加法操作，3为分钟加法操作/调用函数：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）开关（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);/调用时间函数如果（key_down=0）延迟（5）；如果（key_down=0）而（key_down=0）show_word();set(id,1);/调用时间函数无效的显示字（）开关（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;对于(x=z;x0;x-)for(y=1;y0;y-);/* * * /无效 DS1302WriteByte（uchar 数据）uchar我;SCLK=0；延迟（1）；对于(i=0;i=1 ; / * /飞 DS1302ReadByte()ucha

8、r 我，那个；延误（1）；对于 (i = 0 ; i = 1;如果（SDA = 1）那=那| 0 x80;SCLK = 1；延误（1）；SCLK = 0；延误（1）；归期 ;/ * /飞DS1302Read（飞cmd）。uchar 数据；RST = 0;SCLK = 0；RST = 1;DS1302WriteByte(cmd);dat=DS1302ReadByte();SCLK=1；RST=0；返回数据；/* * /void DS1302Write（uchar cmd，uchar dat）RST=0；SCLK=0；RST=1；DS1302WriteByte(cmd);DS1302WriteBy

9、te(dat);SCLK=1；RST=0；/*根据按键选择调整对应时间* * /无效集（字符 sel，字符 sel_1）字符地址，时间；字符最大值，最小值；if(sel=1)address=0 x82;max=59;min=0;/minif(sel=2)address=0 x84;max=23;min=0;/小时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;/年时间=DS1302Read(地址+1)/16*10+DS1302Read(地址+1)%16;如果（sel_1=0）时间+；否则时间；如果（时间最大）时间=分钟；如果（时间= 0 & & num = 10 & & num = 18 & & num = 26 & & 数字 = 34 & & num = 42 & & num = 50 & & num = 55 & & num = 60 ) /显示（16,16,16，数字%16）；这=er=1； 如果 ( id = 0 & & keynum = 1 )显示(she/16,she%16,fen/16,fen%16); /* * * */函数名：main()/函数：主函数/调用函数：init()、delay()、display()/* * * */void main() /主函数在里面（）;而 (1)keyscan();/用于时间调整tiaozheng();/对于时间的自动调整，在零点、六点、十二点、十八点自动调整qiehuan();/自动显示和固定显示切换xianshi();/数码管显示/* * */函数名：ti