I2C总线(主)C51源程序

sfr IIC_CON  = 0xA0;
 sbit WP  = IIC_CON^5;

sfr IIC_INTER = 0x90;
 sbit SCL  = IIC_INTER^6;
 sbit SDA  = IIC_INTER^7;

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

void DelayMs(unsigned char i)
{
 unsigned int count;
 for(i;i!=0;i--)for(count=6;count!=0;count--);
}
/***********************************************************************/
/*名称: IIC_Start()
/*说明: 启动I2C总线,即发送I2C起始条件.
/*输入: 无 
/*输出: 无
/***********************************************************************/ 
void IIC_Start(void)
{
 SCL=1; DelayMs(1);
 SDA=1; DelayMs(1);    
 SDA=0; DelayMs(1);     /*发送起始信号*/
 SCL=0; DelayMs(1);     /*钳住I2C总线，准备发送或接收数据 */

} 
/***********************************************************************/
/*名称: IIC_Stop()
/*说明: 结束I2C总线,即发送I2C结束条件.
/*输入: 无 
/*输出: 无
/***********************************************************************/ 
void IIC_Stop(void)
{             
 SCL=1; DelayMs(1);     /*发送结束条件的时钟信号*/
 SDA=0; DelayMs(1);
 SDA=1; DelayMs(1);     /*发送I2C总线结束信号*/
 SCL=0; DelayMs(1);        
 
}
/***********************************************************************/
/*名称: IIC_DataSend()
/*说明: 将数据c发送出去,可以是地址,也可以是数据,发完后等待应答,并对
        此状态位进行操作.(不应答或非应答都使ack=0)     
      ack=1表示发送数据正常; ack=0表示被控器无应答或损坏。
/*输入: cmd 要输入的指令数据 
/*输出: 无
/***********************************************************************/ 
void IIC_DataSend(unsigned char byte)  
{
 unsigned char BitCnt;
 
 for(BitCnt=0;BitCnt<8;BitCnt++)  /*要传送的数据长度为8位*/
 {
  if(byte&0x80)
   SDA=1;        /*判断发送位*/
  else  
   SDA=0;                
  DelayMs(1);
  SCL=1; DelayMs(1);    /*置时钟线为高，通知被控器开始发送数据位*/        
  SCL=0; DelayMs(1);
  byte = byte<<1;
 }  
 SDA=0; DelayMs(1);      /*8位发送完后释放数据线，准备接收应答位*/  
 SCL=1; DelayMs(1);
 if(SDA==1)
  ack=0;     
 else 
  ack=1;       /*判断是否接收到应答信号*/
 SCL=0; DelayMs(1);
}

/***********************************************************************/
/*名称: IIC_DataRcv()
/*说明: 用来接收从器件传来的数据,并判断总线错误(不发应答信号)，
        发完后请用应答函数应答从机。
/*输入: 无
/*输出: 从器件传来的数据
/***********************************************************************/ 
unsigned char IIC_DataRcv(void)  
{
 unsigned char BitCnt,Result = 0;

 SDA=1;        /*置数据线为输入方式*/
 for(BitCnt=0;BitCnt<8;BitCnt++)
 {
  SCL=0; DelayMs(1);    /*置时钟线为低，准备接收数据位*/      
  SCL=1; DelayMs(1);    /*置时钟线为高使数据线上数据有效*/
  Result <<= 1;
  if(SDA)
   Result++;     /*读数据位,接收的数据位放入Result中 */
 }
 SCL=0; DelayMs(1);    
 return Result;
}

/***********************************************************************/
/*名称: IIC_Ack()
/*说明: 主控器进行应答信号(可以是应答或非应答信号，由位参数a决定)
/*输入: 应答信号
/*输出: 无
/***********************************************************************/ 
void IIC_Ack(bit a)
{ 
 if(a)
    SDA=1;       /*在此发出应答或非应答信号 */
 else
  SDA=0;
 Delay(20);     
 SCL=1; DelayMs(1);     /*时钟低电平周期大于4μs*/       
 SCL=0; DelayMs(1);     /*清时钟线，钳住I2C总线以便继续接收*/
 
}

/***********************************************************************/
/*名称: IIC_StrWrite()
/*说明: 向有子地址器件发送多字节数据程序
/*输入: addrh 存储器子地址高8位 
/*  addrl 存储器子地址低8位
/*  *str 数据指针
/*  length 数据长度
/*输出: 写入是否成功
/***********************************************************************/ 
bit IIC_ByteWrite(unsigned char addrh,unsigned char addrl,unsigned char byte)
{ 
 WP = 0;
    IIC_Start();      /*启动总线*/
 IIC_DataSend(ROMADDRESS);   /*发送器件地址*/
 if(ack==0)return(0);
 IIC_DataSend(addrh);    /*发送存储器子地址高8位*/
 if(ack==0)return(0);
 IIC_DataSend(addrl);    /*发送存储器子地址低8位*/
 if(ack==0)return(0);  
 IIC_DataSend(byte);     /*发送数据*/
 if(ack==0)return(0);
 IIC_Stop();       /*结束总线*/ 
 DelayMs(100);
 WP = 1;
 return(1);
}

/***********************************************************************/
/*名称: IIC_StrWrite()
/*说明: 向有子地址器件发送多字节数据程序
/*输入: addrh 存储器子地址高8位 
/*  addrl 存储器子地址低8位
/*  *str 数据指针
/*  length 数据长度
/*输出: 写入是否成功
/***********************************************************************/ 
bit IIC_StrWrite(unsigned char addrh,unsigned char addrl,unsigned char *str,unsigned char length)
{ 
 unsigned char i;

 WP = 0;
    IIC_Start();      /*启动总线*/
 IIC_DataSend(ROMADDRESS);   /*发送器件地址*/
 if(ack==0)return(0);
 IIC_DataSend(addrh);    /*发送存储器子地址高8位*/
 if(ack==0)return(0);
 IIC_DataSend(addrl);    /*发送存储器子地址低8位*/
 if(ack==0)return(0);
 
 for(i=0;i  {   
  IIC_DataSend(*(str++));   /*发送数据*/
  if(ack==0)return(0);
 } 
 IIC_Stop();       /*结束总线*/ 
 DelayMs(100);
 WP = 1;
 return(1);
}

/***********************************************************************/
/*名称: IIC_ByteRead()
/*说明: 向有子地址器件读取单字节数据程序
/*输入: addrh 存储器子地址高8位 
/*  addrl 存储器子地址低8位
/*输出: 读取的数据
/***********************************************************************/ 
bit IIC_ByteRead(unsigned char addrh,unsigned char addrl,unsigned char byte)
{
 IIC_Start();      /*启动总线*/
 IIC_DataSend(ROMADDRESS);   /*发送器件地址*/
 if(ack==0)return(0);
 IIC_DataSend(addrh);    /*发送存储器子地址高8位*/
 if(ack==0)return(0);
 IIC_DataSend(addrl);    /*发送存储器子地址低8位*/
 if(ack==0)return(0);

 IIC_Start();      /*重新启动总线*/
    IIC_DataSend(ROMADDRESS+1);   /*设置读*/
 if(ack==0)return(0);
 byte = IIC_DataRcv();    /*读取数据*/
 IIC_Ack(1);       /*发送非应位*/
 IIC_Stop();       /*结束总线*/
 DelayMs(100);
 return(1);   
}

/***********************************************************************/
/*名称: IIC_StrRead()
/*说明: 向有子地址器件发送多字节数据程序
/*输入: addrh 存储器子地址高8位 
/*  addrl 存储器子地址低8位
/*输出: 读取是否成功
/***********************************************************************/ 
bit IIC_StrRead(unsigned char addrh,unsigned char addrl,unsigned char *str,unsigned char length)
{
    unsigned char i;

 IIC_Start();      /*启动总线*/
 IIC_DataSend(ROMADDRESS);   /*发送器件地址*/
 if(ack==0)return(0);
 IIC_DataSend(addrh);    /*发送存储器子地址高8位*/
 if(ack==0)return(0);
 IIC_DataSend(addrl);    /*发送存储器子地址低8位*/
 if(ack==0)return(0);

 IIC_Start();      /*重新启动总线*/
    IIC_DataSend(ROMADDRESS+1);   /*设置读*/
 if(ack==0)return(0);
 for(i=0;i  {   
  *(str++) = IIC_DataRcv();  /*读取数据*/
  IIC_Ack(0);      /*发送就答位*/  
 } 
 *str=IIC_DataRcv();     /*读取数据*/
 IIC_Ack(1);       /*发送非应位*/
 IIC_Stop();       /*结束总线*/
 DelayMs(100);
 return(1);   
}