4key电子钟1602.c

51_DEMO测试程序

/*24c256 start  */
void start()
 {
 	esda=1;_nop_();
 	eclk=1;_nop_();
 	esda=0;_nop_();
 	eclk=0;_nop_();
 	}
/*###################################*/
/*24c256 rdby  */
UN rdby()
 {      esda=1;
	eclk=1;ACC7=esda;eclk=0;
	eclk=1;ACC6=esda;eclk=0;
	eclk=1;ACC5=esda;eclk=0;
	eclk=1;ACC4=esda;eclk=0;
	eclk=1;ACC3=esda;eclk=0;
	eclk=1;ACC2=esda;eclk=0;
	eclk=1;ACC1=esda;eclk=0;
	eclk=1;ACC0=esda;eclk=0;
 	return(ACC);
}
/*###################################*/
/*24c256 waddr  */
 void waddr()
 {
 	start();
 	wrby(0xa0);
 	ask();}
/*###################################*/
/*24c256 raddr  */
 UN  raddr()
 {
 	start();
 	wrby(0xa1);
 	ask();
 	ACC=rdby();
 	stop();
 	return(ACC);
}
/*###################################*/
void wrby(UN x)

{       ACC=x;
        esda=ACC7;eclk=1;eclk=0;
        esda=ACC6;eclk=1;eclk=0;
        esda=ACC5;eclk=1;eclk=0;
        esda=ACC4;eclk=1;eclk=0;
        esda=ACC3;eclk=1;eclk=0;
        esda=ACC2;eclk=1;eclk=0;
        esda=ACC1;eclk=1;eclk=0;
        esda=ACC0;eclk=1;eclk=0;
	esda=1;eclk=1;
 }
/*####################################*/
/*24c256 读出一字节  */
UN rout(UN x)

  {     UN asa;
  	waddr();
        w8addr(x);
        asa=raddr();
        return(asa);
  }
 /*######################################*/
/*24c256 记忆一字节  */
void memory(UN f,UN x)
   {
   	waddr();
  	w8addr(f);
   	wrby(x);
   	ask();
   	stop();
   	d2ms();
   }
/* 延时*/
void d2ms()
 { UN a, b;
   for (a=0;a<=6;a++)
   {
     for (b=0;b<0x7f;b++)
         {;}
   }
 }

 //##################################
 void d1ms()
 { UN a, b;
   for (a=0;a<=2;a++)
   {
     for (b=0;b<0x7f;b++)
         {;}
 	}
 }
 //################################
 void d70ms()
 { UN a, b;
   for (a=0;a<=0xff;a++)
   {
     for (b=0;b<0xff;b++)
         {;}
 	}
 }




/*################################写入256的8位地址*/
void w8addr(UN x)
      {
            wrby(x);
            ask();

        }
//################################################
void distime(UN h,m)
{  UN h10,h1,m10,m1,k;
         k=h;
         h10=(k/10);
         h1=(k%10);
	 k=m;
         m10=(k/10);
         m1=(k%10);
	 h10=discode[h10];
	 h1=discode[h1];
	 m10=discode[m10];
	 m1=discode[m1];
///////////////////////////////
	 P0=0xff;
	 
	 //if(dsb==1){P0=0x7f;P1=0xf3;d1ms();}
	 P0=0x7f;P1=0xf3;d1ms();//显示“ ：”
	 P1=0xff;
	 if(h10!=0xc0){P0=h10;P1=0xfe;d1ms();}
	 P1=0xff;
	 P0=h1;P1=0xfd;d1ms();
	 P1=0xff;
	 P0=m10;P1=0xfb;d1ms();
	 P1=0xff;
	 P0=m1;P1=0xf7;d1ms();
	 P1=0xff;
	 dislsd();d1ms();

	}

void keyv(UN pu1,pu2)
{
     do{xx=0;
	while(xx!=pu1){;}yin=!yin;
	pu2--;}
	while(pu2!=0);
	yin=1;
 	}
void zly()
{ UN cc1,cc2;
  cc2=3;
 do{
    P1=0xff;
    keyv(3,50);keyv(5,30);
    keyv(3,50);keyv(5,30);
    keyv(3,50);keyv(5,30);
    cc1=250;
    do{distime(m_hour,m_min);cc1--;}
    while(cc1!=0);
    cc2--;
   }
 while(cc2!=0);
 }

void txchar(Uchar x,Uchar y, Uchar n[])
{    Uchar i,a;
     a=strlen(n);

     i=0xff;
     do
     {i++;
        DispOneChar(x,y,n[i]);x++;if(x>15&&y==0){x=0;y=1;}else if(x>15&&y==1){x=0;y=0;}}
     while(i<a-1);
}




 /*=======================================================
显示字符串
=======================================================*/
void ePutstr(Uchar x,Uchar y, Uchar code *ptr) {
Uchar i,l=0;
while (ptr[l] >31){l++;};
for (i=0;i<l;i++) {
DispOneChar(x++,y,ptr);
if ( x == 16 ){
x = 0; y ^= 1;
}
}
}

/*=======================================================
演示一行连续字符串，配合上位程序演示移动字串
=======================================================*/
void Display( Uchar dd ) {

Uchar i;

for (i=0;i<16;i++) {
DispOneChar(i,1,dd++);
dd &= 0x7f;
if (dd<32) dd=32;
}
}

/*=======================================================
显示光标定位
=======================================================*/
void Disp_XY( char posx,char posy) {

Uchar temp;

temp = posx & 0xf;
posy &= 0x1;
if ( posy )temp |= 0x40;
temp |= 0x80;
LcdWriteCommand(temp,0);
}

/*=======================================================
按指定位置显示数出一个字符
=======================================================*/
void DispOneChar(Uchar x,Uchar y,Uchar Wdata) {

Disp_XY( x, y ); // 定位显示地址
LcdWriteData( Wdata ); // 写字符
}

/*=======================================================
初始化程序, 必须按照产品资料介绍的初始化过程进行
=======================================================*/
void LcdReset( void ) {

LcdWriteCommand( 0x38, 0); // 显示模式设置(不检测忙信号)
Delay5Ms();
LcdWriteCommand( 0x38, 0); // 共三次
Delay5Ms();
LcdWriteCommand( 0x38, 0);
Delay5Ms();

LcdWriteCommand( 0x38, 1); // 显示模式设置(以后均检测忙信号)
LcdWriteCommand( 0x08, 1); // 显示关闭
LcdWriteCommand( 0x01, 1); // 显示清屏
LcdWriteCommand( 0x06, 1); // 显示光标移动设置
LcdWriteCommand( 0x0c, 1); // 显示开及光标设置

}

/*=======================================================
写控制字符子程序: E=1 RS=0 RW=0
=======================================================*/
void LcdWriteCommand( Uchar CMD,Uchar AttribC ) {

if (AttribC) WaitForEnable(); // 检测忙信号?

RS = 0; RW = 0; _nop_();

DataPort = CMD; _nop_();
// 送控制字子程序

Elcm = 1;_nop_();_nop_();Elcm = 0; // 操作允许脉冲信号
}

/*=======================================================
当前位置写字符子程序: E =1 RS=1 RW=0
=======================================================*/
void LcdWriteData( char dataW ) {

WaitForEnable();
// 检测忙信号

RS = 1; RW = 0; _nop_();

DataPort = dataW; _nop_();

Elcm = 1; _nop_(); _nop_(); Elcm = 0; // 操作允许脉冲信号

}

/*=======================================================
正常读写操作之前必须检测LCD控制器状态: CS=1 RS=0 RW=1
DB7: 0 LCD控制器空闲; 1 LCD控制器忙
========================================================*/
void WaitForEnable( void ) {

DataPort = 0xff;

RS =0; RW = 1; _nop_(); Elcm = 1; _nop_(); _nop_();

while( DataPort & Busy );

Elcm = 0;
}


// 短延时
void Delay5Ms(void)
{
Uint i = 5552;
while(i--);
}

//长延时
void Delay400Ms(void)
{
Uchar i = 5;
Uint j;
while(i--)
{
j=7269;
while(j--);
};
}
//==========================================================
void dislsd()
{        P0=0xff;
         lsledcs=0;
         P0=0;
        d1ms();

         /*P0=0xfd;
         d1ms();

         P0=0xfb;
         d1ms();

         P0=0xf7;
          d1ms();

         P0=0xef;
          d1ms();

         P0=0xdf;
          d1ms();

         P0=0xbf;
          d1ms();

         P0=0x7f;
          d1ms();


         P0=0xbf;
          d1ms();

         P0=0xdf;
          d1ms();

         P0=0xef;
          d1ms();


         P0=0xf7;
          d1ms();

          P0=0xfb;
          d1ms();

         P0=0xfd;
          d1ms();

         P0=0xfe;
          d1ms();*/

	lsledcs=1;






	}