#include <reg51.h>
#include <intrins.h> 
#define uchar unsigned char
#define uint unsigned int
#define AddWr 0xa0 					//器件地址選擇及寫標(biāo)志
#define AddRd 0xa1 					//器件地址選擇及讀標(biāo)志

/*有關(guān)全局變量*/
sbit Sda= P3^7; 						//串行數(shù)據(jù)
sbit Scl= P3^6; 						//串行時鐘
sbit WP= P3^5; 						//硬件寫保護(hù)
void mDelay(uchar j)
{ 
uint i;
for(;j>0;j--)
{
for(i=0;i<125;i--)
{;}
}
}

/*起始條件*/
void Start(void)
{
Sda=1;
Scl=1;
_nop_();_nop_();_nop_();_nop_();
Sda=0;
_nop_();_nop_();_nop_();_nop_();
}

/*停止條件*/
void Stop(void)
{
Sda=0;
Scl=1;
_nop_();_nop_();_nop_();_nop_();
Sda=1;
_nop_();_nop_();_nop_();_nop_();
}

/*應(yīng)答位*/
void Ack(void)
{
Sda=0;
_nop_();_nop_();_nop_();_nop_();
Scl=1;
_nop_();_nop_();_nop_();_nop_();
Scl=0;
}

/*反向應(yīng)答位*/
void NoAck(void)
{
Sda=1;
_nop_();_nop_();_nop_();_nop_();
Scl=1;
_nop_();_nop_();_nop_();_nop_();
Scl=0;
}

/*發(fā)送數(shù)據(jù)子程序，Data為要求發(fā)送的數(shù)據(jù)*/
void Send(uchar Data)
{
uchar BitCounter=8; 				//位數(shù)控制
uchar temp; 						//中間變量控制
do
{
temp=Data;
Scl=0;
_nop_();_nop_();_nop_();_nop_();
if((temp&0x80)==0x80)			//如果最高位是1
Sda=1;
else
Sda=0;
Scl=1;
temp=Data<<1; 					//RLC
Data=temp;
BitCounter--;
}while(BitCounter);
Scl=0;
}

/*讀一個字節(jié)的數(shù)據(jù),并返回該字節(jié)值*/
uchar Read(void) 
{
uchar temp=0;
uchar temp1=0;
uchar BitCounter=8;
Sda=1;
do{
Scl=0;
_nop_();_nop_();_nop_();_nop_();
Scl=1;
_nop_();_nop_();_nop_();_nop_();
if(Sda) 						//如果Sda=1
temp=temp|0x01; 				//temp的最低位置1
else
temp=temp&0xfe; 				//否則temp的最低位清0
if(BitCounter-1)
{
temp1=temp<<1;
temp=temp1;
}
BitCounter--;
}while(BitCounter);
return(temp);
}

void WrToROM(uchar Data[],uchar Address,uchar Num)
{
uchar i;
uchar *PData;
PData=Data;
for(i=0;i<Num;i++)
{
Start(); 					//發(fā)送啟動信號
Send(0xa0); 				//發(fā)送SLA+W
Ack();
Send(Address+i); 			//發(fā)送地址
Ack();
Send(*(PData+i));
Ack();
Stop();
mDelay(20);
}
}

void RdFromROM(uchar Data[],uchar Address,uchar Num)
{
uchar i;
uchar *PData;
PData=Data;
for(i=0;i<Num;i++)
{
Start();
Send(0xa0);
Ack();
Send(Address+i);
Ack();
Start();
Send(0xa1);
Ack();
*(PData+i)=Read();
Scl=0;
NoAck();
Stop();
}
}

void main()
{
uchar Number[4]={1,2,3,4};
WP= 1;
WrToROM(Number,4,4); 				//將初始化后的數(shù)值寫入EEPROM
mDelay(20);
Number[0]=0;
Number[1]=0;
Number[2]=0;
Number[3]=0; 					//將數(shù)組中的值清掉，以驗證讀出的數(shù)是否正確
RdFromROM(Number,4,4);
}