i2c.c

51单片机下

//iic.c
#include <reg51.h>
#include <intrins.h>
#include "I2C.H"

bit gAck;//应答标志位
#define  _Nop()  _nop_(),_nop_(),_nop_(),_nop_()//,_nop_(),_nop_()

//短延时
void I2C_Delay(long lDly)
{
    while ( lDly ) lDly--;
}

void I2C_Init()
{
	SCL = 1;
        I2C_Delay(10);
	SDA = 1;
        I2C_Delay(10);
}

/*******************************************************************
                     起动总线函数
函数原型: void  I2C_Start();
功能:     启动I2C总线,即发送I2C起始条件

********************************************************************/
void I2C_Start()
{
  SDA = 1;   	//发送起始条件的数据信号
  _Nop();
  SCL = 1;
  _Nop();    	//起始条件建立时间大于4.7us,延时
  I2C_Delay(40);//_Nop();  _Nop();  _Nop();  _Nop();
  SDA = 0;   	//发送起始信号
  _Nop();    	// 起始条件锁定时间大于4μs
  I2C_Delay(40);//_Nop();  _Nop();  _Nop();  _Nop();
  SCL = 0;   	//钳住I2C总线，准备发送或接收数据
  _Nop();  _Nop();
}

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

  SDA = 1;  	//发送I2C总线结束信号
  I2C_Delay(40);//_Nop();  _Nop();  _Nop();  _Nop();
}

/*******************************************************************
                 字节数据发送函数
函数原型: void  I2C_SendByte(uchar uchData);
功能:     将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
          此状态位进行操作.(不应答或非应答都使ack=0)
     	  发送数据正常，ack=1; ack=0表示被控器无应答或损坏。
********************************************************************/
void  I2C_SendByte(unsigned char uchData)
{
 unsigned char uchBitCnt;

 for(uchBitCnt = 0;uchBitCnt < 8;uchBitCnt ++)  /*要传送的数据长度为8位*/
 {
     if( (uchData << uchBitCnt) & 0x80)
        SDA = 1;                //判断发送位
     else
        SDA = 0;
     _Nop();
     SCL = 1;                     //置时钟线为高，通知被控器开始接收数据
      _Nop();                     //保证时钟高电平周期大于4μs
      I2C_Delay(40);//_Nop();_Nop();_Nop();_Nop();
     SCL = 0;
  }
  _Nop();    _Nop();
  SDA = 1;                //8位发送完后释放数据线，准备接收应答位
  I2C_Delay(20);//_Nop();    _Nop();
  SCL = 1;
  I2C_Delay(30);//_Nop();    _Nop();    _Nop();
  if(SDA == 1)
     gAck=0;
  else
     gAck=1;        //判断是否接收到应答信号
  SCL = 0;
  I2C_Delay(20);//_Nop();    _Nop();
}

/*******************************************************************
                 字节数据接收函数
函数原型: unsigned char  I2C_RcvByte();
功能:  	  用来接收从器件传来的数据,并判断总线错误(不发应答信号)，
          发完后请用应答函数应答从机。
********************************************************************/
unsigned char  I2C_RcvByte()
{
  unsigned char uchRetc;
  unsigned char uchBitCnt;

  uchRetc = 0;
  SDA = 1;             		       //置数据线为输入方式
  for(uchBitCnt = 0;uchBitCnt < 8;uchBitCnt ++)
  {
        _Nop();
        SCL = 0;                       //置时钟线为低，准备接收数据位
        _Nop();                        //时钟低电平周期大于4.7μs
        I2C_Delay(40);//_Nop();  _Nop();  _Nop();  _Nop();
        SCL = 1;                       //置时钟线为高使数据线上数据有效
        I2C_Delay(20);//_Nop();  _Nop();
        uchRetc = uchRetc << 1;
        if(SDA == 1)
           uchRetc = uchRetc + 1;       //读数据位,接收的数据位放入retc中
        I2C_Delay(20);//_Nop();  _Nop();
   }
  SCL = 0;
  I2C_Delay(20);//_Nop();  _Nop();
  return uchRetc;
}

/********************************************************************
                     应答子函数
函数原型:  void Ack_I2c(bit a);
功能:      主控器进行应答信号(可以是应答或非应答信号，由位参数a决定)
********************************************************************/
void I2C_Ack(bit bData)
{

  if(bData == 0)
     SDA=0;     	       //在此发出应答或非应答信号
  else
     SDA=1;
  I2C_Delay(30);//_Nop();  _Nop();  _Nop();
  SCL = 1;
  _Nop();                      //时钟低电平周期大于4μs
  I2C_Delay(30);//_Nop();  _Nop();  _Nop();  _Nop();
  SCL = 0;                     //清时钟线，钳住I2C总线以便继续接收
  I2C_Delay(20);//_Nop();  _Nop();
}

/*******************************************************************
                    向有子地址器件发送多字节数据函数
函数原型: bit I2C_SendStr(unsigned char uchSlaveAddr,unsigned char uchSubAddr,unsigned char uchSize,unsigned char *pBuf);
功能:     从启动总线到发送地址，子地址,数据，结束总线的全过程,从器件
          地址sla，子地址suba，发送内容是s指向的内容，发送no个字节。
          如果返回1表示操作成功，否则操作有误。
注意：    使用前必须已结束总线。
********************************************************************/
bit I2C_SendStr(unsigned char uchSlaveAddr,unsigned char uchSubAddr,unsigned char uchSize,unsigned char *pSendBuf)
{
   unsigned char i;

   I2C_Start();                            //启动总线
   I2C_SendByte(uchSlaveAddr);             //发送器件地址
   if(gAck == 0)
      return(0);
   I2C_SendByte(uchSubAddr);               //发送器件子地址
   if(gAck == 0)
      return(0);

   for(i = 0;i < uchSize;i++)
   {
     I2C_SendByte(*pSendBuf);                  //发送数据
     if(gAck == 0)
        return(0);
     pSendBuf++;
   }
   I2C_Stop();                             //结束总线

   return(1);
}

/*******************************************************************
                    向有子地址器件读取多字节数据函数
函数原型: bit  ISendStr(unsigned char sla,unsigned char suba,unsigned char *s,unsigned char no);
功能:     从启动总线到发送地址，子地址,读数据，结束总线的全过程,从器件
          地址sla，子地址suba，读出的内容放入s指向的存储区，读no个字节。
           如果返回1表示操作成功，否则操作有误。
注意：    使用前必须已结束总线。
********************************************************************/
bit I2C_RcvStr(unsigned char uchSlaveAddr,unsigned char uchSubAddr,unsigned char uchSize,unsigned char *pRcvBuf)
{
   unsigned char i;

   I2C_Start();                               //启动总线
   I2C_SendByte(uchSlaveAddr);                //发送器件地址
   if(gAck == 0)
      return(0);
   I2C_SendByte(uchSubAddr);                  //发送器件子地址
   if(gAck == 0)
      return(0);

   I2C_Start();			              //重新启动总线
   I2C_SendByte(uchSlaveAddr + 1);
   if(gAck == 0)
      return(0);

   for(i = 0;i < uchSize - 1;i++)
   {
     *pRcvBuf = I2C_RcvByte();                //发送数据
      I2C_Ack(0);                             //发送数据应答位
     pRcvBuf ++;
   }
   *pRcvBuf = I2C_RcvByte();

   I2C_Ack(1);                                //发送非应位
   I2C_Stop();                                //结束总线

   return(1);
}