a.c

24C16的驱动

#pragma  ot(6,SIZE)
#include <reg52.h>
#include <intrins.h>
#define  ERRORCOUNT 10
#define uchar unsigned char
#define uint unsigned int
sbit     SDA=P0^0;
sbit     SCL=P0^1;
sbit     wp=P0^2;
enum  eepromtype  {M2401,M2402,M2404,M2408,M2416,M2432,M2464,M24128,M24256};
enum  eepromtype EepromType;

//EepromType为枚举变量,需为M2401至M24256中的一种,分别对应24C01至24C256;
//函数返回值为一个位变量，若返回1表示此次操作失效，0表示操作成功;
//ERRORCOUNT为允许最大次数，若出现ERRORCOUNT次操作失效后，则函数中止操作，并返回1
//SDA和SCL由用户自定义，这里暂定义为P0^0和P0^1;
//其余的用户不用管，只要把只子程序放在你的程序中并调用它就可以了;






bit   RW24XX(uchar *DataBuff,uchar ByteQuantity,uint Address,       //ByteQuantity为字节数， Address为word addr
                     uchar ControlByte,enum eepromtype EepromType)     //ControlByte为device addr，DataBuf为要写入或读出的数组的指针
{
void Delay(unsigned char DelayCount);//函数声明
void IICStart(void);
void IICStop(void);
bit  IICRecAck(void);
void IICNoAck(void);
void IICAck(void);
unsigned char IICReceiveByte(void);
void IICSendByte(unsigned char sendbyte);

uchar data j,i=ERRORCOUNT;
bit      errorflag=1;        //作为无回应的标志，1则无回应，0则正常


while(i--)                                      //读或写，有10次机会
      {
       IICStart();
       IICSendByte(ControlByte&0xfe);
       if(IICRecAck())   continue;         //如果无回复，则大循环重来
   
       if(EepromType>M2416){
                         IICSendByte((uchar)(Address>>8));
                        if(IICRecAck())
                         continue;
                          }
                          
       IICSendByte((uchar)Address);
   
       if(IICRecAck())   continue;       //如果无回复，则大循环重来
               
               
               
      if(!(ControlByte&0x01))       //pagewrite发送数据
                 {j=ByteQuantity;
                  errorflag=0;                      //********clr errorflag
                  while(j--) { IICSendByte(*DataBuff++);
                              if(!IICRecAck())    continue;     //如果有回复，则发数据循环重来，继续发
                              errorflag=1;                   //如果无回复，则跳出发数据循环
                               break;
                                }
                  if(errorflag==1)  continue;       //如果无回复，则发数据循环重来
                   break;
                   }
      else                          //randamn  read
             { IICStart();
               IICSendByte(ControlByte);
               if(IICRecAck()) continue;
               while(--ByteQuantity)        //先读入ByteQuantity-1个字节
                   {*DataBuff++=IICReceiveByte();
                    IICAck();
                     }
              *DataBuff=IICReceiveByte();        //再读入最后一个字节
               IICNoAck();
               errorflag=0;
               break;
              }
      }
  
IICStop();
if(!(ControlByte&0x01))   //若是写，则delay
  {
  Delay(255);
  Delay(255);
  Delay(255);
  Delay(255);
  }
return(errorflag);
}









/*****************以下是对IIC总线的操作子程序***/
/*****************启动总线**********************/
void IICStart(void)
{
SCL=0;                  //
SDA=1;
SCL=1;
_nop_();
_nop_();
_nop_();
SDA=0;
_nop_();
_nop_();
_nop_();
_nop_();
SCL=0;
SDA=1;                  //
}









/*****************停止IIC总线****************/
void IICStop(void)
{
SCL=0;
SDA=0;
SCL=1;
_nop_();
_nop_();
_nop_();
SDA=1;
_nop_();
_nop_();
_nop_();
SCL=0;
}








/**************检查应答位*******************/
bit IICRecAck(void)
{
SCL=0;
SDA=1;
SCL=1;
_nop_();
_nop_();
_nop_();
_nop_();
CY=SDA;                 //因为返回值总是放在CY中的
SCL=0;
return(CY);
}




/***************对IIC总线产生应答*******************/
void IICACK(void)
{
SDA=0;
SCL=1;
_nop_();
_nop_();
_nop_();
_nop_();
SCL=0;
_nop_();
SDA=1;
}





/*****************不对IIC总线产生应答***************/
void IICNoAck(void)
{
SDA=1;
SCL=1;
_nop_();
_nop_();
_nop_();
_nop_();
SCL=0;
}




/*******************向IIC总线写数据*********************/
void IICSendByte(unsigned char sendbyte)
{
unsigned char data j=8;
for(;j>0;j--)
   {
   SCL=0;
   sendbyte<<=1;        //无论C51怎样实现这个操作，始终会使CY=sendbyte^7;
   SDA=CY;
   SCL=1;
   }
SCL=0;
}





/**********************从IIC总线上读数据子程序**********/
unsigned char IICReceiveByte(void)
{
register receivebyte,i=8;
SCL=0;
while(i--)
   {
   SCL=1;
   receivebyte=(receivebyte<<1)|SDA;
   SCL=0;
   }
return(receivebyte);
}




/***************一个简单延时程序************************/
void Delay(unsigned char DelayCount)
{
while(DelayCount--);
}


void elay(uchar i)              //延时
{  int t;
  for(;i>0;i--) for(t=0;t<10000;t++);
}
   






 
void main()
{uchar myd[16]={0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0a,0x0b,0x0c,0x0d,0x0e,0x0f},myRead[16]={0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0},i;
 SCON=0x40;
 PCON=0x00;
 TMOD=0x20;
 TCON=0x00;
 TH1=0xfd;
 TL1=0xfd;
 TR1=1;
 wp=0;

RW24XX(myd,16,0,0xa0,M2416);      //写，
RW24XX(myRead,16,0,0xa1,M2416);   //读


 while(1){ for(i=0;i<16;i++){ SBUF=myRead[i];elay(5);}}
}