⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 i2c.c

📁 用ARM芯片GPIO模拟I2C程序
💻 C
字号:
uint8 ack;

/*
*********************************************************************************************************
** 函数名称 :Delay3uS()
** 函数功能 :延时软件
** 入口参数 :dly	当为1时,延时10uS,
** 出口参数 :无
*********************************************************************************************************
*/
void Delay3uS( )
{
	uint8 i;
	for (i=0; i<8; i++);
}

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

/*******************************************************************
                      结束总线函数               
函数原型: void  Stop_I2c();  
功能:       结束I2C总线,即发送I2C结束条件.
  
********************************************************************/
void Stop_I2c()
{
  IO0CLR = SDA0;  	//发送结束条件的数据信号
  Delay3uS( ); 
  Delay3uS( );  
  IO0SET = SCL0;  	//发送结束条件的时钟信号
  Delay3uS( );		//结束条件建立时间大于4μs
  Delay3uS( );
  Delay3uS( );
  Delay3uS( );
  Delay3uS( );
  Delay3uS( );
  Delay3uS( );
  IO0SET = SDA0;  			//发送I2C总线结束信号
  Delay3uS( );
  Delay3uS( ); 
  Delay3uS( );
  Delay3uS( );
  Delay3uS( );
}
/*******************************************************************
                 字节数据传送函数               
函数原型: void  SendByte(uchar c);
功能:  将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
     此状态位进行操作.(不应答或非应答都使ack=0 假)     
     发送数据正常,ack=1; ack=0表示被控器无应答或损坏。
********************************************************************/
void  SendByte( uint8 c )
{
 uint8 BitCnt;
 uint32 temp;
 
 for(BitCnt=0;BitCnt<8;BitCnt++)  /*要传送的数据长度为8位*/
    {
     if((c<<BitCnt)&0x80) IO0SET = SDA0;   /*判断发送位*/
       else IO0CLR = SDA0;                
     Delay3uS( );
     IO0SET = SCL0;               /*置时钟线为高,通知被控器开始接收数据位*/           
     Delay3uS( );  /*保证时钟高电平周期大于4μs*/ 
     Delay3uS( );
     Delay3uS( );
     Delay3uS( );
     Delay3uS( );   
     Delay3uS( );
     Delay3uS( );    
     IOCLR = SCL0; 
    }    
    Delay3uS( );
    Delay3uS( );
    Delay3uS( );
    IO0SET = SDA0;               /*8位发送完后释放数据线,准备接收应答位*/
    Delay3uS( );
	Delay3uS( ); 
	Delay3uS( );
    IO0SET = SCL0;
    Delay3uS( );
    Delay3uS( );
    Delay3uS( );
    Delay3uS( );
    	IO0SET = SDA0;				//要置1后再读
		temp = IO0DIR;				//output 
		IO0DIR = temp & ( ~ SDA0 );	//IO0DIR在该位置0为输入	

		if ( IO0PIN & SDA0 )	
		{
			ack=0;
		}	
		else ack=1;        /*判断是否接收到应答信号*/		
		
		IO0DIR = temp | SDA0;	//IO0DIR在该位置1为输出	
		
    IO0CLR = SCL0;
    Delay3uS( );
    Delay3uS( );
    Delay3uS( );
}

/*******************************************************************
                 字节数据传送函数               
函数原型: uchar  RcvByte();
功能:  用来接收从器件传来的数据,并判断总线错误(不发应答信号),
     发完后请用应答函数。  
********************************************************************/	
uint8 RcvByte()
{
  uint8 retc;
  uint8 BitCnt;
  uint32 temp;
  
  retc=0; 
  IOSET = SDA0;             /*置数据线为输入方式*/
  for(BitCnt=0;BitCnt<8;BitCnt++)
      {
        Delay3uS ( );           
        IOCLR = SCL0;       /*置时钟线为低,准备接收数据位*/      
        Delay3uS( );	 /*时钟低电平周期大于4.7μs*/
        Delay3uS( );
        Delay3uS( );
        Delay3uS( );
        Delay3uS( );
        Delay3uS( );
        Delay3uS( );
        IO0SET = SCL0;       /*置时钟线为高使数据线上数据有效*/
        Delay3uS( );
        Delay3uS( );
        Delay3uS( );
        retc=retc<<1;
        
        IO0SET =  SDA0;				//要置1后再读
		temp = IO0DIR;				//output 
		IO0DIR = temp & ( ~ SDA0 );	//IO0DIR在该位置0为输入	
		if ( IO0PIN & SDA0 )	
		{
			retc=retc+1; /*读数据位,接收的数据位放入retc中 */
		}	
		IO0DIR = temp | SDA0;	//IO0DIR在该位置1为输出	
        Delay3uS( );
        Delay3uS( );
        Delay3uS( );
      }
  IO0CLR = SCL0;    
  Delay3uS( );
  Delay3uS( );
  Delay3uS( ); 
  return retc;
}

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

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

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

   Start_I2c();               /*启动总线*/
   SendByte(sla);            /*发送器件地址*/
     if(ack==0)return(0);
   SendByte(suba);            /*发送器件子地址*/
     if(ack==0)return(0);

   for(i=0;i<no;i++)
    {   
     SendByte(*s);               /*发送数据*/
       if(ack==0)return(0);
     s++;
    } 
 Stop_I2c();                 /*结束总线*/ 
  return 1;
}
/*******************************************************************
                    向有子地址器件发送多字节数据函数(16位地址)               
函数原型: bit  ISendStr(uchar sla,uchar suba,ucahr *s,uchar no);  
功能:     从启动总线到发送地址,子地址,数据,结束总线的全过程,从器件
          地址sla,子地址suba,发送内容是s指向的内容,发送no个字节。
           如果返回1表示操作成功,否则操作有误。
注意:    使用前必须已结束总线。
********************************************************************/
uint8 ISendStrub(uint8 sla,uint32 suba,uint8 *s,uint8 no)
{
   uint8 i;
   uint8 Addr_H,Addr_L;
   Addr_L=(uint8)(suba&0x00ff);
   Addr_H=(uint8)(suba>>8);
   Start_I2c();               /*启动总线*/
   SendByte(sla);            /*发送器件地址*/
     if(ack==0)return(0);
   SendByte(Addr_H);            /*发送器件子地址*/
     if(ack==0)return(0);
   SendByte(Addr_L);            /*发送器件子地址*/
     if(ack==0)return(0);
   for(i=0;i<no;i++)
    {   
     SendByte(*s);               /*发送数据*/
       if(ack==0)return(0);
     s++;
    
//    delay1();                  /*发送一次延时*/

    } 
 Stop_I2c();                 /*结束总线*/ 
  return(1);
}

/*******************************************************************
                    向无子地址器件读字节数据函数               
函数原型: bit  IRcvByte(uchar sla,ucahr *c);  
功能:     从启动总线到发送地址,读数据,结束总线的全过程,从器件地
          址sla,返回值在c.
           如果返回1表示操作成功,否则操作有误。
注意:    使用前必须已结束总线。
********************************************************************/
uint8 IRcvByte( uint8 sla,uint8 *c)
{
   Start_I2c();                /*启动总线*/
   SendByte(sla+1);           /*发送器件地址*/
     if(ack==0)return(0);
   *c=RcvByte();               /*读取数据*/
     Ack_I2c(1);               /*发送非就答位*/
  Stop_I2c();                  /*结束总线*/ 
  return 1;
}
/*******************************************************************
                    向有子地址器件读取多字节数据函数               
函数原型: bit  ISendStr(uchar sla,uchar suba,ucahr *s,uchar no);  
功能:     从启动总线到发送地址,子地址,读数据,结束总线的全过程,从器件
          地址sla,子地址suba,读出的内容放入s指向的存储区,读no个字节。
           如果返回1表示操作成功,否则操作有误。
注意:    使用前必须已结束总线。
********************************************************************/
uint8 IRcvStr( uint8 sla,uint8 suba,uint8 *s,uint8 no)
{
   uint8 i;

   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;

   for(i=0;i<no-1;i++)
    {   
     *s=RcvByte();               //发送数据
      Ack_I2c(0);                //发送就答位  
     s++;
    } 
   *s=RcvByte();
    Ack_I2c(1);                 //发送非应位
 Stop_I2c();                    //结束总线 
  return 1;
}

/*******************************************************************
                    向有子地址器件读取多字节数据函数(16位地址)               
函数原型: bit  ISendStr(uchar sla,uchar suba,ucahr *s,uchar no);  
功能:     从启动总线到发送地址,子地址,读数据,结束总线的全过程,从器件
          地址sla,子地址suba,读出的内容放入s指向的存储区,读no个字节。
           如果返回1表示操作成功,否则操作有误。
注意:    使用前必须已结束总线。
********************************************************************/
uint8 IRcvStrub(uint8 sla,uint32 suba,uint8 *s,uint8 no)
{
   uint8 i;
   uint8 Addr_H,Addr_L;
   Addr_L=(uint8)(suba&0x00ff);
   Addr_H=(uint8)(suba>>8);
   Start_I2c();               /*启动总线*/
   SendByte(sla);            /*发送器件地址*/
     if(ack==0)return(0);
   SendByte(Addr_H);            /*发送器件子地址*/
     if(ack==0)return(0);
   SendByte(Addr_L);            /*发送器件子地址*/
     if(ack==0)return(0);

   Start_I2c();
   SendByte(sla+1);
      if(ack==0)return(0);

   for(i=0;i<no-1;i++)
    {   
     *s=RcvByte();               /*发送数据*/
      Ack_I2c(0);                /*发送就答位*/  
     s++;
    } 
   *s=RcvByte();
    Ack_I2c(1);                 /*发送非应位*/
 Stop_I2c();                    /*结束总线*/ 
  return(1);
}

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -