iic.h

设计一电子钟

/*****************************************
File: IIC
Description:

*****************************************/

       
#include <reg52.h>          /*头文件的包含*/
#include <intrins.h>	    /*用 nop_ 必须包含*/
#include <define.h>	  

#define  _Nop()  _nop_()    /*定义空指令*/

/* 常,变量定义区 */
 
/*端口位定义*/
sbit SDA=P2^7;            /*模拟I2C数据传送位*/
sbit SCL=P2^6;            /*模拟I2C时钟控制位*/


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

 


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

/*******************************************************************
判断丛机应答函数               
函数原型: void Response()
功能: 当SDA为0或超时，默认为有应答
********************************************************************/
void Response()
{
  uchar i;
  SDA=1;
  delay_us(5);
  SCL=1;
  delay_us(5);
  while((SDA==1)&&(i<250))i++ ;
  SCL=0;
  delay_us(5);
	
}

/*******************************************************************
字节数据传送函数               
函数原型: 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;   /*判断发送位,CF......  */
     else  SDA=0;                
     delay_us(1);
     SCL=1;               /*置时钟线为高，通知被控器开始接收数据位*/
     delay_us(5);              /*保证时钟高电平周期大于4μs*/
     SCL=0; 
    }
    delay_us(2);

   
}

 

 


/*******************************************************************
                 字节数据传送函数               
函数原型: uchar  RcvByte();
功能:  用来接收从器件传来的数据,并判断总线错误(不发应答信号)，
     发完后请用应答函数。  
********************************************************************/ 
uchar  RcvByte()
{
  uchar i,j,k;
  
  SCL=0;
  delay_us(5);
  SDA=1;             /*置数据线为输入方式*/
  delay_us(5);
  for(i=0;i<8;i++)
      {
        
        SCL=1;       /*置时钟线为低，准备接收数据位*/
        delay_us(6);        /*时钟低电平周期大于4.7μs*/
        
        j=SDA;
        k=(k<<1)|j;
		SCL=0;
        delay_us(5);
      }
  
  return  k;
}

 


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

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

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

   Start_I2c();

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

 /*    完毕      */