AT24C01-AT24C256 的Keil C51读写程序

/* 以下为AT24C01～AT24C256的读写程序，各人可根据自己的需要应用。
在buf1中填入需要写入的内容，buf2的大小可根据需要定义。
addr可根据使用的芯片选择，可从任何位置读写，只要在该芯片的范围内。
enumer=ATxxx，根据使用的芯片赋值。各函数中的形式参数不需改变。
本程序只要在调用的程序中定义实际参数即可，下述各子程序不必改动。*/

#include <reg52.h>
#include <intrins.h>
#define ERROR 10 //允许ERROR的最大次数
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}; /* 发送缓冲区 */
unsigned char buf2 [10]; /* 接收缓冲区 */

/* 一个通用的24C01－24C256共9种EEPROM的字节读写操作程序，
此程序有五个入口条件，分别为读写数据缓冲区指针,
进行读写的字节数，EEPROM首址，EEPROM控制字节，
以及EEPROM类型。此程序结构性良好，具有极好的容错性，程序机器码也不多:
DataBuff为读写数据输入／输出缓冲区的首址
Length 为要读写数据的字节数量
Addr 为EEPROM的片内地址 AT24256为0～32767
Control 为EEPROM的控制字节，具体形式为(1)(0)(1)(0)(A2)(A1)(A0)(R/W),其中R/W=1,
表示读操作,R/W=0为写操作,A2,A1,A0为EEPROM的页选或片选地址;
enumer为枚举变量,需为AT2401至AT24256中的一种,分别对应AT24C01至AT24C256;
函数返回值为一个位变量，若返回1表示此次操作失效，0表示操作成功;
ERROR为允许最大次数，若出现ERRORCOUNT次操作失效后，则函数中止操作，并返回1
SDA和SCL由用户自定义，这里暂定义为P3^0和P3^1; */
/*对于1K位，2K位，4K位，8K位，16K位芯片采用一个8位长的字节地址码，对于32K位以上
的采用2个8位长的字节地址码直接寻址，而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); /* 检查应答位 */
void NoAck(void); /* 不对IIC总线产生应答 */
void Ack(void); /* 对IIC总线产生应答 */
unsigned char Receive(void); /* 从IIC总线上读数据子程序 */
void Send(unsigned char sendbyte); /* 向IIC总线写数据 */
unsigned char data j,i=ERROR;
bit errorflag=1; /* 出错标志 */
while(i--)
{ Start(); /* 启动总线 */
Send(Control & 0xfe); /* 向IIC总线写数据，器件地址 */
if(RecAck()) continue; /* 如写不正确结束本次循环 */
if(enumer > AT2416)
{ Send((unsigned char)(Addr >> 8));//把整型数据转换为字符型数据：弃高取低，只取低8位.如果容量大于32K位，使用16位地址寻址，写入高八位地址
if(RecAck()) continue;
}
Send((unsigned char)Addr); /* 向IIC总线写数据 */
if(RecAck()) continue; /* 如写正确结束本次循环 */
if(!(Control & 0x01)) //判断是读器件还是写器件
{ j=Length;
errorflag=0; /* 清错误特征位 */
while(j--)
{ Send(*DataBuff++); /* 向IIC总线写数据 */
if(!RecAck()) continue; /* 如写正确结束本次循环 */
errorflag=1;
break;
}
if(errorflag==1) continue;
break;
}
else
{ Start(); /* 启动总线 */
Send(Control); /* 向IIC总线写数据 */
if(RecAck()) continue;//器件没应答结束本次本层循环
while(--Length) /* 字节长为0结束 */
{ *DataBuff ++= Receive();
Ack(); /* 对IIC总线产生应答 */
}
*DataBuff=Receive(); /* 读最后一个字节 */
NoAck(); /* 不对IIC总线产生应答 */
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从高电平转向低电平表示 */
SDA=1; /* 一个"开始"状态,该状态必须在其他命令之前执行 */
SCL=1;
_nop_(); _nop_(); _nop_();
SDA=0;
_nop_(); _nop_(); _nop_(); _nop_();
SCL=0;
SDA=1;
}

/* * * * * 停止IIC总线 * * * * */
void Stop(void)
{ SCL=0; /*SCL处于高电平时,SDA从低电平转向高电平 */
SDA=0; /*表示一个"停止"状态,该状态终止所有通讯 */
SCL=1;
_nop_(); _nop_(); _nop_(); /* 空操作 */
SDA=1;
_nop_(); _nop_(); _nop_();
SCL=0;
}

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

/* * * * *对IIC总线产生应答 * * * * */
void Ack(void)
{ SDA=0; /* EEPROM通过在收到每个地址或数据之后, */
SCL=1; /* 置SDA低电平的方式确认表示收到读SDA口状态 */
_nop_(); _nop_(); _nop_(); _nop_();
SCL=0;
_nop_();
SDA=1;
}

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

/* * * * * * * * * 向IIC总线写数据 * * * * */
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总线上读数据子程序 * * * * */
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片内地址 */
p1=buf1;p2=buf2;
addr=0; /* 片内地址 AT24C256为0～32767 */
Length=8; /* 读写长度 */
enumer=AT24256; /* 读写AT24C256 */
Control=0xa0; /* 写操作 */
RW24xx(p1,Length,addr,Control,enumer); /* 写 */
Control=0xa1; /* 读操作 */
RW24xx(p2,Length,addr,Control,enumer); /* 读 */
}