請幫忙用c編個程序，謝謝.......DS1302

please help debug

#include <reg52.h>
#include <intrins.h>
#define uchar unsigned char
#define uint unsigned int
sbit sclk=P1^0;//1302
sbit io=P1^1;//1302
sbit rst=P2^0;//1302
sbit lcden=P3^4;//1602
sbit lcdrs=P3^5;//1602
sbit lcdwr=P2^7;//1602
sbit led=P2^6;//????êy??1ü1???μ?￡???è???μ??éóD?é?T￡??÷òaê?ê?μ?￡?è?1?òo?§áá?è2?1?￡??éò?????ò????￡áíía?1óDá÷??μ?μ?ò2?éò?????1?μ?p14
sbit set=P3^2;//éè???ü?¨ò?,°′??oóòà′?éè?¨?ê??è? D?ê±·???μè
sbit addkey=P3^6;//éè?¨ê±??ê±?óêy?Y
sbit deckey=P3^7;//éè?¨ê±??ê±??êy?Y
uchar flag,add,dec,check;
uchar sec,min,hr,day,mon,yr,week;
uchar code table[]="SUNMONTUEWEDTHUFRISAT";//D??ú??ê?μ?×?·?′?
uchar code table2[]={0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39};//0-9??ó|μ?ASII??
/********************************************************************************************************************/
//ò????a1302μ??ù±?2ù×÷
void delayus()//4usμ??óê±￡?ò???nopê?1us
{
 _nop_();
 _nop_();
 _nop_();
 _nop_();
} 
void write(uchar dat)//ò???×??úμ?êy?Y
{
 uchar i;
 sclk=0;
 delayus();
 for(i=0;i<8;i++)
 {
  dat=dat>>1;//ò?????′??÷2?1ü×óò??ò??óòò?￡?±?ò?3?????′?è?ò?3???CY;
  io=CY;
  delayus();
  sclk=1;
  delayus();
  sclk=0;
  delayus(); 
 } 
}

uchar read()//?áò???×??úμ?êy?Y
{
 uchar i,dat=0;
 for(i=0;i<8;i++)
 {
  sclk=1;
  delayus();
  sclk=0;
  delayus();
  dat=_cror_(dat,1)|io;//′?′|2éó?μ?ê??­?·óòò???á?￡?°?êy?Y?á3? 
 }
 return dat;
}
uchar read1302(uchar cmd)//′ó1302μ?ì??¨????cmd?á3?êy?μ
{
 uchar dat;
 rst=1;
 write(cmd);
 dat=read();
 rst=0;
 return dat; 
}
void write1302(uchar cmd,uchar dat)//°?êy?YdatD′μ?1302μ?cmd??ó|????
{
 rst=0;
 sclk=0;
 rst=1;
 write(cmd);
 write(dat);
}
/****************************************************************************/
void set1302()//1302éè??￡?°?éè?¨o?μ?ê±??D′è?1302
{
 uchar shi,ge;
 write1302(0x8E,0x00); //?ù?YD′×′ì???′??÷?üá?×?￡?D′è?2?±￡?¤??á?  
 shi=sec/10;
 ge=sec%10;
 sec=(shi<<4)|ge;               
    write1302(0x80,sec);   //?ù?YD′????′??÷?üá?×?￡?D′è???μ?3?ê??μ
 shi=min/10;
 ge=min%10;
 min=(shi<<4)|ge;
 write1302(0x82,min);   //?ù?YD′·???′??÷?üá?×?￡?D′è?·?μ?3?ê??μ
 shi=hr/10;
 ge=hr%10;
 hr=(shi<<4)|ge;
 write1302(0x84,hr); //?ù?YD′D?ê±??′??÷?üá?×?￡?D′è?D?ê±μ?3?ê??μ
 shi=day/10;
 ge=day%10;
 day=(shi<<4)|ge;
 write1302(0x86,day); //?ù?YD′è???′??÷?üá?×?￡?D′è?è?μ?3?ê??μ 
 shi=mon/10;
 ge=mon%10;
 mon=(shi<<4)|ge;
 write1302(0x88,mon); //?ù?YD′????′??÷?üá?×?￡?D′è???μ?3?ê??μ
 shi=yr/10;
 ge=yr%10;
 yr=(shi<<4)|ge;
 write1302(0x8c,yr);   //?ù?YD′?ê??′??÷?üá?×?￡?D′è??êμ?3?ê??μ
 write1302(0x8f,0x00);
}
void readtime()//′ó1302?D?áè?ê±??2￠??D??ú??DD????
{
 uchar shi,ge;
 sec=read1302(0x81);
  shi=(sec&0xf0)>>4;
  ge=sec&0x0f;
  sec=10*shi+ge;
 min=read1302(0x83);
  shi=(min&0xf0)>>4;
  ge=min&0x0f;
  min=10*shi+ge; 
 hr=read1302(0x85);
  shi=(hr&0xf0)>>4;
  ge=hr&0x0f;
  hr=10*shi+ge; 
 day=read1302(0x87);
  shi=(day&0xf0)>>4;
  ge=day&0x0f;
  day=10*shi+ge; 
 mon=read1302(0x89);
  shi=(mon&0xf0)>>4;
  ge=mon&0x0f;
  mon=10*shi+ge; 
 yr=read1302(0x8d);
  shi=(yr&0xf0)>>4;
  ge=yr&0x0f;
  yr=10*shi+ge;
 if(day!=check)//????D??ú?μ
 {
  week++;
  if(week>6)week=0;
  check=day;
 }   
}
/****************************************************************************************************/
/*ò???ê?1602μ??ù±?2ù×÷*/
void delay(uint z)//1mS?óê±×ó3ìDò
{
 uint a,b;
 for(a=z;a>0;a--)
  for(b=110;b>0;b--);
}
void write_com(uchar com)//D′????×?LCD
{
 lcdrs=0;//????×?
 P0=com;
 delay(5);
 lcden=1;
 delay(5);
 lcden=0;
}
void write_data(uchar date)//D′êy?YLCD
{
 lcdrs=1;//êy?Y
 P0=date;
 delay(5);
 lcden=1;
 delay(5);
 lcden=0;
}
void write_week(uchar i)//??ê?D??úμ?oˉêy
{
 write_data(table[3*i]);
 write_data(table[3*i+1]);
 write_data(table[3*i+2]);
}
void write_time(uchar time)//??ê?2??êyê±??￡??ê??è??ùê?2??êyμ???ê?
{
 uchar shi,ge;
 shi=time/10;
 ge=time%10;
 write_data(table2[shi]);
 write_data(table2[ge]); 
}
void display()//??ê??ê??è??°D??úμè
{
 write_com(0x80);
 write_time(yr);
 write_data('-');
 write_time(mon);
 write_data('-');
 write_time(day);
 write_data(' ');
 write_data(' ');
 write_week(week);
 write_com(0x80+0x40);
 write_time(hr);
 write_data(':');
 write_time(min);
 write_data(':');
 write_time(sec);
 write_data(' ');
 write_data(' ');
 write_data('C');
 write_data('h');
 write_data('e');
 write_data('n');
 write_data('g');
}
void initlcd()//LCD??ê?3?ê??ˉ?￡
{
 led=0;
 lcdwr=0;
 lcden=0;
 write_com(0x38);//°′??1602μ?éè?¨?3Dòòà′???DDéè?¨?￠
 write_com(0x0c);//2???ê?1a±êoíéá??
 write_com(0x06);//??D′ò???×?·?￡?1a±ê+1
 write_com(0x01);//???á
}
/************************************************************************************/
//ò???ê??ü?ì????2?·?
void keyscan()//?ü?ìé¨?è3ìDò￡??′°′??μ?ê??????ü
{
 if(set==0)
 {
  delay(30);
  if(set==0)
  {
   while(!set);
   delay(30);
   while(!set);
   flag=1;
  }
 }
 if(addkey==0)
 {

  delay(30);
  if(addkey==0)
  {
   while(!addkey);
   delay(30);
   while(!addkey);
   add=1;
  }
 } 
 if(deckey==0)
 {
  delay(30);
  if(deckey==0)
  {
   while(!deckey);
   delay(30);
   while(!deckey);
   dec=1;
  }
 }  
}
void timeset()//ê±??éè?¨oˉêy￡?òà′?éè???ê￡???￡?è?￡¨D??ú￡?￡?D?ê±￡?·???
{
  if(flag==1)
  { 
   flag=0;
   write_com(0x0f);//?a??1a±êéá??
   write_com(0x80);//éè???êμ??eê?×?±ê
   while(!flag&&!add&&!dec)keyscan();//é¨?è?ü?ì￡??′ê?·?óD°′?ü°′??
   while(!flag)
   {
    keyscan();
    if(add==1)
    {
     add=0;
     yr++;
     write_time(yr);
    }
    if(dec==1)
    {
     dec=0;
     yr--;
     write_time(yr);    
    }
    write_com(0x80);//?ê1a±êéè??1é??￡?μè′y??ò?′?μ?éè?¨
   }
   flag=0;
   write_com(0x80+3);//éè????×?±ê?eê???
   while(!flag&&!add&&!dec)keyscan();//é¨?è?ü?ì￡??′ê?·?óD°′?ü°′??
   while(!flag)//è?1?óD?aê??D??°′?ü￡?
   {
    keyscan();
    if(add==1)
    {
     add=0;
     mon++;
     if(mon>12)mon=1;
     write_time(mon);
    }
    if(dec==1)
    {
     dec=0;
     mon--;
     if(mon>12)mon=1;
     write_time(mon);   
    }
    write_com(0x80+3);//??1a±êéè??1é??￡?μè′y??ò?′?μ?éè?¨
   }
   flag=0;
   write_com(0x80+6);//éè??ìì×?±ê?eê???
   while(!flag&&!add&&!dec)keyscan();//é¨?è?ü?ì￡??′ê?·?óD°′?ü°′??
   while(!flag)//è?1?óD?aê??D??°′?ü￡?
   {
    keyscan();
    if(add==1)
    {
     add=0;
     day++;
     if(day==29)
     {
      if((mon==2)&&(yr%4!=0))day=1;
     }
     if(day==30)
     {
      if((mon==2)&&(yr%4==0))day=1;
     }
     if(day==31)
     {
      if((mon==4)||(mon==6)||(mon==9)||(mon==11))day=1;
     }
     if(day>31)day=0;
     write_time(day);
    }
    if(dec==1)
    {
     dec=0;
     day--;
     if(day==0)
     {
      if((mon==2)&&(yr%4!=0))day=28;
      if((mon==2)&&(yr%4==0))day=29;
      if((mon==4)||(mon==6)||(mon==9)||(mon==11))day=30;
      if((mon==1)||(mon==3)||(mon==5)||(mon==7)||(mon==8)||(mon==10)||(mon==12))day=31;
     }
     write_time(day);
     check=day;
    }
    write_com(0x80+6);//ìì1a±êéè??1é??￡?μè′y??ò?′?μ?éè?¨
   }
   flag=0;
   write_com(0x80+10);//éè??D?ê±×?±ê?eê???
   while(!flag&&!add&&!dec)keyscan();//é¨?è?ü?ì￡??′ê?·?óD°′?ü°′??
   while(!flag)
   {
    keyscan();
    if(add==1)
    {
     add=0;
     week++;
     if(week>6)week=0;
     write_week(week);
    }
    if(dec==1)
    {
     dec=0;
     week--;
     if(week>6)week=6;
     write_week(week);
    }
    write_com(0x80+10);//D?ê±1a±êéè??1é??￡?μè′y??ò?′?μ?éè?¨
   }
   flag=0;
   write_com(0x80+0x40);//éè??D?ê±×?±ê?eê???
   while(!flag&&!add&&!dec)keyscan();//é¨?è?ü?ì￡??′ê?·?óD°′?ü°′??
   while(!flag)
   {
    keyscan();
    if(add==1)
    {
     add=0;
     hr++;
     if(hr>23)hr=0;
     write_time(hr);
    }
    if(dec==1)
    {
     dec=0;
     hr--;
     if(hr>23)hr=23;
     write_time(hr);
    }
    write_com(0x80+0x40);//D?ê±1a±êéè??1é??￡?μè′y??ò?′?μ?éè?¨
   }
   flag=0;
   write_com(0x80+0x40+3);//éè??·??ó×?±ê?eê???
   while(!flag&&!add&&!dec)keyscan();//é¨?è?ü?ì￡??′ê?·?óD°′?ü°′??
   while(!flag)//è?1?óD?aê??D??°′?ü￡?
   {
    keyscan();
    if(add==1)
    {
     add=0;
     min++;
     if(min>59)min=0;
     write_time(min);
    }
    if(dec==1)
    {
     dec=0;
     min--;
     if(min>59)min=59;
     write_time(min);
    }
    write_com(0x80+0x40+3);//D?ê±1a±êéè??1é??￡?μè′y??ò?′?μ?éè?¨
   }
   flag=0;
   write_com(0x80+0x40+6);//éè??·??ó×?±ê?eê???
   while(!flag&&!add&&!dec)keyscan();//é¨?è?ü?ì￡??′ê?·?óD°′?ü°′??
   while(!flag)//è?1?óD?aê??D??°′?ü￡?
   {
    keyscan();
    if(add==1)
    {
     add=0;
     sec++;
     if(sec>59)sec=0;
     write_time(sec);
    }
    if(dec==1)
    {
     dec=0;
     sec--;
     if(sec>59)sec=59;
     write_time(sec);
    }
    write_com(0x80+0x40+6);//D?ê±1a±êéè??1é??￡?μè′y??ò?′?μ?éè?¨
   }
   flag=0;
   set1302();
   write_com(0x0c); 
  } 
}
/**********************************************************************/
//?÷3ìDò
void main()
{
 while(set==0)//?aà?ê????μí3?í3?ê??μμ?￡?ê1ó?μ?·?·¨ê???μ???oó￡?°′×?set?ü￡?è?oóé?μ?￡?set?ü°′×?1~3s,?é?a?′éè??íê3é
 { 
  sec=11;min=20;hr=13;day=29;mon=2;yr=12;week=3;//3?ê??μéè?¨￡??aà?òa×￠òa￡?D??úμ?éè?¨±?D??yè·￡?2?è?oóD?μ?×?ê±?á3?′í?￡
  set1302();
  initlcd();
  readtime();
  display(); 
 }
 write1302(0x8f,0x00);//?áè?êy?Yê±￡?±?D?°?1302éè???a′?×′ì?￡??áêy?Yμ?D′±￡?¤′ò?a
 initlcd(); 
 while(1)
 {
  keyscan();//?ü?ìé¨?è
  timeset();//è?1?éè???ü°′???íéè?¨ê±??￡?·??ò?ííù???′DD
  readtime();
  display(); 
 }
}

clock_ok.txt (10.03 KB, 下載次數: 4)

2012-4-10 14:52 上傳

點擊文件名下載附件
下載積分: 黑幣 -5