sfr IIC_CON = 0xA0;
sbit WP = IIC_CON^5;

sfr IIC_INTER = 0x90;
sbit SCL = IIC_INTER^6;
sbit SDA = IIC_INTER^7;

bit ack; /*應(yīng)答標(biāo)志位*/

void DelayMs(unsigned char i)
{
unsigned int count;
for(i;i!=0;i--)for(count=6;count!=0;count--);
}
/***********************************************************************/
/*名稱: IIC_Start()
/*說(shuō)明: 啟動(dòng)I2C總線,即發(fā)送I2C起始條件.
/*輸入: 無(wú)
/*輸出: 無(wú)
/***********************************************************************/
void IIC_Start(void)
{
SCL=1; DelayMs(1);
SDA=1; DelayMs(1);
SDA=0; DelayMs(1); /*發(fā)送起始信號(hào)*/
SCL=0; DelayMs(1); /*鉗住I2C總線，準(zhǔn)備發(fā)送或接收數(shù)據(jù) */

}
/***********************************************************************/
/*名稱: IIC_Stop()
/*說(shuō)明: 結(jié)束I2C總線,即發(fā)送I2C結(jié)束條件.
/*輸入: 無(wú)
/*輸出: 無(wú)
/***********************************************************************/
void IIC_Stop(void)
{
SCL=1; DelayMs(1); /*發(fā)送結(jié)束條件的時(shí)鐘信號(hào)*/
SDA=0; DelayMs(1);
SDA=1; DelayMs(1); /*發(fā)送I2C總線結(jié)束信號(hào)*/
SCL=0; DelayMs(1);

}
/***********************************************************************/
/*名稱: IIC_DataSend()
/*說(shuō)明: 將數(shù)據(jù)c發(fā)送出去,可以是地址,也可以是數(shù)據(jù),發(fā)完后等待應(yīng)答,并對(duì)
此狀態(tài)位進(jìn)行操作.(不應(yīng)答或非應(yīng)答都使ack=0)
ack=1表示發(fā)送數(shù)據(jù)正常; ack=0表示被控器無(wú)應(yīng)答或損壞,。
/*輸入: cmd 要輸入的指令數(shù)據(jù)
/*輸出: 無(wú)
/***********************************************************************/
void IIC_DataSend(unsigned char byte)
{
unsigned char BitCnt;

for(BitCnt=0;BitCnt<8;BitCnt++) /*要傳送的數(shù)據(jù)長(zhǎng)度為8位*/
{
if(byte&0x80)
SDA=1; /*判斷發(fā)送位*/
else
SDA=0;
DelayMs(1);
SCL=1; DelayMs(1); /*置時(shí)鐘線為高,，通知被控器開始發(fā)送數(shù)據(jù)位*/
SCL=0; DelayMs(1);
byte = byte<<1;
}
SDA=0; DelayMs(1); /*8位發(fā)送完后釋放數(shù)據(jù)線,，準(zhǔn)備接收應(yīng)答位*/
SCL=1; DelayMs(1);
if(SDA==1)
ack=0;
else
ack=1; /*判斷是否接收到應(yīng)答信號(hào)*/
SCL=0; DelayMs(1);
}

/***********************************************************************/
/*名稱: IIC_DataRcv()
/*說(shuō)明: 用來(lái)接收從器件傳來(lái)的數(shù)據(jù),并判斷總線錯(cuò)誤(不發(fā)應(yīng)答信號(hào)),，
發(fā)完后請(qǐng)用應(yīng)答函數(shù)應(yīng)答從機(jī),。
/*輸入: 無(wú)
/*輸出: 從器件傳來(lái)的數(shù)據(jù)
/***********************************************************************/
unsigned char IIC_DataRcv(void)
{
unsigned char BitCnt,Result = 0;

SDA=1; /*置數(shù)據(jù)線為輸入方式*/
for(BitCnt=0;BitCnt<8;BitCnt++)
{
SCL=0; DelayMs(1); /*置時(shí)鐘線為低,，準(zhǔn)備接收數(shù)據(jù)位*/
SCL=1; DelayMs(1); /*置時(shí)鐘線為高使數(shù)據(jù)線上數(shù)據(jù)有效*/
Result <<= 1;
if(SDA)
Result++; /*讀數(shù)據(jù)位,接收的數(shù)據(jù)位放入Result中 */
}
SCL=0; DelayMs(1);
return Result;
}

/***********************************************************************/
/*名稱: IIC_Ack()
/*說(shuō)明: 主控器進(jìn)行應(yīng)答信號(hào)(可以是應(yīng)答或非應(yīng)答信號(hào),，由位參數(shù)a決定)
/*輸入: 應(yīng)答信號(hào)
/*輸出: 無(wú)
/***********************************************************************/
void IIC_Ack(bit a)
{
if(a)
SDA=1; /*在此發(fā)出應(yīng)答或非應(yīng)答信號(hào) */
else
SDA=0;
Delay(20);
SCL=1; DelayMs(1); /*時(shí)鐘低電平周期大于4μs*/
SCL=0; DelayMs(1); /*清時(shí)鐘線，鉗住I2C總線以便繼續(xù)接收*/

}

/***********************************************************************/
/*名稱: IIC_StrWrite()
/*說(shuō)明: 向有子地址器件發(fā)送多字節(jié)數(shù)據(jù)程序
/*輸入: addrh 存儲(chǔ)器子地址高8位
/* addrl 存儲(chǔ)器子地址低8位
/* *str 數(shù)據(jù)指針
/* length 數(shù)據(jù)長(zhǎng)度
/*輸出: 寫入是否成功
/***********************************************************************/
bit IIC_ByteWrite(unsigned char addrh,unsigned char addrl,unsigned char byte)
{
WP = 0;
IIC_Start(); /*啟動(dòng)總線*/
IIC_DataSend(ROMADDRESS); /*發(fā)送器件地址*/
if(ack==0)return(0);
IIC_DataSend(addrh); /*發(fā)送存儲(chǔ)器子地址高8位*/
if(ack==0)return(0);
IIC_DataSend(addrl); /*發(fā)送存儲(chǔ)器子地址低8位*/
if(ack==0)return(0);
IIC_DataSend(byte); /*發(fā)送數(shù)據(jù)*/
if(ack==0)return(0);
IIC_Stop(); /*結(jié)束總線*/
DelayMs(100);
WP = 1;
return(1);
}

/***********************************************************************/
/*名稱: IIC_StrWrite()
/*說(shuō)明: 向有子地址器件發(fā)送多字節(jié)數(shù)據(jù)程序
/*輸入: addrh 存儲(chǔ)器子地址高8位
/* addrl 存儲(chǔ)器子地址低8位
/* *str 數(shù)據(jù)指針
/* length 數(shù)據(jù)長(zhǎng)度
/*輸出: 寫入是否成功
/***********************************************************************/
bit IIC_StrWrite(unsigned char addrh,unsigned char addrl,unsigned char *str,unsigned char length)
{
unsigned char i;

WP = 0;
IIC_Start(); /*啟動(dòng)總線*/
IIC_DataSend(ROMADDRESS); /*發(fā)送器件地址*/
if(ack==0)return(0);
IIC_DataSend(addrh); /*發(fā)送存儲(chǔ)器子地址高8位*/
if(ack==0)return(0);
IIC_DataSend(addrl); /*發(fā)送存儲(chǔ)器子地址低8位*/
if(ack==0)return(0);

for(i=0;i {
IIC_DataSend(*(str++)); /*發(fā)送數(shù)據(jù)*/
if(ack==0)return(0);
}
IIC_Stop(); /*結(jié)束總線*/
DelayMs(100);
WP = 1;
return(1);
}

/***********************************************************************/
/*名稱: IIC_ByteRead()
/*說(shuō)明: 向有子地址器件讀取單字節(jié)數(shù)據(jù)程序
/*輸入: addrh 存儲(chǔ)器子地址高8位
/* addrl 存儲(chǔ)器子地址低8位
/*輸出: 讀取的數(shù)據(jù)
/***********************************************************************/
bit IIC_ByteRead(unsigned char addrh,unsigned char addrl,unsigned char byte)
{
IIC_Start(); /*啟動(dòng)總線*/
IIC_DataSend(ROMADDRESS); /*發(fā)送器件地址*/
if(ack==0)return(0);
IIC_DataSend(addrh); /*發(fā)送存儲(chǔ)器子地址高8位*/
if(ack==0)return(0);
IIC_DataSend(addrl); /*發(fā)送存儲(chǔ)器子地址低8位*/
if(ack==0)return(0);

IIC_Start(); /*重新啟動(dòng)總線*/
IIC_DataSend(ROMADDRESS+1); /*設(shè)置讀*/
if(ack==0)return(0);
byte = IIC_DataRcv(); /*讀取數(shù)據(jù)*/
IIC_Ack(1); /*發(fā)送非應(yīng)位*/
IIC_Stop(); /*結(jié)束總線*/
DelayMs(100);
return(1);
}

/***********************************************************************/
/*名稱: IIC_StrRead()
/*說(shuō)明: 向有子地址器件發(fā)送多字節(jié)數(shù)據(jù)程序
/*輸入: addrh 存儲(chǔ)器子地址高8位
/* addrl 存儲(chǔ)器子地址低8位
/*輸出: 讀取是否成功
/***********************************************************************/
bit IIC_StrRead(unsigned char addrh,unsigned char addrl,unsigned char *str,unsigned char length)
{
unsigned char i;

IIC_Start(); /*啟動(dòng)總線*/
IIC_DataSend(ROMADDRESS); /*發(fā)送器件地址*/
if(ack==0)return(0);
IIC_DataSend(addrh); /*發(fā)送存儲(chǔ)器子地址高8位*/
if(ack==0)return(0);
IIC_DataSend(addrl); /*發(fā)送存儲(chǔ)器子地址低8位*/
if(ack==0)return(0);

IIC_Start(); /*重新啟動(dòng)總線*/
IIC_DataSend(ROMADDRESS+1); /*設(shè)置讀*/
if(ack==0)return(0);
for(i=0;i {
*(str++) = IIC_DataRcv(); /*讀取數(shù)據(jù)*/
IIC_Ack(0); /*發(fā)送就答位*/
}
*str=IIC_DataRcv(); /*讀取數(shù)據(jù)*/
IIC_Ack(1); /*發(fā)送非應(yīng)位*/
IIC_Stop(); /*結(jié)束總線*/
DelayMs(100);
return(1);
}