//24c64子程序

//------------------------------------------------------------------------------
//CPU產(chǎn)生I2C起始信號，SCL高電平期間，SDA由1到0
//------------------------------------------------------------------------------
void start()
{
unsigned char i;
SDA=1; //SDA置1
i=2;while(--i);
SCL=1; //SCL置為高電平
i=2;while(--i);
SDA=0; //SDA清0
i=2;while(--i);
SCL=0; //SCL恢復低電平
}
//-----------------------------------------------------------------------------
//CPU產(chǎn)生I2C結(jié)束信號，SCL高電平期間，SDA由0到1
//-----------------------------------------------------------------------------
void stop()
{
unsigned char i;
SDA=0; //SDA清0
i=2;while(--i);
SCL=1; //SCL置為高電平
i=2;while(--i);
SDA=1; //SDA置1
i=2;while(--i);
SCL=0; //SCL恢復低電平
}
//--------------------------------------------------------------------------------------------------------
//CPU產(chǎn)生應答信號（CPU接收數(shù)據(jù)后）接收方產(chǎn)生應答或非應答信號，

//24c64自動產(chǎn)生，cpu需要調(diào)用程序
//--------------------------------------------------------------------------------------------------------
void ACK()
{
unsigned char i;
SDA=0; //SDA清0
i=2;while(--i);
SCL=1;
i=2;while(--i);
SCL=0;
i=2;while(--i);
SDA=1;
}
//-----------------------------------------------------------
//CPU產(chǎn)生非應答信號 （CPU接收數(shù)據(jù)后）
//-----------------------------------------------------------
void NACK()
{
unsigned char i;
SDA=1; //SDA置1
i=2;while(--i);
SCL=1;
i=2;while(--i);
SCL=0;
i=2;while(--i);
}
//---------------------------------------------------------------------------------------------------------------
//CPU向24C64發(fā)送一個字節(jié)（寫數(shù)據(jù)或地址），并檢查24C64發(fā)回的確認信號，

//返回標志位flag，0應答，1非應答。
//---------------------------------------------------------------------------------------------------------------
bit Sendbyte(unsigned char data0)
{
unsigned char i,j;
bit flag;
for(j=0;j<8;j++) //發(fā)送一個字節(jié) （1次發(fā)送1位）
{
SCL=0;
i=2;while(--i);
if(data0&0x80) //取data0最高位
SDA=1;
else
SDA=0;
i=2;while(--i);
SCL=1;
i=2;while(--i);
data0=data0<<1; //data0左移1位
}
//以下為檢查24C64應答信號
SCL=0;
i=2;while(--i);
SDA=1; //數(shù)據(jù)線拉高
i=2;while(--i);
SCL=1;
i=2;while(--i);
flag=SDA; //讀應答信號
SCL=0;
i=2;while(--i);
return flag; //24C64正確接收，返回0(ACK)；不正確接收，返回1(NOACK)。
}
//---------------------------------------------------
//CPU接收24C64發(fā)送來的一個字節(jié)
//---------------------------------------------------
unsigned char Receivebyte()
{
unsigned i,j,data0;
SCL=0;
i=2;while(--i);
SDA=1;
for(j=0;j<8;j++) //1次接收1位
{
data0=data0<<1;
SCL=1;
i=2;while(--i);
if(SDA) data0=data0+1; //接收數(shù)據(jù)存在最低位
i=2;while(--i);
SCL=0;
i=2;while(--i);
}
return data0; //返回接收的數(shù)據(jù)
}
//---------------------------------------------------------------------------------------------
//CPU向24C64內(nèi)部EEPROM寫入一個字節(jié) （寫1個字節(jié)數(shù)據(jù)過程）
//--------------------------------------------------------------------------------------------
void byteWR24c64(unsigned int address,unsigned char data0)
{ // 24c64內(nèi)部單元地址， 數(shù)據(jù)
unsigned char flag;
start(); //CPU發(fā)起始信號
flag=Sendbyte(0xa0); //CPU發(fā)器件地址
while(flag) {Sendbyte(0xa0);} //檢查確認信號，不正確則重發(fā)
flag=Sendbyte(address/256); //CPU發(fā)ROM高八位地址
while(flag) {Sendbyte(address/256);}
flag=Sendbyte(address%256); //CPU發(fā)ROM低八位地址
while(flag) {Sendbyte(address%256);}
flag=Sendbyte(data0); //CPU發(fā)送數(shù)據(jù)
while(flag) {Sendbyte(data0);}
stop(); //CPU發(fā)結(jié)束信號
delaynms(10);
}
//--------------------------------------------------------------------------------------------
//CPU向24C64內(nèi)部EEPROM寫入一頁字節(jié)，一次最多32個字節(jié)。

// （寫1頁數(shù)據(jù)過程）
//--------------------------------------------------------------------------------------------
void pageWR24c64(unsigned int address,unsigned char *p1,unsigned char count)
{ // 24c64內(nèi)部起始單元地址， 數(shù)據(jù)緩沖區(qū)地址 寫入字節(jié)個數(shù)
unsigned char flag;
start(); //CPU發(fā)起始信號
flag=Sendbyte(0xa0); //CPU發(fā)器件地址
while(flag) {Sendbyte(0xa0);} //檢查確認信號，不正確則重發(fā)
flag=Sendbyte(address/256); //CPU發(fā)ROM起始單元高八位地址
while(flag) {Sendbyte(address/256);}
flag=Sendbyte(address%256); //CPU發(fā)ROM起始單元低八位地址
while(flag) {Sendbyte(address%256);}
while(count--)
{
flag=Sendbyte(*p1); // 發(fā)送1個數(shù)據(jù)
while(flag) {Sendbyte(*p1);} //檢查確認信號，不正確則重發(fā)
p1++; //修改指針
}
stop(); //CPU發(fā)結(jié)束信號
delaynms(10);
}
//--------------------------------------------------------------------------
//CPU從24C64內(nèi)部EEPROM讀取n個字節(jié)。 連續(xù)讀
//--------------------------------------------------------------------------
void nbyteRD24c64(unsigned int address,unsigned char *p2,unsigned char count)
{ // 24c64內(nèi)部起始單元地址， 數(shù)據(jù)緩沖區(qū)地址 讀取字節(jié)個數(shù)
unsigned char flag;
//以下是偽寫
start(); //CPU發(fā)起始信號
flag=Sendbyte(0xa0); //CPU發(fā)器件地址
while(flag) {Sendbyte(0xa0);}
flag=Sendbyte(address/256); //CPU發(fā)ROM起始單元高八位地址
while(flag) {Sendbyte(address/256);}
flag=Sendbyte(address%256); //CPU發(fā)ROM起始單元低八位地址
while(flag) {Sendbyte(address%256);}
//以下是讀n個字節(jié)
start(); //CPU發(fā)起始信號
flag=Sendbyte(0xa1); //CPU發(fā)器件地址
while(flag) {Sendbyte(0xa1);}
while(--count) //讀取 count-1 個數(shù)據(jù)
{
*p2=Receivebyte(); // 讀取1個數(shù)據(jù)
ACK(); //cpu發(fā)應答信號
p2++; //修改指針
}
*p2=Receivebyte(); // 讀取第 count 個數(shù)據(jù)
NACK(); // cpu發(fā)送非應答信號
stop(); //CPU發(fā)結(jié)束信號
}