ATmega16读写24Cxx程序

/**************************************************
EEPROM读写操作
晶振：内部 8M
***************************************************/
#include
#include
#define uchar unsigned char
#define uint unsigned int
#define ulong unsigned long
uchar syserr;
void delay_EEPROM(uchar n) //延时
{
unsigned int a,b;
for(a=0;a for(b=0;b<100;b++)
;
}
//------在此设定芯片型号------
#define e2prom 256// <---在此设定芯片型号, 1代表24C01; 16代表24C16; 512代表24C512

#if e2prom==1
#define PAGE_SIZE 8
#define SIZE 0x007f
#elif e2prom==2
#define PAGE_SIZE 8
#define SIZE 0x00ff
#elif e2prom==4
#define PAGE_SIZE 16
#define SIZE 0x01ff
#elif e2prom==8
#define PAGE_SIZE 16
#define SIZE 0x03ff
#elif e2prom==16
#define PAGE_SIZE 16
#define SIZE 0x07ff
#elif e2prom==32
#define PAGE_SIZE 32
#define SIZE 0x0fff
#elif e2prom==64
#define PAGE_SIZE 32
#define SIZE 0x1fff
#elif e2prom==128
#define PAGE_SIZE 64
#define SIZE 0x3fff
#elif e2prom==256
#define PAGE_SIZE 64
#define SIZE 0x7fff
#elif e2prom==512
#define PAGE_SIZE 128
#define SIZE 0xffff
#endif
//--------------------------

//--------在此设定芯片地址-------
#define W_ADD_COM 0xa0//写字节命令及器件地址(根据地址实际情况改变), 1010 A2 A1 A0 0
#define R_ADD_COM 0xa1//读命令字节及器件地址(根据地址实际情况改变), 1010 A2 A1 A0 1
//-------------------------------

#define SLAW0x18//SLA_W 已正常发送代码,判断器件是否正常应答的常量.

//-----在此改变预置错误号-----
#define ERR_SLAW10//写字节命令及器件地址错, 在此也就是读写器件错!!
//---------------------------

//-----------4个I2总线公用函数, 可供其它I2总线器件的程序调用--------------
void i2cstart(void);//总线上起动开始条件
uchar i2cwt(uchar a);//把一个字节数据输入器件, 返回TWI状态
uchar i2crd(void);//i2c读要调用的函数
void i2cstop(void);//总线上起动停止条件
//------------------------------------------------------------------------

uchar * wt24c_fc(uchar *p, uint ad, uchar n);//向24Cxx写入数据wt24c_h()所要调用的函数

//向24Cxx写入数据
//参数: *p_rsc要输出数据的主机内存地址指针; ad_dst要写入数据的i2c的地址(双字节); num数据个数
//参数条件: ad_dst: ad_dst+(num-1)不能大于器件的最高地址; num必须>0;
void wt24c(uchar *p_rsc, uint ad_dst, uint num)
{ uint n;

n=ad_dst/PAGE_SIZE;//确定地址与块地址的差
if(n)
n=(ulong)PAGE_SIZE*(n+1)-ad_dst;
else
n=PAGE_SIZE-ad_dst;

if(n>=num)//如果ad_dst所在的数据块的末尾地址 >= ad_dst + num, 就直接写入num个数据
{
wt24c_fc(p_rsc, ad_dst, num);
if(syserr!=0)
return;
}
else//如果ad_dst所在的数据块末尾地址 < ad_dst + num, 就先写入ad_dst所在的数据块末尾地址与 ad_dst 之差个数据
{
p_rsc=wt24c_fc(p_rsc, ad_dst, n);
if(syserr!=0)
return;

num-=n; //更新剩下数据个数
ad_dst+=n;//更新剩下数据的起始地址

//把剩下数据写入器件
while(num>=PAGE_SIZE)//先按PAGE_SIZE为长度一页一页的写入
{p_rsc=wt24c_fc(p_rsc, ad_dst, PAGE_SIZE);
if(syserr!=0) return;

num-=PAGE_SIZE;//更新剩余数据个数
ad_dst+=PAGE_SIZE;//更新剩下数据的起始地址
}

if(num)//把最后剩下的小于一个PAGE_SIZE长度的数据写入器件
wt24c_fc(p_rsc, ad_dst, num);
}
}

//从24cxx读出数据
//参数: *p_dst要读入数据的主机内存地址指针; ad_rsc要输出数据的i2c的地址(整形); num数据个数(整形)
//参数条件: ad_dst+(num-1)不能大于器件的最高地址; num必须>0;
void port_init(void)
{

PORTC = 0xFF;
DDRC &= 0xfc;
}
//TWI initialize
// bit rate:100
void twi_init(void)
{
TWCR= 0x00; //disable twi
TWBR= 0x20; //set bit rate
TWSR= 0x00; //set prescale
TWAR= 0x00; //set slave address
TWCR= 0x04; //enable twi
}
void rd24c(uchar *p_dst, uint ad_rsc, uint num)
{
uchar t=0;
#if e2prom<32
t=ad_rsc>>8;
t<<=1;
#endif
i2cstart();//发送起始信号
if(i2cwt(W_ADD_COM+t)==SLAW)//发送SLA_W, 写字节命令及器件地址
{
#if e2prom>=32
i2cwt(ad_rsc>>8);//ad_rsc的高位, 发送要读出数据的地址
#endif
i2cwt(ad_rsc);//ad_rsc的低位

i2cstart();//再发送起始信号
i2cwt(R_ADD_COM+t);//发送SLA_R, 读命令字节及器件地址

for(;num>0;num--)
{
*p_dst=i2crd();//从器件读出一个字节
p_dst++;
}
}
else
syserr=ERR_SLAW;//写字节命令及器件地址错或对方无应答

i2cstop();

}
//向24Cxx写入数据wt24c_h()所要调用的函数
//返回写入n个字节后的主机内存指针

uchar * wt24c_fc(uchar *p, uint ad, uchar n)
{
uchar t=0;
#if e2prom<32
t=ad>>8;
t<<=1;
#endif
i2cstart();//发送起始信号
if(i2cwt(W_ADD_COM+t)==SLAW)//发送SLA_W, 写字节命令及器件地址
{
#if e2prom>=32
i2cwt(ad>>8);//ad_dst的高位到器件
#endif
i2cwt(ad);//ad_dst的低位到器件

for(;n>0;n--)//发送要写入的数据
{ i2cwt(*p);
p++;
}
}
else syserr=ERR_SLAW;//写字节命令及器件地址错

i2cstop();
delay_EEPROM(10);//延时6ms

return(p);
}

//-------------------------------以下为其它I2总线器件可调用的函数--------------------------

//总线上起动开始条件
void i2cstart(void)
{
TWCR= BIT(TWINT) | BIT(TWSTA) | BIT(TWEN);
while (!(TWCR & BIT(TWINT)));
}

//把一个字节数据输入器件, 返回TWI状态
uchar i2cwt(uchar a)
{
TWDR = a;
TWCR = BIT(TWINT) | BIT(TWEN);
while (!(TWCR & BIT(TWINT)));
_NOP();
return(TWSR&0b11111000);
}

//i2c读要调用的函数
//从器件读出一个字节
uchar i2crd(void)
{
TWCR= BIT(TWINT) | BIT(TWEA) | BIT(TWEN);
while (!(TWCR & BIT(TWINT)));
return(TWDR);

}

//总线上起动停止条件
void i2cstop(void)
{
TWCR = BIT(TWINT) | BIT(TWSTO) | BIT(TWEN);
}