ymxiic.bak

i2clCD仿真.rari2clCD仿真 i2clCD仿真 i2clCD仿真

#include <AT89X51.h>          /*头文件的包含*/
#include <intrins.h>
#define  uchar unsigned char /*宏定义*/
#define  uint  unsigned int

sbit SDA=P2^6;            /*模拟I2C数据传送位*/
sbit SCL=P2^7;            /*模拟I2C时钟控制位*/

bit ack;	         /*应答标志位*/
void delayus(unsigned char i)
{
	while(i--);
}   
void Start_I2c()
{
	SDA=1;        /*发送起始条件的数据信号*/
	delayus(10); 
	SCL=1;
        delayus(14);    /*起始条件建立时间大于4.7us,延时*/  
        SDA=0;        /*发送起始信号*/
  	delayus(14);    /* 起始条件锁定时间大于4μs*/
        SCL=0;        /*钳住I2C总线，准备发送或接收数据 */
 	delayus(10); 
}

void Stop_I2c()
{
  	SDA=0;  /*发送结束条件的数据信号*/
	delayus(10); /*发送结束条件的时钟信号*/
  	SCL=1;  /*结束条件建立时间大于4μs*/
	delayus(14);
  	SDA=1;  /*发送I2C总线结束信号*/
	delayus(10);
}

/*******************************************************************
                 字节数据传送函数               
函数原型: 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;                  
     	delayus(6);
     	SCL=1;               /*置时钟线为高，通知被控器开始接收数据位*/ 
     	delayus(14);               /*保证时钟高电平周期大于4μs*/        
     	SCL=0; 
	delayus(8); 
    }
    
	delayus(8);
        SDA=1;
	delayus(8);               /*8位发送完后释放数据线，准备接收应答位*/   
        SCL=1;
	delayus(10);
    if(SDA==1)ack=0;     
        else ack=1;        /*判断是否接收到应答信号*/
        SCL=0;
	delayus(8);
}

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

        SCL=1;       /*置时钟线为高使数据线上数据有效*/
		delayus(8);
        retc=retc<<1;
        if(SDA==1)retc=retc+1; /*读数据位,接收的数据位放入retc中 */
		delayus(10);
    }
	SCL=0;    
	delayus(8);
  	return(retc);
}

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

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

/*******************************************************************
                    向有子地址器件读取多字节数据函数               
函数原型: bit  ISendStr(uchar sla,uchar suba,ucahr *s,uchar no);  
功能:     从启动总线到发送地址，子地址,读数据，结束总线的全过程,从器件
          地址sla，子地址suba，读出的内容放入s指向的存储区，读no个字节。
           如果返回1表示操作成功，否则操作有误。
注意：    使用前必须已结束总线。
********************************************************************/
bit IRcvStr(uchar sla,uchar suba,uchar *s,uchar no)
{
   uchar 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);
}
void main(void)
{
uchar r[4]={1,2,3,4},k;
bit t;
uchar b[4]={0};

t= ISendStr(0xa0,0x20,r,4);

t= IRcvStr(0xa0,0x20,b,4);

k=b[0]+b[1]+b[2]+b[3];
if(k==10)
P0=0x06;
else
P0=0x5b;
while(1)
	{

	P2_0=0;
	}
}





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

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

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