text3.c

菜鸟板的时钟 第一次学51

#include <reg51.h>//加载头文件
#include <intrins.H>//装载
#define uchar unsigned char//变量类型的宏定义
#define uint unsigned int//变量类型的宏定义
#define  SET    5
#define  MON   4
#define  DAY    3
#define  HOU    2
#define  MIN    1
#define  PCF8583  0XA0
#define  _Nop()  _nop_()        /*定义空指令*/
sbit SDA=P1^7;            /*模拟I2C数据传送位*/
sbit SCL=P1^6;            /*模拟I2C时钟控制位*/

                                                 /*状态标志*/
bit ack;          /*应答标志位*/

uchar SEG7[10]={0x03,0x9f,0x25,0x0d,0x99,0x49,0x41,0x1f,0x01,0x09};/*0~9的数码管段码*/

uchar act[12]={0x01,0x02,0x04,0x08,0x10,0x20,0x40,0x80,0x04,0x08,0x10,0x20};//12位数码管位码；   

uchar MS,mon,day,hou,min,sec;
uchar key;
uchar discnt;
uint cnt,time_cnt;
sbit MSKEY=P0^5; /*功能键标志*/
sbit MONKEY=P0^4;//月按键
sbit DAYKEY=P0^3;//天按键
sbit HOUKEY=P0^2;//时按键
sbit MINKEY=P0^1;//分按键
//sbit CHECKKEY=P3^0;//查询按键
sbit CLK=P1^0;
sbit  DATA=P1^1;

void TIMERIni(void);
void menu(void);
void delay(uint k);
void keyboard(void);
void send164(uchar m);
void dis_time(uchar m);
void dis_adjtime(uchar m);
uchar IRcvByte(uchar sla,uchar suba);
bit ISendByte(uchar sla,uchar suba,uchar c);
void Ack_I2c(bit a);
uchar  RcvByte(void);
void  SendByte(uchar c);
void Stop_I2c(void);
void Start_I2c(void);




uchar convert_BCD(uchar i)
{ 
     uchar i1,i2;
	 i1=i%10;
	 i2=i/10; 
	i2=i2<<4;
	 i=i2+i1;
	 return i;
}

void menu(void)//扫描按键子函数
{
        uchar i;
       if(key==SET)
	   	{MS++;
	          if(MS==2)
			  	{MS=0;
			          i=convert_BCD(min);
			         ISendByte(PCF8583, 0X03,i);
				   i=convert_BCD(hou);
				   ISendByte(PCF8583, 0X04, i);
				   i=convert_BCD(day);
				   ISendByte(PCF8583, 0x05, i);
				   i=convert_BCD(mon);
				   ISendByte(PCF8583, 0x06, i);
	          	          }
	          }// 调整模式
       if(MS==1)
	   	 {
                       switch(key)
                       	{ 
                                case (MIN):{min++;if(min>=60)min=0;;}break;
				    case (HOU):{hou++;if(hou>23)hou=0;;} break;
                                 case(DAY):{day++;if(day>31)day=1;;}break;
                                case(MON):{mon++;if(mon>12)mon=1;;}break;
					default:break;
                       	}
       	}
	   key=0;
		  
}

void delay(uint k)
{
    uint i,j;
    for(i=0;i<k;i++)
		{
                 for(j=0;j<1000;j++) ;
               }
}

void keyboard(void)
{   
    P0=0X3F;
     if((P0&0x02)==0)
     	 {  delay(5);
	     while((P0&0x02)==0);
		   key=MIN;
     	  }
	 else 
	 	if((P0&0x04)==0)
     	            {  
     	              delay(5);
	               while((P0&0x04)==0);
		        key=HOU;
     	             } 
		   else 
	 	         if((P0&0x08)==0)
     	                       {  
     	                       delay(5);
	                       while((P0&0x08)==0);
		                 key=DAY;
     	                        } 
				 else
	 	                      if((P0&0x10)==0)
     	                                {  
     	                                   delay(5);
	                                   while((P0&0x10)==0);
		                           key=MON;
     	                                 } 
							  else
	 	                                  if((P0&0x20)==0)
     	                                           {  
     	                                              delay(5);
	                                              while((P0&0x20)==0);
		                                       key=SET;
     	                                             } 
}

	
	

void time0(void) interrupt 1 
{
	TH0=0xF4;TL0=0x48;
       if(discnt>11)discnt=0;// 显示为12位数码管
       if(cnt>200)cnt=0;// 调整时的闪烁周期
       switch(MS)
         {
            case 0:{dis_time(discnt);}break;// 显示走时
            case 1:{dis_adjtime(discnt);}break;// 显示调时
            default: break;
     	}
	   discnt++;cnt++;
          
}

void time1(void) interrupt 3    //50ms
{uchar temp1,temp2,temp;
   TH1=0X3C;TL1=0XAF;
    time_cnt++;
	if(time_cnt>=20)//  1秒钟计时时间到，读PCF8583的各寄存器的值
		{   time_cnt=0;
		    temp=IRcvByte(PCF8583, 0X02);
			temp1=temp>>4;temp2=temp*0x0f;
		     sec=temp1*10+temp2;
		    temp=IRcvByte(PCF8583, 0X03);
			temp1=temp>>4;temp2=temp*0x0f;
		     min=temp1*10+temp2;
		    temp=IRcvByte(PCF8583, 0X04);
			temp1=temp>>4;temp2=temp*0x0f;
		     hou=temp1*10+temp2;
		    temp=IRcvByte(PCF8583, 0X05);
			temp1=temp>>4;temp2=temp*0x0f;
		     day=temp1*10+temp2;
		    temp=IRcvByte(PCF8583, 0X06);
			temp1=temp>>4;temp2=temp*0x0f;
		     mon=temp1*10+temp2;
		}
}



void send164(uchar m)
{uchar k,i,b;
k=SEG7[m];
i=8;
CLK=0;
while (i--)
	{b=k>>i;
    if((b&0x01)==0x01)DATA=1;//判断b的最低位的值是多少
      else  DATA=0;
     CLK=1; _nop_();
    CLK=0;
     } 
	
}
                                    //P2 KOU                                                 //P1kou
void dis_time(uchar m)
{
   P1&=0XC3;/// 等价于 P1=P1&0xc3；；准备送段码  ，位码口全部清零
   P2=0X00;////准备送段码，位码口全部清零
  	 {switch(m)
	     {case 0:{send164(mon/10);P2|=act[m];P1&=0XC3;}break;
	       case 1:{send164(mon%10);P2|=act[m];P1&=0XC3;}break;
	       case 2:{send164(day/10);P2|=act[m];P1&=0XC3;}break;
	       case 3:{send164(day%10);P2|=act[m];P1&=0XC3;}break;
	       case 4:{send164(hou/10);P2|=act[m];P1&=0XC3;}break;
	        case 5:{send164(hou%10);P2|=act[m];P1&=0XC3;}break;
	        case 6:{send164(min/10);P2|=act[m];P1&=0XC3;}break;
	        case 7:{send164(min%10);P2|=act[m];P1&=0XC3;}break;
	        case 8:{send164(sec%10);P1|=act[m];P2=0X00;}break;
	        case 9:{send164(sec/10);P1|=act[m];P2=0X00;}break;
	        case 10:{send164(0);P1|=act[m];P2=0X00;}break;
	        case 11:{send164(0);P1|=act[m];P2=0X00;}break;
	        default:break;}
   	      }

}


void dis_adjtime(uchar m)
{  
     if(cnt>100)
     	{ 
            P1&=0XC3;
           P2=0X00;
		 	switch(m)
	                {case 0:{send164(mon/10);P2|=act[m];P1&=0XC3;}break;
	              case 1:{send164(mon%10);P2|=act[m];P1&=0XC3;}break;
	              case 2:{send164(day/10);P2|=act[m];P1&=0XC3;}break;
	              case 3:{send164(day%10);P2|=act[m];P1&=0XC3;}break;
	               case 4:{send164(hou/10);P2|=act[m];P1&=0XC3;}break;
	               case 5:{send164(hou%10);P2|=act[m];P1&=0XC3;}break;
	                case 6:{send164(min/10);P2|=act[m];P1&=0XC3;}break;
	                case 7:{send164(min%10);P2|=act[m];P1&=0XC3;}break;
	                case 8:{send164(0);P1&=act[m];P2=0X00;}break;
	                case 9:{send164(0);P1&=act[m];P2=0X00;}break;
	                case 10:{send164(0);P1&=act[m];P2=0X00;}break;
	               case 11:{send164(0);P1&=act[m];P2=0X00;}break;
	                  default:break;
					  }
   	      }
      else 
      	{  
            P1&=0XC3;
           P2=0X00;
      	}
}


void TIMERIni(void)
{
       TMOD=0X11;
	TH0=0xF4;TL0=0x48;TH1=0X3C;TL1=0XAF;
       EA=1;
        ET0=1;
        ET1=1;
       TR1=1;TR0=1;
}



 
   
/*******************************************************************
                     起动总线函数               
函数原型: void  Start_I2c();  
功能:       启动I2C总线,即发送I2C起始条件.
  
********************************************************************/
void Start_I2c(void)
{
  SDA=1;   /*发送起始条件的数据信号*/
  _Nop();
  _Nop();
  SCL=1;
  _Nop();    /*起始条件建立时间大于4.7us,延时*/
  _Nop();
  _Nop();
  _Nop();
  _Nop(); 
  _Nop();    /*起始条件建立时间大于4.7us,延时*/
  _Nop();
  _Nop();
  _Nop();
  _Nop();    
  SDA=0;   /*发送起始信号*/
  _Nop();    /* 起始条件锁定时间大于4μs*/
  _Nop();
  _Nop();
  _Nop();
  _Nop(); 
  _Nop();    /*起始条件建立时间大于4.7us,延时*/
  _Nop();
  _Nop();
  _Nop();
  _Nop();       
  SCL=0;   /*钳住I2C总线，准备发送或接收数据 */
  _Nop();
  _Nop();
  _Nop();
  _Nop();
}

 


/*******************************************************************
                      结束总线函数               
函数原型: void  Stop_I2c();  
功能:       结束I2C总线,即发送I2C结束条件.
  
********************************************************************/
void Stop_I2c(void)
{
  SDA=0;  /*发送结束条件的数据信号*/
  _Nop();   /*发送结束条件的时钟信号*/
  _Nop();   /*发送结束条件的时钟信号*/
  SCL=1;  /*结束条件建立时间大于4μs*/
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  SDA=1;  /*发送I2C总线结束信号*/
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  _Nop();
}

 


/*******************************************************************
                 字节数据传送函数               
函数原型: void  SendByte(uchar c);
功能:  将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
     此状态位进行操作.(不应答或非应答都使ack=0 假)     
     发送数据正常，ack=1; ack=0表示被控器无应答或损坏。
********************************************************************/
void  SendByte(uchar c)
{
 uchar BitCnt;
 
 for(BitCnt=0;BitCnt<8;BitCnt++)  /*要传送的数据长度为8位*/
    {
     if((c<<BitCnt)&0x80)SDA=1;   /*判断发送位*/
       else  SDA=0;                
     _Nop();
  _Nop();
     SCL=1;               /*置时钟线为高，通知被控器开始接收数据位*/
      _Nop(); 
      _Nop();               /*保证时钟高电平周期大于4μs*/
      _Nop();
      _Nop();
      _Nop();  
   _Nop(); 
      _Nop();               /*保证时钟高电平周期大于4μs*/
      _Nop();
      _Nop();
      _Nop();          
     SCL=0; 
    }
    
    _Nop();
    _Nop();
 _Nop();
    _Nop();
    SDA=1;               /*8位发送完后释放数据线，准备接收应答位*/
    
 _Nop();
    _Nop(); 
 _Nop();
    _Nop();   
    SCL=1;
    _Nop();
    _Nop();
    _Nop();
  _Nop();
    _Nop();
    _Nop();
    if(SDA==1)ack=0;     
       else ack=1;        /*判断是否接收到应答信号*/
    SCL=0;
    _Nop();
    _Nop();
 _Nop();
    _Nop();
}

 

 


/*******************************************************************
                 字节数据传送函数               
函数原型: uchar  RcvByte();
功能:  用来接收从器件传来的数据,并判断总线错误(不发应答信号)，
     发完后请用应答函数。  
********************************************************************/ 
uchar  RcvByte(void)
{
  uchar retc;
  uchar BitCnt;
  
  retc=0; 
  SDA=1;             /*置数据线为输入方式*/
  for(BitCnt=0;BitCnt<8;BitCnt++)
      {
        _Nop(); 
  _Nop();           
        SCL=0;       /*置时钟线为低，准备接收数据位*/
        _Nop();
        _Nop();         /*时钟低电平周期大于4.7μs*/
        _Nop();
        _Nop();
        _Nop();
  _Nop();
        _Nop();         /*时钟低电平周期大于4.7μs*/
        _Nop();
        _Nop();
        _Nop();
        SCL=1;       /*置时钟线为高使数据线上数据有效*/
        _Nop();
        _Nop();
    _Nop();
        _Nop();
        retc=retc<<1;
        if(SDA==1)retc=retc+1; /*读数据位,接收的数据位放入retc中 */
        _Nop();
        _Nop(); 
  _Nop();
        _Nop(); 
      }
  SCL=0;    
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  return(retc);
}

 


/********************************************************************
                     应答子函数
原型:  void Ack_I2c(bit a);
 
功能:主控器进行应答信号,(可以是应答或非应答信号)
********************************************************************/
void Ack_I2c(bit a)
{
  
  if(a==0)SDA=0;     /*在此发出应答或非应答信号 */
        else SDA=1;
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  _Nop();
  _Nop();         
  SCL=1;
    _Nop();
    _Nop();              /*时钟低电平周期大于4μs*/
    _Nop();
    _Nop();
    _Nop(); 
  _Nop();
    _Nop();              /*时钟低电平周期大于4μs*/
    _Nop();
    _Nop();
    _Nop();  
 SCL=0;                /*清时钟线，钳住I2C总线以便继续接收*/
    _Nop();
    _Nop();  
 _Nop();
    _Nop();   
}

/*******************************************************************
                    向有子地址器件发送字节数据函数               
函数原型: bit  ISendByte(uchar sla,ucahr c);  
功能:     从启动总线到发送地址，数据，结束总线的全过程,从器件地址sla.
           如果返回1表示操作成功，否则操作有误。
注意：    使用前必须已结束总线。
********************************************************************/
bit ISendByte(uchar sla,uchar suba,uchar c)
{
   Start_I2c();               /*启动总线*/
   SendByte(sla);            /*发送器件地址*/
     if(ack==0)return(0);
  SendByte(suba);            /*发送器件地址*/
     if(ack==0)return(0);
   SendByte(c);               /*发送数据*/
     if(ack==0)return(0);
  Stop_I2c();                 /*结束总线*/ 
  return(1);
}

/*******************************************************************
                    向有子地址器件读字节数据函数               
函数原型: bit  IRcvByte(uchar sla,ucahr *c);  
功能:     从启动总线到发送地址，读数据，结束总线的全过程,从器件地
          址sla，返回值在c.
           如果返回1表示操作成功，否则操作有误。
注意：    使用前必须已结束总线。
********************************************************************/
uchar IRcvByte(uchar sla,uchar suba)
{
uchar c;
   Start_I2c();                /*启动总线*/
   SendByte(sla);           /*发送器件地址*/
     if(ack==0)return(0);
   SendByte(suba);           /*发送子器件地址*/
     if(ack==0)return(0);

  Start_I2c();

 SendByte(sla+1);           /*发读器件地址*/
     if(ack==0)return(0);
   c=RcvByte();               /*读取数据*/
     Ack_I2c(1);               /*发送非就答位*/
  Stop_I2c();                  /*结束总线*/ 
  return c;
}





void main(void)
{  
     TIMERIni();
      ISendByte( PCF8583, 0x00, 0x08);

      while(1)
      	{
            keyboard();
	      if(key>0)
	      	{
                  menu();
	      	}

		
      	}
}