#define ROMADDRESS0xA0

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()
/*說明:啟動I2C總線,即發(fā)送I2C起始條件.
/*輸入: 無
/*輸出:無
/***********************************************************************/
void IIC_Start(void)
{
SCL=1;DelayMs(1);
SDA=1;DelayMs(1);
SDA=0;DelayMs(1);/*發(fā)送起始信號*/
SCL=0;DelayMs(1);/*鉗住I2C總線，準(zhǔn)備發(fā)送或接收數(shù)據(jù) */

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

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

for(BitCnt=0;BitCnt<8;BitCnt++)/*要傳送的數(shù)據(jù)長度為8位*/
{
if(byte&0x80)
SDA=1; /*判斷發(fā)送位*/
else
SDA=0;
DelayMs(1);
SCL=1;DelayMs(1);/*置時鐘線為高，通知被控器開始發(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)答信號*/
SCL=0;DelayMs(1);
}

/***********************************************************************/
/*名稱:IIC_DataRcv()
/*說明:用來接收從器件傳來的數(shù)據(jù),并判斷總線錯誤(不發(fā)應(yīng)答信號)，
發(fā)完后請用應(yīng)答函數(shù)應(yīng)答從機(jī)。
/*輸入: 無
/*輸出:從器件傳來的數(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);/*置時鐘線為低，準(zhǔn)備接收數(shù)據(jù)位*/
SCL=1;DelayMs(1);/*置時鐘線為高使數(shù)據(jù)線上數(shù)據(jù)有效*/
Result <<= 1;
if(SDA)
Result++;/*讀數(shù)據(jù)位,接收的數(shù)據(jù)位放入Result中 */
}
SCL=0;DelayMs(1);
return Result;
}

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

}

/***********************************************************************/
/*名稱:IIC_StrWrite()
/*說明:向有子地址器件發(fā)送多字節(jié)數(shù)據(jù)程序
/*輸入: addrh存儲器子地址高8位
/*addrl存儲器子地址低8位
/**str數(shù)據(jù)指針
/*length數(shù)據(jù)長度
/*輸出:寫入是否成功
/***********************************************************************/
bit IIC_ByteWrite(unsigned char addrh,unsigned char addrl,unsigned char byte)
{
WP = 0;
IIC_Start();/*啟動總線*/
IIC_DataSend(ROMADDRESS);/*發(fā)送器件地址*/
if(ack==0)return(0);
IIC_DataSend(addrh);/*發(fā)送存儲器子地址高8位*/
if(ack==0)return(0);
IIC_DataSend(addrl);/*發(fā)送存儲器子地址低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()
/*說明:向有子地址器件發(fā)送多字節(jié)數(shù)據(jù)程序
/*輸入: addrh存儲器子地址高8位
/*addrl存儲器子地址低8位
/**str數(shù)據(jù)指針
/*length數(shù)據(jù)長度
/*輸出:寫入是否成功
/***********************************************************************/
bit IIC_StrWrite(unsigned char addrh,unsigned char addrl,unsigned char *str,unsigned char length)
{
unsigned char i;

WP = 0;
IIC_Start();/*啟動總線*/
IIC_DataSend(ROMADDRESS);/*發(fā)送器件地址*/
if(ack==0)return(0);
IIC_DataSend(addrh);/*發(fā)送存儲器子地址高8位*/
if(ack==0)return(0);
IIC_DataSend(addrl);/*發(fā)送存儲器子地址低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()
/*說明:向有子地址器件讀取單字節(jié)數(shù)據(jù)程序
/*輸入: addrh存儲器子地址高8位
/*addrl存儲器子地址低8位
/*輸出:讀取的數(shù)據(jù)
/***********************************************************************/
bit IIC_ByteRead(unsigned char addrh,unsigned char addrl,unsigned char byte)
{
IIC_Start();/*啟動總線*/
IIC_DataSend(ROMADDRESS);/*發(fā)送器件地址*/
if(ack==0)return(0);
IIC_DataSend(addrh);/*發(fā)送存儲器子地址高8位*/
if(ack==0)return(0);
IIC_DataSend(addrl);/*發(fā)送存儲器子地址低8位*/
if(ack==0)return(0);

IIC_Start();/*重新啟動總線*/
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()
/*說明:向有子地址器件發(fā)送多字節(jié)數(shù)據(jù)程序
/*輸入: addrh存儲器子地址高8位
/*addrl存儲器子地址低8位
/*輸出:讀取是否成功
/***********************************************************************/
bit IIC_StrRead(unsigned char addrh,unsigned char addrl,unsigned char *str,unsigned char length)
{
unsigned char i;

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

IIC_Start();/*重新啟動總線*/
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);
}