eepromrw.c

程序为监测报警

			/*————————————————————
〖说明〗24LC65 I2C EEPROM字节读写驱动程序，芯片A0-A1-A2要接VCC。
现缺页写、页读，和CRC校验程序。以下程序经过50台验证，批量的效果有待考
察。
为了安全起见，程序中很多NOP是冗余的，希望读者能进一步精简，但必须经过验
证。
51晶振为11.0592MHz
〖文件〗24LC65.c ﹫2001/03/23
〖作者〗龙啸九天 [e-mail] http://mcs51.yeah.net/
〖修改〗修改建议请到论坛公布 http://c51bbs.yeah.net/
〖版本〗V1.00A Build 0323
—————————————————————*/
#include <reg52.h >
#include<INTRINS.H>
#define SDA P3_5
#define SCL P3_4
#define uchar  unsigned char
#define uint   unsigned int
sbit   	P3_5 = P3^5;
sbit    P3_4 = P3^4;
/*----------------------------------------------------------------------------
调用方式：write_8bit(uchar ch) ﹫2001/03/23
函数说明：内函数，私有，用户不直接调用。
------------------------------------------------------------------------------*/
write_8bit(uchar ch)
{
uchar i=8;
SCL=0;
_nop_();_nop_();_nop_();_nop_();_nop_();
while (i--)
{
SDA=(bit)(ch&0x80);
_nop_();_nop_();_nop_();_nop_();_nop_();
ch<<=1;
SCL=1;
_nop_();_nop_();_nop_();_nop_();_nop_();
SCL=0;
_nop_();_nop_();_nop_();_nop_();_nop_();
}
_nop_();_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();_nop_();

}

/*------------------------------------------------------------------------------
--
调用方式：void ACK(void) ﹫2001/03/23
函数说明：内函数，私有，用户不直接调用。
--------------------------------------------------------------------------------
-*/
void ACK(void)

{
uchar time_1 ;
SDA=1;
SCL=0;
_nop_();_nop_();_nop_();_nop_();_nop_();
SCL=1;
time_1=5;
while(SDA) {if (!(time_1--)) break;} //ACK
SCL=0;
_nop_();_nop_();_nop_();_nop_();_nop_();
}

/*------------------------------------------------------------------------------
--
调用方式：void Write24LC65(uint address,uchar ddata) ﹫2001/03/23
函数说明：在指定地址address（address<0x2000）写入一个字节ddata
--------------------------------------------------------------------------------
-*/
void Write24LC65(uint address,uchar ddata)//
{
SCL=1;
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_(); //Tsu:STA
SDA=0;
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_(); //Thd:STA
SCL=0; //START
write_8bit(0xae); //写从地址
ACK();
write_8bit(address>>8);
ACK();
write_8bit(address&0x00FF);
ACK();
write_8bit(ddata);
ACK();
SDA=0;_nop_();SCL=1;_nop_();_nop_();_nop_();_nop_();_nop_();_nop_
();SDA=1; //STOP
_nop_();_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();_nop_();
//delay(10);
}

/*------------------------------------------------------------------------------
--
调用方式：uchar Read24LC65(uint address) ﹫2001/03/23
函数说明：读取24LC65指定地址address（address<0x2000）的数据。
--------------------------------------------------------------------------------
-*/
uchar Read24LC65(uint address)
{
uchar ddata=0;
uchar i=8;
SDA=0;_nop_();SCL=0; //START
write_8bit(0xae); //写从地址
ACK();
write_8bit(address>>8);
ACK();
write_8bit(address&0x00FF);
ACK();
//以上是一个“哑”写操作，相当于设置当前地址

SCL=1;
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_(); //Tsu:STA
SDA=0;
_nop_();_nop_();_nop_();_nop_();_nop_();_nop_(); //Thd:STA
SCL=0; //START
write_8bit(0xaf); //写从地址，置为读模式
ACK();
while (i--)
{
SDA=1;
ddata<<=1;
SCL=0;_nop_();_nop_();_nop_();_nop_();_nop_();SCL=1;
if (SDA) ddata|=0x01;
}

SCL=0;_nop_();SCL=1;_nop_();_nop_();_nop_();_nop_();_nop_();_nop_();
SDA=0;_nop_();SCL=1;_nop_();_nop_();_nop_();_nop_();_nop_();_nop_
();SDA=1; //STOP
_nop_();_nop_();_nop_();_nop_();_nop_();
_nop_();_nop_();_nop_();_nop_();_nop_();
//delay(5);
return ddata;
}