cald.txt

比较好的一个电子日历程序,有C语言写的

 unsigned char i;
 for(i=0;i<6;i++)
 {
  LED_ON(i);  /*选通相应位*/
  XBYTE[LED_SEG]=dispbuf; /*写显示段码*/
  deley(50);  /*延时显示*/
  LED_OFF;    /*写LED全灭段码*/
 }
}
void update_dispbuf(unsigned char *str)    
/*更新显示缓冲区子函数,参数为要用来更新缓冲区的源字符数组的首地址*/
{
  dispbuf[0]=str[0]; /*将要更新的源字符数组内容COPY至dispbuf数组，用作显示缓冲区*/
  dispbuf[1]=str[1];
  dispbuf[2]=str[2]|0x80; /*默认把时位和分位后面的小数点显示出来，根据需要再取舍*/
  dispbuf[3]=str[3];
  dispbuf[4]=str[4]|0x80;
  dispbuf[5]=str[5];
}
void deley(int i)  /*延时子函数*/
{
  while(i--);
}
unsigned char getkeycode(void) /*键盘扫描子程序，返回获得的键码*/
{
 unsigned char keycode;  /*键码变量,一开始存行码*/
 unsigned char scancode=0x20; /*列扫描码*/
 unsigned char icolumn=0;  /*键的列号*/
 display();                      /*用刷新数码管显示的时间去抖*/
 XBYTE[KEY_COLUMN]=0x00;
 keycode=XBYTE[KEY_LINE]&0x0f; /*从行端口读入四位行码*/
 while((scancode&0x3f)!=0) /*取scancode的低六位，只要没变为全0,则执行循环*/
 {
  XBYTE[KEY_COLUMN]=(~scancode)&0x3f; /*给列赋扫描码，第一次为011111*/
  if((XBYTE[KEY_LINE]&0x0f)==keycode) 
   break; /*检测按键所在的列跳出循环*/
   scancode=scancode>>1; /*列扫描码右移一位*/
  icolumn++;  /*列号加1*/
 }
 keycode=keycode<<4;  /*把行码移到高四位*/
 keycode=keycode|icolumn; /*由行码和列码组成键码*/
//等待按键放开
 XBYTE[KEY_COLUMN]=0x00;
 while((XBYTE[KEY_LINE]&0x0f)!=0x0f) display();
 return keycode;
}
void keyprocess(unsigned char keycode) /*键值处理函数*/
{
switch (keycode)
{
  case 0x73: Akey();
             break;
  case 0xB3: Bkey();
      break;
  case 0xD3: Ckey();
      break;
  case 0xE3: Dkey();
             break;
  default:   break;
}
  update_dispbuf(CurrentMode);
}
unsigned char getmonthdays(unsigned int year,unsigned char month)/*得到某月的天数*/
{
unsigned char days;
switch (month)
{
  case 4:
  case 6:
  case 9:
  case 11:days=30;
          break;
  case 2: if(year%4==0) days=29;
  else days=28;
          break;
  default:days=31;
          break;
}
return days;
}
/*功能键子函数部分*/
void Akey(void) /*对当前设置位进行加一操作，如果设置秒位，则给秒位清零*/
{
  if(CurrentMode==TIMER)  /*秒表模式下启闭走时*/
   { TR1=!TR1;
     return;
   }
  if(!IsSet) return;    /*如果不是设置模式退出*/
switch (SetSelect)
{
  case SECOND:if(CurrentMode==CLOCK)
       {
         clock.s=0;  /*如果当前被设置位是秒位，则清零秒位*/
         update_clockstr();
       }
       if(CurrentMode==ALART)
        {
          Alart_EN=!Alart_EN;
          update_alartstr();
        }
       if(CurrentMode==DATE)
        {
         if(++date.day==(getmonthdays(date.year,date.month)+1)) date.day=1;
           update_datestr();
        }
         if(CurrentMode==TIMER)
           {
             TR1=!TR1;
           }
           break;
  case MINUTE:if(CurrentMode==CLOCK)
       {
         if(++clock.m==60) clock.m=0; /*如果当前被设置分位，则分位加1*/
          update_clockstr();
       }
         if(CurrentMode==ALART)
          {
            if(++alart.m==60) alart.m=0;
              update_alartstr();
          }
         if(CurrentMode==DATE)
          {
            if(++date.month==13) date.month=1;
             update_datestr();
          }
          break;
  case HOUR:if(CurrentMode==CLOCK)
            {
             if(++clock.h==24) clock.h=0; /*如果当前被设置时位，则时位加1*/
              update_clockstr();
            }
             if(CurrentMode==ALART)
              {
               if(++alart.h==24) alart.h=0;
                update_alartstr();
              }
             if(CurrentMode==DATE)
              {
               if(++date.year==100) date.year=0;
                update_datestr();
              }
                break;
             default:  break;
}
        update_dispbuf(CurrentMode);
}
void Bkey(void)  /*对当前设置位进行减一操作,如果设置秒分,则给秒位清零,类比Akey()函数*/
{
  if(!IsSet) return;
  switch (SetSelect)
{
 case SECOND:if(CurrentMode==CLOCK)
       {
         clock.s=0;
         update_clockstr();
       }
        if(CurrentMode==ALART)
         {
          Alart_EN=!Alart_EN;
          update_alartstr();
         }
        if(CurrentMode==DATE)
         {
          if(--date.day==0x00) date.day=getmonthdays(date.year,date.month);
           update_datestr();
        }
        break;
 case MINUTE:if(CurrentMode==CLOCK)
       {
        if(--clock.m==0xff) clock.m=59;
        update_clockstr();
       }
        if(CurrentMode==ALART)
       {
        if(--alart.m==0xff) alart.m=59;
         update_alartstr();
       }
        if(CurrentMode==DATE)
         {
          if(--date.month==0x00) date.month=12;
          update_datestr();
        }
         break;
  case HOUR:  if(CurrentMode==CLOCK)
        {
          if(--clock.h==0xff) clock.h=23;
           update_clockstr();
        }
          if(CurrentMode==ALART)
         {
          if(--alart.h==0xff) alart.h=23;
           update_alartstr();
         }
          if(CurrentMode==DATE)
           {
             if(--date.year==0xffff) date.year=99;
              update_datestr();
           }
      break;
  default:    break;
}
        update_dispbuf(CurrentMode);
}
void Ckey(void) /*正常走时模式和设置模式的切换*/
{
  if(CurrentMode==TIMER)
  {
    TR1=0;          /*初始化定时器1设置,停止秒表记时*/
    TH1=6;
    TL1=6;
    timer.ms=0;    /*初始化秒表数组*/
    timer.s=0;
    timer.m=0;
    update_timerstr();
  }else
  {
if(IsSet==0) /*在非秒表模式下,第一次按下C键进入设置模式,设置时位*/
{
  IsSet=1; /*置位标志位，进入设置模式 */
  SetSelect=HOUR;
  return;
}  /*第二次按Ｃ键设置分位，第三次按键设置秒位，第四次按键完成退出设置*/
if(SetSelect==0)/*按到第四次,即设置完秒位后,将标志位IsSet置0,完成设置*/
{
  IsSet=0; /*复位标志位，进入正常走时模式*/
  return;
}
if(SetSelect>0) SetSelect--;    /*设置位的标志变量SetSelect= 0:时位 1:分位 2:秒位*/
}
}
void Dkey(void) /*工作状态切换：时钟、闹钟、日期、秒表*/
{
  if(CurrentMode==CLOCK)      /*切换至闹钟，同时开关闹钟*/
   { CurrentMode=ALART;
     Alart_EN=!Alart_EN;
     update_alartstr();
     return;
   }
  if(CurrentMode==ALART)      /*切换至日期*/
   { CurrentMode=DATE;
      return;
   }
  if(CurrentMode==DATE)       /*切换至秒表，同时关闭设置模式*/
   {
     CurrentMode=TIMER;
     IsSet=0;
     return;
   }
  if(CurrentMode==TIMER)      /*切换至时钟*/
   {        
     CurrentMode=CLOCK;
     return;
   }
}