STC12C5412AD 单片机 OCMJ48C液晶电子钟设计源代码 (完美版)

zhangfazhong | 2008-01-09 12:10:28 阅读：2807

//使用请声明代码来源
#include <reg52.h>
#include <PORTSET.h>
#include <math.h>
#include <intrins.h>

#define uint unsigned int
#define uchar unsigned char
#define x1    0x80
#define x2    0x88
#define y     0x80
#define comm 0
#define dat   1

//液晶控制端口定义
sbit cs   = P0^0;
sbit std = P0^1;
sbit sclk = P0^2;
sbit psb = P0^3;   //H=并口; L=串口;
sbit rst = P3^7;   //Reset Signal 低电平有效
//ISD1420端口定义
sbit ADDRESS0 = P3^0;  //录放音地址A3
sbit ADDRESS1 = P3^1;  //录放音地址A4
sbit ADDRESS2 = P3^2;  //录放音地址A5
sbit ADDRESS3 = P3^4;  //录放音地址A6
sbit PLAY = P3^3;   //放音控制口

//全局变量定义
bit timeflag = 0;   //时间标示
bit displayflag = 1;  //显示扫描
unsigned int intcounter = 0; //中断次数计数器
bit dayflag = 0;
unsigned char keycounter1 = 0;  //记录第一个建按的次数
unsigned char keycounter2 = 0;  //记录第二个建按的次数
unsigned char keycounter3 = 0;  //记录第三个建按的次数
unsigned char keycounter4 = 0;  //记录第四个建按的次数
bit keyflag = 0;  //控制键盘扫描时间
unsigned char ch1data[10] = {0x00};   //数据缓冲区
bit clockflag = 1;      //闹钟开启标志

struct calendar
{
unsigned int year;    //年
unsigned char month;   //月
unsigned char day;    //日
unsigned char hour;    //小时
unsigned char minute;   //分钟
unsigned char second;   //秒钟
unsigned char week;    //星期
unsigned char alarmhour;  //闹钟小时
unsigned char alarmminute;  //闹钟分钟
}caldar;

uchar code tab1[]={
//"本系列中文模块内"
//"任意位置反白显示"
//"置二级字库，可在"
//"使用更方便更灵活"
" 烟台大学 "
"学院：计算机学院"
" 04级生产实习 "
"专业：自动化 "
};

uchar code tab2[]={
//"本系列中文模块内"
//"任意位置反白显示"
//"置二级字库，可在"
//"使用更方便更灵活"
" 鸣谢 "
"学院创新实验室 "
"烟大创新实验室 "
"指导教师：刘兆伟"
};

uchar code tab3[]={
//"本系列中文模块内"
//"任意位置反白显示"
//"置二级字库，可在"
//"使用更方便更灵活"
"实习小组：LanMan"
"让生活变得更懒。"
"LanMan 懒人——"
"LanMan WorkGroup"
};

//函数声明
bit LeapYear(unsigned int year);    //计算是否是闰年
unsigned char GetMonthDay(unsigned int year,unsigned char month);     //计算月份的天数
void Time(void);   //时钟函数
void DayTime(void);   //日历函数
void wr_lcd (uchar dat_comm,uchar content);  //写LCD
void delay (uint us);
void init_lcd (void);  //LCD初始化
void chn_disp (uchar code *chn);
void lat_disp (uchar data1,uchar data2);
void con_disp (uchar data1,uchar data2,uchar x0,uchar y0,uchar xl,uchar yl);
void wr_lcd (uchar dat_comm,uchar content);
void delay1 (uint ms);
void clrram (void);   //清屏操作
void DisplayCalendar(void); //显示日历
void ADCInitial(unsigned char chanal,unsigned char speed);  //初始化AD
void StartADC(void);  //启动AD转换
void StopADC(void);   //停止AD转换
unsigned char GetKeyNum(void);  //取键盘值
void ChangTime(void);   //校准时间
void ChangCalendar(void);   //日历校准
void ChangClock(void);      //闹铃修改
void Alarm(void);     //闹铃函数
void ISD1420_Play(unsigned char playrecord);    //放音函数

//初始化串口：串口工作方式1，允许接受REN=1,波特率＝1200
void initialize_UART()
{
   P1=0xFF;
   TMOD=0x20;
//下面已修改为适合12MHz晶振，11.0592改成E8
   TH1=0xf7;//0xe6;
   TL1=0xf7;//0xe6;
   SCON=0x50;
   TR1=1;
}

//串口发,查询发送
void s_send(unsigned char ch)
{
   SBUF=ch;
   TI=0;
   while(!TI);
   TI=0;
}

main()
{
unsigned char keynum = 0;
caldar.year = 2008;
caldar.month = 1;
caldar.day = 8;
caldar.hour = 12;
caldar.minute = 30;
caldar.second = 30;
caldar.week = 2;
caldar.alarmhour = 6;
caldar.alarmminute = 30;
initialize_UART();
init_lcd();
TMOD = TMOD | 0x01;
TMOD = TMOD & 0xfd; //16位定时器方式
EA = 1;
ET0 = 1;
TR0 = 1;

lat_disp (0x00,0x00);
clrram();
delay1 (40);
chn_disp (tab1);
delay1 (50000);
delay1 (50000);
clrram();
lat_disp (0x00,0x00);
clrram();
delay1 (40);
chn_disp (tab2);
delay1 (50000);
delay1 (50000);
clrram();
lat_disp (0x00,0x00);
clrram();
delay1 (40);
chn_disp (tab3);
delay1 (50000);
delay1 (50000);
delay1 (50000);
clrram();

for (;;)
{
     Time();
     DayTime();
     if (clockflag)
      Alarm();
     else
      PLAY = 1;
     if (keyflag)
{
  if (keynum != GetKeyNum())
  {
   clrram ();  //清出上一个界面
//   delay(400);
   keynum = GetKeyNum();
   if (keynum == 1)
   keycounter1++;
   if (keynum == 2)
   keycounter2++;
   if (keynum ==3)
   //keycounter3 = 1;
   keycounter3++;
   if (keynum ==4)
   //keycounter4 = 1;
   keycounter4++;
//   s_send(keycounter1);
  }
  keyflag = 0;
}
switch(keycounter1)  //菜单
   {
  case 0:  //主界面显示
   if(displayflag)
   {
    displayflag = 0;
        DisplayCalendar();
   }
   break;
   case 1:  //调时间
        ChangTime();
   break;
   case 2:  //调日历
        ChangCalendar();
   break;
   case 3:  //调闹铃
        ChangClock();
   break;
   case 4:   //返回主界面
    keycounter1 = 0;
    keycounter2 = 0;
    keycounter3 = 0;
    keycounter4 = 0;
   break;
   default:keycounter1 = 0;break;  //返回主界面
  }
}
}

/******************************************************************************
*               函数：bit LeapYear(unsigned int year)
*               出口参数：1 则是润年 0 则不是
*               入口参数：年份
*               日期： 2008.01.08
*               编者：zhangfazhong
*               状态：已测通过    （2006 2000）
******************************************************************************/
bit LeapYear(unsigned int year)
{
bit flag = 0;
if (year%4 == 0)
    {
      if (year*100 != 0)
      flag = 1;
    }
if (year%400 == 0)
    flag = 1;
return (flag);
// return(((year%4 == 0)&&(year%100 != 0))||(year%400 == 0));
}

/******************************************************************************
*               函数：unsigned char GetMonthDay(unsigned int year,unsigned char month)
*               出口参数：此月的天数
*               入口参数：年份月份
*               日期： 2008.01.08
*               编者： zhangfazhong
*               状态：已测通过
******************************************************************************/
unsigned char GetMonthDay(unsigned int year,unsigned char month)
{
switch (month)
    {
      case 1:
      case 3:
      case 5:
      case 7:
      case 8:
      case 10:
      case 12:
        return (31);
        break;
      case 4:
      case 6:
      case 9:
      case 11:
        return(30);
        break;
      case 2:
       if (LeapYear(year))
        return (29);
        else
        return (28);
//       return (LeapYear(year)?28:29);
       break;
      default: return 0;
    }
}

/******************************************************************************
*               函数：void DisplayCalendar(void)
*               出口参数：无
*               入口参数：无
*               日期： 2008.01.08
*               编者： zhangfazhong
*               状态：待测
******************************************************************************/
void DisplayCalendar(void)
{
unsigned int week[8] = {0xd2bb,0xd2bb,0xb6fe,0xc8fd,0xcbc4,0xcee5,0xc1f9,0xc8d5};
       //一     一  二  三   四五  六  日
wr_lcd (comm,0x80);
wr_lcd (dat,0x2a);//
wr_lcd (dat,0x2a);
// wr_lcd (dat,0xcf);//现
// wr_lcd (dat,0xd6);

wr_lcd (comm,0x82);
wr_lcd (dat,0x2a);//室
wr_lcd (dat,0x2a);
// wr_lcd (dat,0xcf);//现
// wr_lcd (dat,0xd6);

wr_lcd (comm,0x81);
wr_lcd (dat,0x2a);//室
wr_lcd (dat,0x2a);

wr_lcd (comm,0x83);
wr_lcd (dat,0xc8);//日
wr_lcd (dat,0xd5);
// wr_lcd (dat,0xd4);//在
// wr_lcd (dat,0xda);

wr_lcd (comm,0x84);
wr_lcd (dat,0xc0);//历
wr_lcd (dat,0xfa);
// wr_lcd (dat,0xca);//是
// wr_lcd (dat,0xc7);

wr_lcd (comm,0x85);
wr_lcd (dat,0x2a);//境
wr_lcd (dat,0x2a);

wr_lcd (comm,0x86);
wr_lcd (dat,0x2a);//境
wr_lcd (dat,0x2a);

wr_lcd (comm,0x87);
wr_lcd (dat,0x2a);//境
wr_lcd (dat,0x2a);

// wr_lcd (comm,0x84);
// wr_lcd (dat,0xa3);//：
// wr_lcd (dat,0xba);

wr_lcd (comm,0x90);
wr_lcd (dat,caldar.year/1000 + 48);//
wr_lcd (dat,(caldar.year/100)%10 + 48);

wr_lcd (comm,0x91);
wr_lcd (dat,(caldar.year/10)%10 + 48);//
wr_lcd (dat,caldar.year%10 + 48);

wr_lcd (comm,0x92); //年
wr_lcd (dat,0xc4);//：
wr_lcd (dat,0xea);

wr_lcd (comm,0x93);
wr_lcd (dat,caldar.month/10 + 48);
wr_lcd (dat,caldar.month%10 + 48);

wr_lcd (comm,0x94);
wr_lcd (dat,0xd4);//月
wr_lcd (dat,0xc2);

wr_lcd (comm,0x95);
wr_lcd (dat,caldar.day/10 + 48);
wr_lcd (dat,(caldar.day%10) + 48);

wr_lcd (comm,0x96); //日
wr_lcd (dat,0xc8);
wr_lcd (dat,0xd5);

if (clockflag)
    {
      wr_lcd (comm,0x97); //日
     wr_lcd (dat,0x20);
     wr_lcd (dat,0x02);
    }
else
    {
      wr_lcd (comm,0x97); //日
     wr_lcd (dat,0x20);
     wr_lcd (dat,0x20);
    }

wr_lcd (comm,0x88);
wr_lcd (dat,0x2a);//
wr_lcd (dat,0x2a);
// wr_lcd (dat,0xcf);//现
// wr_lcd (dat,0xd6);

wr_lcd (comm,0x89);
wr_lcd (dat,0x2a);//室
wr_lcd (dat,0x2a);
// wr_lcd (dat,0xcf);//现
// wr_lcd (dat,0xd6);

wr_lcd (comm,0x8a);
wr_lcd (dat,0x2a);//室
wr_lcd (dat,0x2a);

wr_lcd (comm,0x8b);
wr_lcd (dat,0xca);//时
wr_lcd (dat,0xb1);
// wr_lcd (dat,0xd4);//在
// wr_lcd (dat,0xda);

wr_lcd (comm,0x8c);
wr_lcd (dat,0xd6);//钟
wr_lcd (dat,0xd3);
// wr_lcd (dat,0xca);//是
// wr_lcd (dat,0xc7);

wr_lcd (comm,0x8d);
wr_lcd (dat,0x2a);//境
wr_lcd (dat,0x2a);

wr_lcd (comm,0x8e);
wr_lcd (dat,0x2a);//境
wr_lcd (dat,0x2a);

wr_lcd (comm,0x8f);
wr_lcd (dat,0x2a);//境
wr_lcd (dat,0x2a);

wr_lcd (comm,0x98);
wr_lcd (dat,0xd0);//星
wr_lcd (dat,0xc7);

wr_lcd (comm,0x99);
wr_lcd (dat,0xc6);//期
wr_lcd (dat,0xda);

wr_lcd (comm,0x9a);
wr_lcd (dat,(unsigned char)(week[caldar.week]>>8));//一二三 ....日
wr_lcd (dat,(unsigned char)week[caldar.week]);

wr_lcd (comm,0x9c);
wr_lcd (dat,(char)(caldar.hour/10)+48);
wr_lcd (dat,caldar.hour%10+48);

wr_lcd (comm,0x9d);
wr_lcd (dat,0x3a); //:
wr_lcd (dat,(char)(caldar.minute/10)+48);

wr_lcd (comm,0x9e);
wr_lcd (dat,caldar.minute%10+48);
wr_lcd (dat,0x3a); //:

wr_lcd (comm,0x9f);
wr_lcd (dat,(char)(caldar.second/10)+48 );
wr_lcd (dat,caldar.second%10+48);
}

/*****************************************************************************
    函数：void Time(void)
    出口参数：无
    入口参数：无
    日期：2007.12.27
    编者：zhangfazhong
    状态：已测通过
*****************************************************************************/
void Time(void)
{
if(timeflag)
  {
   intcounter++;
   timeflag = 0;
   if (intcounter == 50) //388 180(慢) //此值待定171(12小时快3分钟)
   {
    intcounter = 0;
    if(caldar.second == 59)
    {
      if (caldar.minute == 59)
        {
         caldar.minute = 0;
         if (caldar.hour == 23)
         {
          caldar.hour = 0;
                    dayflag = 1;
          if (caldar.week == 7)
          {
           caldar.week = 1;
          }
          else
           caldar.week ++;
         }
         else
         caldar.hour++;
        }
      else
      caldar.minute++;
       caldar.second = 0;
     }
    else
    caldar.second++;
    }
     }
}

/******************************************************************************
    功能：T0中断
    日期：
    编者：
    状态：已测功能实现
******************************************************************************/
Timer0() interrupt 1 using 1
{
TH0 = 0x97;//b1;   //20ms
TL0 = 0xd5;//e0;
timeflag = 1;
displayflag = 1;
keyflag = 1;
TF0 = 0;
}

/*****************************************************************************
    函数：void DayTime(void)
    出口参数：无
    入口参数：无
    日期：2008.01.08
    编者：zhangfazhong
    状态：已测通过
*****************************************************************************/
void DayTime(void)
{
if (dayflag)
    {
      dayflag = 0;
      if (caldar.day < GetMonthDay(caldar.year,caldar.month))
       {
          caldar.day++;
       }
      else
        {
          caldar.day = 1;
          if((caldar.month == 12))
            {
               caldar.month = 1;
               caldar.year++;
            }
          else
            {
              caldar.month++;
            }
        }
/*        s_send(caldar.year/1000 + 48);
        s_send((caldar.year/100)%10 + 48);
        s_send((caldar.year/10)%10 + 48);
        s_send(caldar.year%10 + 48);
        s_send('Y');
        s_send(caldar.month/10 + 48);
        s_send(caldar.month%10 +48);
        s_send('M');
        s_send(caldar.day/10 + 48);
        s_send(caldar.day%10 +48);
        s_send('D'); */

    }
}

/*------------------初始化-----------------*/
void init_lcd (void)
{
rst=1;
psb=0;
wr_lcd (comm,0x30); /*30---基本指令动作*/
wr_lcd (comm,0x01); /*清屏，地址指针指向00H*/
delay (100);
wr_lcd (comm,0x06); /*光标的移动方向*/
wr_lcd (comm,0x0c); /*开显示，关游标*/
}
/*---------------显示汉字或字符----------------*/
void chn_disp (uchar code *chn)
{
uchar i,j;
wr_lcd (comm,0x30);
wr_lcd (comm,0x80);
for (j=0;j<4;j++)
{
    for (i=0;i<16;i++)
    wr_lcd (dat,chn[j*16+i]);
}
}

/*--------------显示点阵----------------*/
void lat_disp (uchar data1,uchar data2)
{
uchar i,j,k,x;
x=x1;
for(k=0;k<2;k++)
{
    for(j=0;j<16;j++)
    {
      for(i=0;i<8;i++)
      {
        wr_lcd (comm,0x34);
        wr_lcd (comm,y+j*2);
        wr_lcd (comm,x+i);
        wr_lcd (comm,0x30);
        wr_lcd (dat,data1);
        wr_lcd (dat,data1);
      }
      for(i=0;i<8;i++)
      {
        wr_lcd (comm,0x34);
        wr_lcd (comm,y+j*2+1);
        wr_lcd (comm,x+i);
        wr_lcd (comm,0x30);
        wr_lcd (dat,data2);
        wr_lcd (dat,data2);
      }
    }
    x=x2;
}
wr_lcd (comm,0x36);
}
/*-----------------------------------------------*/
//当data1=0xff,data2=0xff时,在x0,y0处反白显示16xl*yl.
void con_disp (uchar data1,uchar data2,uchar x0,uchar y0,uchar xl,uchar yl)
{
uchar i,j;
for(j=0;j<yl;j++)
{
    for(i=0;i<xl;i++)
    {
      wr_lcd (comm,0x34);
      wr_lcd (comm,y0+j);
      wr_lcd (comm,x0+i);
      wr_lcd (comm,0x30);
      wr_lcd (dat,data1);
      wr_lcd (dat,data2);
    }
}
wr_lcd (comm,0x36);
}
/*--------------清DDRAM------------------*/
void clrram (void)
{
wr_lcd (comm,0x30);
wr_lcd (comm,0x01);
delay (300);
}
/*---------------------------------------*/
void wr_lcd (uchar dat_comm,uchar content)
{
uchar a,i,j;
delay (50);
a=content;
cs=1;
sclk=0;
std=1;
for(i=0;i<5;i++)
{
    sclk=1;
    sclk=0;
}
std=0;
sclk=1;
sclk=0;
if(dat_comm)
    std=1;   //data
else
    std=0;   //command
sclk=1;
sclk=0;
std=0;
sclk=1;
sclk=0;
for(j=0;j<2;j++)
{
    for(i=0;i<4;i++)
    {
      a=a<<1;
      std=CY;
      sclk=1;
      sclk=0;
    }
    std=0;
    for(i=0;i<4;i++)
    {
      sclk=1;
      sclk=0;
    }
}
}
/*-----------------------------------*/
void delay (uint us)   //delay time
{
while(us--);
}
void delay1 (uint ms)
{
uint i,j;
for(i=0;i<ms;i++)
for(j=0;j<15;j++)
delay(1);
}

/*****************************************************************************
    函数：unsigned char GetKeyNum(unsigned char keyval)
    出口参数：键值
    入口参数：chanal1 转换经处理后的值
    日期：2007.12.29
    编者：zhangfazhong
    状态：已测通过
*****************************************************************************/
unsigned char GetKeyNum(void)
{
unsigned char keynum = 0;
unsigned char j = 0;
unsigned char i = 0;
unsigned char hold = 0;
float prodata = 0;
PortBitSet(1,1,0x10);  //P1_1设置为输入
ADCInitial(1,0x11);  //1通道最快速度
delay(400);   //等待电压稳定
for (;j<10;j++)
{
  StartADC();
  while (!(ADC_CONTR&0x10));
  StopADC();
  for (i=0;i<10;i++)
   {
   ch1data[i] = ch1data[i+1];  //将第一位给第0位
   }
  ch1data[9] = ADC_DATA;    //当次采样给第9
//  s_send(ADC_DATA);
}
//排序
for(i=0;i<9;i++)
{
  for(j=i+1;j<9;j++)
  if (ch1data[i]>ch1data[j])
  {
   hold = ch1data[i];
   ch1data[i] = ch1data[j];
   ch1data[j] = hold;
  }
}
for (i=3;i<7;i++)    //求和
{
  prodata = prodata + ch1data[i];
}
prodata = prodata/4;   //去平均值
// s_send(prodata);
switch ((unsigned char)prodata)
{
  case 0x80: keynum = 1; break;
  case 0xab: keynum = 2; break;
  case 0xc0: keynum = 3; break;
  case 0xcd: keynum = 4; break;
  default : keynum = 0;
}
return (keynum);
}

/*****************************************************************************
    函数：StartADC()
    出口参数：无
    入口参数：无
    日期：2007.11.06
    编者：zhangfazhong
    状态：已测通过
*****************************************************************************/
void StartADC(void)
{
// IE = IE | 0x40;   //开ADC总中断
// AUXR = AUXR | 0x10;   //ADC中断允许
ADC_CONTR = ADC_CONTR | 0x80;  //ADC_POWER = 1 ADC上电
// Delay();
ADC_DATA = 0x00;
ADC_CONTR = ADC_CONTR | 0x08;  //ADC_START = 1 启动adc
}

/******************************************************************************
    函数：StopADC()
    出口参数：无
    入口参数：无
    日期：2007.11.06
    编者：zhangfazhong
    状态：已测通过
******************************************************************************/
void StopADC(void)
{
ADC_CONTR = ADC_CONTR & 0xe7;  //ADC_FLG = 0 清中断 ADC_START = 0 停止adc 1110 0111
}

/*****************************************************************************
    函数：ADCInitial(unsigned char chanal,unsigned char speed)
    出口参数：无
    入口参数：chanal（转换通道），speed（转换速度）
    日期：200711.06
    编者：zhangfazhong
    状态：已测通过
*****************************************************************************/
void ADCInitial(unsigned char chanal,unsigned char speed)
{
switch (chanal)
{
  case 0:
   ADC_CONTR = ADC_CONTR & 0xf8;
   break;
  case 1:
   ADC_CONTR = ADC_CONTR | 0x01;
   ADC_CONTR = ADC_CONTR & 0xf9;
   break;
  case 2:
   ADC_CONTR = ADC_CONTR | 0x02;
   ADC_CONTR = ADC_CONTR & 0xfa;
   break;
  case 3:
   ADC_CONTR = ADC_CONTR | 0x03;
   ADC_CONTR = ADC_CONTR & 0xfb;
   break;
  case 4:
   ADC_CONTR = ADC_CONTR | 0x04;
   ADC_CONTR = ADC_CONTR & 0xfc;
   break;
  case 5:
   ADC_CONTR = ADC_CONTR | 0x05;
   ADC_CONTR = ADC_CONTR & 0xfd;
   break;
  case 6:
   ADC_CONTR = ADC_CONTR | 0x06;
   ADC_CONTR = ADC_CONTR & 0xfe;
   break;
  case 7:
   ADC_CONTR = ADC_CONTR | 0x07;
   break;
  default : break;
}
switch (speed)
{
  case 0x11:
   ADC_CONTR = ADC_CONTR | 0x60;
   break;
  case 0x10:
   ADC_CONTR = ADC_CONTR | 0x40;
   ADC_CONTR = ADC_CONTR | 0xdf;
   break;
  case 0x01:
   ADC_CONTR = ADC_CONTR | 0x20;
   ADC_CONTR = ADC_CONTR & 0xbf;
   break;
  case 0x00:
   ADC_CONTR = ADC_CONTR & 0x9f;
   break;
  default : break;
}
}

/******************************************************************************
*               函数：void ChangTime(void)
*               出口参数：无
*               入口参数：无
*               日期： 2008.01.08
*               编者：zhangfazhong
*               状态：已测通过
******************************************************************************/
void ChangTime(void)
{
unsigned int week[8] = {0xd2bb,0xd2bb,0xb6fe,0xc8fd,0xcbc4,0xcee5,0xc1f9,0xc8d5};
                     //一   一  二     三       四   五  六   日
wr_lcd (comm,0x82);
wr_lcd (dat,0xca);//时
wr_lcd (dat,0xb1);

wr_lcd (comm,0x83);
wr_lcd (dat,0xbc);//间
wr_lcd (dat,0xe4);

wr_lcd (comm,0x84);
wr_lcd (dat,0xd0);//校
wr_lcd (dat,0xa3);

wr_lcd (comm,0x85);
wr_lcd (dat,0xd7);//准
wr_lcd (dat,0xbc);

wr_lcd (comm,0x90);
wr_lcd (dat,(unsigned)(caldar.hour/10)+48);//小时
wr_lcd (dat,caldar.hour%10+48);

wr_lcd (comm,0x91);
wr_lcd (dat,0x3a);//：
wr_lcd (dat,(unsigned)(caldar.minute/10)+48);//分钟

wr_lcd (comm,0x92);
wr_lcd (dat,caldar.minute%10+48);
wr_lcd (dat,0x3a);//：

wr_lcd (comm,0x93);
wr_lcd (dat,(unsigned)(caldar.second/10)+48);//秒钟
wr_lcd (dat,caldar.second%10+48);

wr_lcd (comm,0x95);
wr_lcd (dat,0xd0);//星期
wr_lcd (dat,0xc7);

wr_lcd (comm,0x96);
wr_lcd (dat,0xc6);//期
wr_lcd (dat,0xda);

wr_lcd (comm,0x97);
wr_lcd (dat,(unsigned char)(week[caldar.week]>>8));//一二三 ....日
wr_lcd (dat,(unsigned char)week[caldar.week]);

wr_lcd (comm,0x99);
wr_lcd (dat,0xcd);//退出
wr_lcd (dat,0xcb);

wr_lcd (comm,0x9a);
wr_lcd (dat,0xb3);
wr_lcd (dat,0xf6);

wr_lcd (comm,0x9d);
wr_lcd (dat,0xc8);//确定
wr_lcd (dat,0xb7);

wr_lcd (comm,0x9e);
wr_lcd (dat,0xb6);
wr_lcd (dat,0xa8);

switch (keycounter2)
{
  case 1:  //小时调整
   wr_lcd (comm,0x88);
   wr_lcd (dat,0x1e);
   wr_lcd (dat,0x1e);
   if (keycounter3 == 1)  //加一调整
   {
    if (caldar.hour<23)
    caldar.hour++;
    else
    caldar.hour = 0;
    keycounter3 = 0;
    }
    if (keycounter4 == 1)  //减1调整
    {
    if (caldar.hour == 0)
    caldar.hour = 23;
    else
    caldar.hour --;
    keycounter4 = 0;
    }
  break;
  case 2:   //分钟调整
   wr_lcd (comm,0x89);
   wr_lcd (dat,0x20);
   wr_lcd (dat,0x1e);
   wr_lcd (comm,0x8a);
   wr_lcd (dat,0x1e);
   wr_lcd (dat,0x20);
   if (keycounter3 == 1)  //加一调整
   {
    if (caldar.minute<59)
    caldar.minute++;
    else
    caldar.minute = 0;
    keycounter3 = 0;
    }
    if (keycounter4 == 1)  //减1调整
    {
    if (caldar.minute == 0)
    caldar.minute = 59;
    else
    caldar.minute --;
    keycounter4 = 0;
    }
  break;
  case 3:  //秒钟调整
   wr_lcd (comm,0x8b);
   wr_lcd (dat,0x1e);
   wr_lcd (dat,0x1e);
   if (keycounter3 == 1)  //清零调整
   {
    caldar.second = 0;
    keycounter3 = 0;
    }
    if (keycounter4 == 1)  //清零调整
    {
    caldar.second = 0;
    keycounter4 = 0;
    }
  break;
  case 4:  //星期调整
   wr_lcd (comm,0x8f);
   wr_lcd (dat,0x1e);
   wr_lcd (dat,0x1e);
   if (keycounter3 == 1)  //加一调整
   {
    if (caldar.week<7)
    caldar.week++;
    else
    caldar.week = 0;
    keycounter3 = 0;
    }
    if (keycounter4 == 1)  //减1调整
    {
    if (caldar.week <= 1)
    caldar.week = 7;
    else
    caldar.week --;
    keycounter4 = 0;
    }
  break;
  case 5:
   wr_lcd (comm,0x88); //操作成功请按退出 //
   wr_lcd (dat,0xb2);
   wr_lcd (dat,0xd9);
   wr_lcd (comm,0x89); //
   wr_lcd (dat,0xd7);
   wr_lcd (dat,0xf7);
   wr_lcd (comm,0x8a); //
   wr_lcd (dat,0xb3);
   wr_lcd (dat,0xc9);
   wr_lcd (comm,0x8b); //
   wr_lcd (dat,0xb9);
   wr_lcd (dat,0xa6);
   wr_lcd (comm,0x8c); //
   wr_lcd (dat,0xa2);
   wr_lcd (dat,0xb0);
   wr_lcd (comm,0x8d); //
   wr_lcd (dat,0xc7);
   wr_lcd (dat,0xeb);
   wr_lcd (comm,0x8e); //
   wr_lcd (dat,0xcd);
   wr_lcd (dat,0xcb);
   wr_lcd (comm,0x8f); //
   wr_lcd (dat,0xb3);
   wr_lcd (dat,0xf6);
  // chn_disp (tab3);

  // keycounter2 = 0;  //若去了以上语句则需加此句
  break;
  case 6:keycounter2 = 0;break;
  default :keycounter2 = 0;
}
}

/******************************************************************************
*               函数：void ChangCalendar(void)
*               出口参数：无
*               入口参数：无
*               日期： 2008.01.08
*               编者：zhangfazhong
*               状态：待测
******************************************************************************/
void ChangCalendar(void)
{
unsigned int week[8] = {0xd2bb,0xd2bb,0xb6fe,0xc8fd,0xcbc4,0xcee5,0xc1f9,0xc8d5};
                     //一   一  二     三       四   五  六   日
wr_lcd (comm,0x82);
wr_lcd (dat,0xc8);//日
wr_lcd (dat,0xd5);

wr_lcd (comm,0x83);
wr_lcd (dat,0xc0);//历
wr_lcd (dat,0xfa);