/* 以下為AT24C01～AT24C256的讀寫程序，各人可根據(jù)自己的需要應(yīng)用。
在buf1中填入需要寫入的內(nèi)容，buf2的大小可根據(jù)需要定義。
addr可根據(jù)使用的芯片選擇，可從任何位置讀寫，只要在該芯片的范圍內(nèi)。
enumer=ATxxx，根據(jù)使用的芯片賦值。各函數(shù)中的形式參數(shù)不需改變。
本程序只要在調(diào)用的程序中定義實際參數(shù)即可，下述各子程序不必改動。*/

#include <reg52.h>
#include <intrins.h>
#define  ERROR 10     //允許ERROR的最大次數(shù)      
sbit     SDA=P3^0;
sbit     SCL=P3^1;
enum  eepromtype {AT2401,AT2402,AT2404,AT2408,AT2416,AT2432,AT2464,AT24128,AT24256};/*器件的型號*/
enum  eepromtype enumer;   //定義一個枚舉變量
unsigned char code buf1 []={1,3,5,7,9,10,11,12,13,15}; /* 發(fā)送緩沖區(qū) */
unsigned char buf2 [10]; /* 接收緩沖區(qū) */

/* 一個通用的24C01－24C256共9種EEPROM的字節(jié)讀寫操作程序，
此程序有五個入口條件，分別為讀寫數(shù)據(jù)緩沖區(qū)指針,
進行讀寫的字節(jié)數(shù)，EEPROM首址，EEPROM控制字節(jié)，
以及EEPROM類型。此程序結(jié)構(gòu)性良好，具有極好的容錯性，程序機器碼也不多:
DataBuff為讀寫數(shù)據(jù)輸入／輸出緩沖區(qū)的首址
Length 為要讀寫數(shù)據(jù)的字節(jié)數(shù)量
Addr 為EEPROM的片內(nèi)地址 AT24256為0～32767
Control 為EEPROM的控制字節(jié)，具體形式為(1)(0)(1)(0)(A2)(A1)(A0)(R/W),其中R/W=1,
表示讀操作,R/W=0為寫操作,A2,A1,A0為EEPROM的頁選或片選地址;
enumer為枚舉變量,需為AT2401至AT24256中的一種,分別對應(yīng)AT24C01至AT24C256;
函數(shù)返回值為一個位變量，若返回1表示此次操作失效，0表示操作成功;
ERROR為允許最大次數(shù)，若出現(xiàn)ERRORCOUNT次操作失效后，則函數(shù)中止操作，并返回1
SDA和SCL由用戶自定義，這里暫定義為P3^0和P3^1; */
/*對于1K位，2K位，4K位，8K位，16K位芯片采用一個8位長的字節(jié)地址碼，對于32K位以上
的采用2個8位長的字節(jié)地址碼直接尋址，而4K位，8K位，16K位配合頁面地址來尋址*/

/* －－－－－  AT24C01～AT24C256 的讀寫程序 －－－－－－ */
bit   RW24xx(unsigned char *DataBuff,unsigned char Length,unsigned int Addr,
                     unsigned char Control,enum eepromtype enumer)
{ void Delay(unsigned char DelayCount);  /*   延時   */
  void Start(void);  /*   啟動總線   */
  void Stop(void);   /*   停止IIC總線   */
  bit  RecAck(void); /*   檢查應(yīng)答位   */
  void NoAck(void);  /*   不對IIC總線產(chǎn)生應(yīng)答   */
  void Ack(void);    /*   對IIC總線產(chǎn)生應(yīng)答   */
  unsigned char Receive(void); /*   從IIC總線上讀數(shù)據(jù)子程序  */
  void Send(unsigned char sendbyte); /*   向IIC總線寫數(shù)據(jù)   */
  unsigned char data j,i=ERROR;
  bit errorflag=1;  /*   出錯標志   */
  while(i--)
  { Start();  /*   啟動總線   */
    Send(Control & 0xfe); /*   向IIC總線寫數(shù)據(jù)，器件地址 */
    if(RecAck()) continue; /*   如寫不正確結(jié)束本次循環(huán)   */
    if(enumer > AT2416)
    { Send((unsigned char)(Addr >> 8));//把整型數(shù)據(jù)轉(zhuǎn)換為字符型數(shù)據(jù)：棄高取低，只取低8位.如果容量大于32K位，使用16位地址尋址，寫入高八位地址
      if(RecAck())  continue;
    }
    Send((unsigned char)Addr); /*   向IIC總線寫數(shù)據(jù)   */
    if(RecAck())  continue; /*   如寫正確結(jié)束本次循環(huán)   */
    if(!(Control & 0x01))   //判斷是讀器件還是寫器件
    { j=Length;
      errorflag=0;         /* 清錯誤特征位 */
      while(j--)
      { Send(*DataBuff++); /*   向IIC總線寫數(shù)據(jù)   */
        if(!RecAck()) continue; /*   如寫正確結(jié)束本次循環(huán)   */
        errorflag=1;
        break;
      }
      if(errorflag==1) continue;
      break;
    }
    else
    { Start();  /*   啟動總線   */
      Send(Control); /*   向IIC總線寫數(shù)據(jù)   */
      if(RecAck()) continue;//器件沒應(yīng)答結(jié)束本次本層循環(huán)
      while(--Length)  /*   字節(jié)長為0結(jié)束   */
      { *DataBuff ++= Receive();
        Ack();   /*   對IIC總線產(chǎn)生應(yīng)答   */
      }
      *DataBuff=Receive(); /* 讀最后一個字節(jié) */
      NoAck();  /*   不對IIC總線產(chǎn)生應(yīng)答   */
      errorflag=0;
      break;
    }
  }
  Stop();  /*   停止IIC總線   */
  if(!(Control & 0x01))
  { Delay(255); Delay(255); Delay(255); Delay(255);
  }
  return(errorflag);
}

/* * * * * 以下是對IIC總線的操作子程序 * * * * */
/* * * * * * 啟動總線 * * * * */
void Start(void)
{ SCL=0; /* SCL處于高電平時,SDA從高電平轉(zhuǎn)向低電平表示 */
  SDA=1; /* 一個"開始"狀態(tài),該狀態(tài)必須在其他命令之前執(zhí)行 */
  SCL=1;
  _nop_(); _nop_(); _nop_();
  SDA=0;
  _nop_(); _nop_(); _nop_(); _nop_();
  SCL=0;
  SDA=1;    
}

/* * * * * 停止IIC總線 * * * * */
void Stop(void)
{ SCL=0; /*SCL處于高電平時,SDA從低電平轉(zhuǎn)向高電平 */
  SDA=0; /*表示一個"停止"狀態(tài),該狀態(tài)終止所有通訊 */
  SCL=1;
  _nop_(); _nop_(); _nop_(); /* 空操作 */
  SDA=1;
  _nop_(); _nop_(); _nop_();
  SCL=0;
}

/* * * * * 檢查應(yīng)答位 * * * * */
bit RecAck(void)
{ SCL=0;
  SDA=1;
  SCL=1;
  _nop_(); _nop_(); _nop_(); _nop_();
  CY=SDA;     /* 因為返回值總是放在CY中的 */
  SCL=0;
  return(CY);
}

/* * * * *對IIC總線產(chǎn)生應(yīng)答 * * * * */
void Ack(void)
{ SDA=0; /* EEPROM通過在收到每個地址或數(shù)據(jù)之后, */
  SCL=1; /* 置SDA低電平的方式確認表示收到讀SDA口狀態(tài) */
  _nop_(); _nop_(); _nop_(); _nop_();
  SCL=0;
  _nop_();
  SDA=1;
}

/* * * * * * * * * 不對IIC總線產(chǎn)生應(yīng)答 * * * * */
void NoAck(void)
{ SDA=1;
  SCL=1;
  _nop_(); _nop_(); _nop_(); _nop_();
  SCL=0;
}

/* * * * * * * * * 向IIC總線寫數(shù)據(jù) * * * * */
void Send(unsigned char sendbyte)
{ unsigned char data j=8;
  for(;j>0;j--)
  { SCL=0;
    sendbyte <<= 1; /* 使CY=sendbyte^7; */
    SDA=CY; /* CY 進位標志位 */
    SCL=1;
  }
  SCL=0;
}

/* * * * * * * * * 從IIC總線上讀數(shù)據(jù)子程序 * * * * */
unsigned char Receive(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--);
}

/* －－－－－  AT24C01～AT24C256 的讀寫程序 －－－－－－ */
void main()
{ unsigned char Control,*p1,*p2;
  unsigned char Length;
  unsigned int addr ; /* 24Cxx片內(nèi)地址 */
  p1=buf1;p2=buf2;
  addr=0; /* 片內(nèi)地址 AT24C256為0～32767 */
  Length=8; /* 讀寫長度 */
  enumer=AT24256; /* 讀寫AT24C256 */
  Control=0xa0; /* 寫操作 */
  RW24xx(p1,Length,addr,Control,enumer); /* 寫 */
  Control=0xa1; /* 讀操作 */
  RW24xx(p2,Length,addr,Control,enumer); /* 讀 */
}