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

📄 24c64.c

📁 KeilC51开发,51单片机与E2PROM的接口程序,并且有串口与液晶的输出.
💻 C
字号:
🔍 
#include <reg51.h>
#include <intrins.h>
#include <24c64.h>
#include <absacc.h>
#include <stdio.h>

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




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




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



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

	return(retc);
}




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






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




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

   	subah=suba>>8;
	subal=suba & 0x00FF;
   Start_I2c();               /*启动总线*/
   SendByte(sla);            /*发送器件地址, 0xA0,0xA2,0xA4,...,0xAE*/
     if(ack==0)return(0);
   SendByte(subah);            /*发送器件子地址*/
     if(ack==0)return(0);
   SendByte(subal);            /*发送器件子地址*/
     if(ack==0)return(0);

   for(i=0;i<no;i++)
    {   
     SendByte(*s);               /*发送数据*/
       if(ack==0)return(0);
     s++;
    } 
 Stop_I2c();                 /*结束总线*/ 
  return(1);
}






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



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

   	subah=suba>>8;
	subal=suba & 0x00FF;
   Start_I2c();               /*启动总线*/
   SendByte(sla);            /*发送器件地址*/
     if(ack==0)return(0);
   SendByte(subah);            /*发送器件子地址*/
     if(ack==0)return(0);
   SendByte(subal);            /*发送器件子地址*/
     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);
}


//need improve
bit SelectAddress(Uchar caddr, Uint addr)
{
	Uchar addrh, addrl;

	addrh=addr>>8;
	addrl=addr & 0x00FF;
	Start_I2c();               /*启动总线*/
	SendByte(caddr);            /*发送器件地址*/
	if(ack==0)return(0);
	SendByte(addrh);
	if(ack==0)return(0);
	SendByte(addrl);               /*发送地址*/
	if(ack==0)return(0);
	//Stop_I2c();                 /*结束总线*/ 
	return(1);
}

Uchar ByteSend_TEST(Uchar *ch, Uchar chip)  //for test
{
	Uchar ch2;
	Uchar *ch1=&ch2;
	Uint i;

	if (ISendByte(0xA0,*ch))
	{
		ET0=0;
		printf("send\n");
		ET0=1;
	}
		else
	{
		printf("error\n");  //for test
	}
	ch=0;
	if (SelectAddress(chip, 0x1010))
	{
		ET0=0;
		printf("sel\n");  //for test
		ET0=1;
	}
		else
	{
		printf("error\n");  //for test
	}
	if (IRcvByte(0xA0,ch1))
	{
		ET0=0;
		printf("rcv\n");  //for test
		ET0=1;
	}
		else
	{
		printf("error\n");  //for test
	}
	
//	DisplayOneChar(2,0,*ch1);		//(for test)

	for (i=0;i<1000;i++);
	ET0=0; 
	printf("recieved:%c\n",*ch1);  //for test
	ET0=1;
	
//	DisplayOneChar(3,0,ch2);		//(for test)

	return(ch2);
}

void PageSend_TEST(Uchar *ch)  //for test
{
	Uint i;

	if (ISendStr(0xA0,0x1022,"abcdefg",7))
	{
		ET0=0; printf("yes1\n");   ET0=1;
	}
		else 
	{
		ET0=0; printf("error"); ET0=1;
	}
	for (i=0;i<7;i++)
	{
		if (IRcvStr(0xA0,0x1022,ch,7))
		{
			ET0=0; printf("yes2\n");	ET0=1;
		}
	}
	ET0=0; printf("ch=%s\n",ch);   ET0=1;
	ET0=0;
	ET0=1;
}

⌨️ 快捷键说明

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