基于单片机高精度数字可调闹钟源程序

#include<reg52.h>#define uint unsigned int#define uchar unsigned charsbit rs=P2^5;sbit rw=P2^6;sbit en=P2^7;sbit s1=P1^4;sbit s2=P1^5;sbit s3=P1^6;//sbit s4=P1^7;sbit s4=P3^2;sbit s5=P3^3;sbit s6=P3^4;sbit key1=P1^0;sbit beep=P2^3;sbit dscs=P2^0;sbit dsas=P2^1;sbit dsrw=P2^2;sbit dsds=P2^4;sbit dsirq=P3^2;uchar code table[]="  20  -  -      ";uchar code table1[]="      :  :  ";uchar miao,shi,fen,day,month,year,week,s1num,flag,flag1;void delay(uint z);void set_time();void set_alarm(uchar,uchar,uchar);void write_ds(uchar,uchar);uchar read_ds(uchar);void write_com(uchar com){rs=0;rw=0;P0=com;delay(5);en=1;delay(5);en=0;}void write_data(uchar date){rs=1;rw=0;P0=date;delay(5);en=1;delay(5);en=0;}void init(){uchar num;en=0;EA=1;EX0=1;IT0=1;set_time();set_alarm(18,50,0);write_ds(0x0B,0x26);read_ds(0x0c);write_com(0x38);write_com(0x0c);write_com(0x06);write_com(0x01);write_com(0x80);  for(num=0;num<16;num++)      {       write_data(table[num]);        delay(5);       }write_com(0x80+0x40);  for(num=0;num<12;num++)      {       write_data(table1[num]);        delay(5);       }}void write_nyr(uchar add,uchar date){uchar shi,ge;shi=date/10;ge=date%10;write_com(0x80+add);write_data(0x30+shi);write_data(0x30+ge);}void write_sfm(uchar add,uchar date){uchar shi,ge;shi=date/10;ge=date%10;write_com(0x80+0x40+add);write_data(0x30+shi);write_data(0x30+ge);}void write_week(uchar week){write_com(0x80+13);switch(week)  {   case 1:write_data('M');delay(5);           write_data('O');delay(5);           write_data('N');           break;    case 2:write_data('T');delay(5);           write_data('U');delay(5);           write_data('E');           break;    case 3:write_data('W');delay(5);           write_data('E');delay(5);           write_data('D');           break;    case 4:write_data('T');delay(5);           write_data('H');delay(5);           write_data('U');           break;     case 5:write_data('F');delay(5);           write_data('R');delay(5);           write_data('I');           break;     case 6:write_data('S');delay(5);           write_data('A');delay(5);           write_data('T');           break;     case 7:write_data('S');delay(5);           write_data('U');delay(5);           write_data('N');           break;  }}void write_ds(uchar add,uchar date){dscs=0;dsas=1;dsds=1;dsrw=1;P0=add;dsas=0;dsrw=0;P0=date;dsrw=1;dsas=1;dscs=1;}uchar read_ds(uchar add){uchar ds_date;dscs=0;dsas=1;dsds=1;dsrw=1;P0=add;dsas=0;dsds=0;P0=0xff;ds_date=P0;dsas=1;dsds=1;dscs=1;return ds_date;}void set_time(){//write_ds(4,11);//write_ds(2,17);write_ds(7,28);write_ds(8,8);write_ds(9,12);write_ds(6,2);}void set_alarm(uchar ashi,uchar afen,uchar amiao){//write_ds(9,ayear);//write_ds(8,amonth);//write_ds(7,aday);write_ds(1,amiao);write_ds(3,afen);write_ds(5,ashi);}void keyscan(){key1=0;if(flag1==1) { if(s2==0)   {    delay(5);     if(s2==0)       {        while(!s2);        flag1=0;        }   }if(s3==0)   {    delay(5);     if(s3==0)       {        while(!s3);        flag1=0;        }   } } if(s1==0)    {     delay(5);       if(s1==0)         {          s1num++;              flag=1;              flag1=0;               while(!s1);            if(s1num==1)              {                               write_com(0x80+0x40+10);               write_com(0x0f);              }            if(s1num==2)              {              write_com(0x80+0x40+7);              }           if(s1num==3)              {              write_com(0x80+0x40+4);              }              if(s1num==4)              {                               write_com(0x80+10);               //write_com(0x0f);              }            if(s1num==5)              {              write_com(0x80+7);              }           if(s1num==6)              {              write_com(0x80+4);              }            if(s1num==7)              {              write_com(0x80+13);              }            if(s1num==8)              {              s1num=0;             write_com(0x0c);               flag=0;              write_ds(0,miao);              write_ds(2,fen);              write_ds(4,shi);              write_ds(7,day);              write_ds(8,month);              write_ds(9,year);               write_ds(6,week);              }          }    }if(s1num!=0)   {    if(s2==0)      {       delay(5);        if(s2==0)          {          while(!s2);           if(s1num==1)            {            miao++;             if(miao==60)                miao=0;             write_sfm(10,miao);            write_com(0x80+0x40+10);           }            if(s1num==2)            {            fen++;             if(fen==60)                fen=0;                        write_sfm(7,fen);            write_com(0x80+0x40+7);            }            if(s1num==3)            {            shi++;             if(shi==24)                shi=0;                       write_sfm(4,shi);             write_com(0x80+0x40+4);            }             if(s1num==4)            {            day++;             if(day==32)                day=1;                       write_nyr(10,day);             write_com(0x80+10);          }            if(s1num==5)            {            month++;             if(month==13)              month=1;                       write_nyr(7,month);             write_com(0x80+7);          }          if(s1num==6)            {            year++;             if(year==99)                year=0;                       write_nyr(4,year);             write_com(0x80+4);          }         if(s1num==7)            {            week++;             if(week==8)                week=1;                       write_week(week);             write_com(0x80+13);          }                  }   }}if(s1num!=0)   {    if(s3==0)      {       delay(5);        if(s3==0)          {          while(!s3);           if(s1num==1)            {            miao--;             if(miao==-1)                miao=59;             write_sfm(10,miao);            write_com(0x80+0x40+10);           }            if(s1num==2)            {            fen--;             if(fen==-1)                fen=59;                        write_sfm(7,fen);            write_com(0x80+0x40+7);            }            if(s1num==3)            {            shi--;             if(shi==-1)                shi=23;                       write_sfm(4,shi);             write_com(0x80+0x40+4);            }                        if(s1num==4)            {           day--;             if(day==0)                shi=31;                       write_nyr(10,day);             write_com(0x80+10);            }            if(s1num==5)            {            month--;             if(month==0)                month=12;                       write_nyr(7,month);             write_com(0x80+7);            }            if(s1num==6)            {            year--;             if(year==-1)               year=99;                       write_nyr(4,year);             write_com(0x80+4);            }            if(s1num==7)            {            week--;             if(week==0)               week=7;                       write_week(week);             write_com(0x80+13);            }           }      }   } }void didi(){beep=0;delay(50);beep=1;delay(100);beep=0;delay(50);beep=1;}void main(){ init();while(1)    {     keyscan();      if(flag1==1)         didi();      if(flag==0)      {       miao=read_ds(0);       fen=read_ds(2);       shi=read_ds(4);       day=read_ds(7);       month=read_ds(8);        year=read_ds(9);         week=read_ds(6);       write_sfm(10,miao);       write_sfm(7,fen);       write_sfm(4,shi);       write_nyr(10,day);       write_nyr(7,month);        write_nyr(4,year);        write_week(week);        }        }}void delay(uint z){uchar x,y; for(x=z;x>0;x--)   for(y=110;y>0;y--);}void exter0() interrupt 0{uchar c;flag1=1;c=read_ds(0x0c);}