4线EEPROM的C51源程序

sbit RomCS= 0xA0^3;

sbit RomCLK= 0xA0^2;
sbit RomDI= 0xA0^1;
sbit RomDO= 0xA0^0;

#define OPCODE_BIT3/*功能码位数*/
#define ADDRESS_BIT8/*地址位数*/
#define DATA_BIT16/*数据位数*/
#define WAITE_TIME500/*设置一个最大延时等待数值.注意在不同的晶振下延时是不同的*/

/***********************************************************************/
/*名称: main()
/*说明: 用于EEPROM 的调试
/***********************************************************************/
/*
main()
{
unsigned char n,tmp;
if(!Rom_EraseAll())
{
Com0_SendByte('b');
}

for(n=0;n<0xef;n++)//in 46 n range from 0 to 7f
{
if(!Rom_Write(n,n))
{
Com0_SendByte('a');//add write error process here
}
}
while(1)
{
for(n=0;n<0xef;n++)//in 46 n range from 0 to 7f
{
tmp=Rom_Read(n);
Com0_SendByte(tmp);
Delay(60000);
Com0_SendByte(n);
Delay(65535);
}
}
}
*/
/***********************************************************************/
/*名称: Rom_Start()
/*说明: 用于EEPROM 的启动，防止由于RomCS 的改动而引起数据时序混乱
/***********************************************************************/
void Rom_Start()
{
RomDO=1; //防止DO 由于是低电平而无法输入
RomCS=1;//开启EEPROM
RomCS=0;
RomDI=0;
RomCLK=0;
RomCS=1;
}

/***********************************************************************/
/*名称:Rom_End()
/*说明:用于EEPROM 的结束，防止由于RomCS 的改动而引起数据线为0 而无法输入
/***********************************************************************/
void Rom_End()
{
RomCS=0;
RomDI=1;
RomCLK=1;
}

/***********************************************************************/
/*名称:Rom_SendData()
/*说明:在EEPROM 启动下，送入指定位数的数据
/*输入: Word 要输入的数据
/*num 输入的位数
/***********************************************************************/
void Rom_SendData(unsigned int Word,unsigned char Length)
{
unsigned char i;

Word=Word<<(16-Length); //左移去掉无用位
for(i=0 ; i{
if( (Word & 0x8000) == 0 )
{
RomDI=0;
}
else
{
RomDI=1;
}
RomCLK=1;
RomCLK=0;
Word = Word<<1;
}
}

/***********************************************************************/
/*名称: Rom_EWEN()
/*说明: EEPROM 的编程启动.操作码(100 11XXXXXXX)
/***********************************************************************/
void Rom_EWEN()
{
Rom_Start();
Rom_SendData(0x0004,OPCODE_BIT);//送入操作码
Rom_SendData(0x00C0,ADDRESS_BIT);//送入地址
Rom_End();
}

/***********************************************************************/
/*名称: Rom_EWDS()
/*说明: EEPROM 的编程关闭.操作码(100 00XXXXXXX)
/***********************************************************************/
void Rom_EWDS()
{
Rom_Start();
Rom_SendData(0x0004,OPCODE_BIT);//送入操作码
Rom_SendData(0x0000,ADDRESS_BIT);//送入地址
Rom_End();
}

/***********************************************************************/
/*名称:Rom_Read()
/*说明:EEPROM 的字读取程序
/*输入:要读取的字节地址
/*输出:读取的数据值
/***********************************************************************/
unsigned int Rom_Read(unsigned int Address)
{
unsigned char i;
unsigned int Word = 0;
Rom_Start();
Rom_SendData(0x06,OPCODE_BIT);
Rom_SendData(Address,ADDRESS_BIT);
for(i=0 ; i{
Word = Word<<1;
RomCLK = 1;
RomCLK = 0;
if(RomDO)
{
Word = Word|0x0001;
}
}
Rom_End();
return Word;
}

/***********************************************************************/
/*名称:Rom_Write()
/*说明:EEPROM 的字写入程序
/*输入: Address 要写入的字节地址
/* Word 要写入的数据
/*输出:读取是否成功
/***********************************************************************/
bit Rom_Write(unsigned int Address,unsigned int Word)
{
bit WriteFlag = 0;
unsigned int Counter;

Rom_EWEN();
Rom_Start();
Rom_SendData(0x0005,OPCODE_BIT);
Rom_SendData(Address,ADDRESS_BIT);
Rom_SendData(Word,DATA_BIT);
RomCS = 0;
RomCS = 1;
Counter = WAITE_TIME;
while(!RomDO)
{
Counter--;
if(Counter==0)
{
WriteFlag = 1;//WriteFlag=1则写入失败
break;
}
}
Rom_End();
Rom_EWDS();
return WriteFlag;//返回表示写入状态的特征
}

/***********************************************************************/
/*名称:Rom_WriteAll()
/*说明:EEPROM 的写全部程序
/*输入:Word 要写入的数据
/*输出:写入是否成功
/***********************************************************************/
bit Rom_WriteAll(unsigned int Word)
{
bit WriteFlag = 0;
unsigned int Counter;
Rom_EWEN();
Rom_Start();
Rom_SendData(0x04,OPCODE_BIT);
Rom_SendData(0x40,ADDRESS_BIT);
Rom_SendData(Word,DATA_BIT);
RomCS = 0;
RomCS = 1;
Counter = WAITE_TIME;
while(!RomDO)
{
Counter--;
if(Counter==0)
{
WriteFlag=1;//WriteFlag=1则写入失败
break;
}
}
Rom_End();
Rom_EWDS();
return WriteFlag;//返回表示写入状态的特征
}

/***********************************************************************/
/*名称:Rom_Erase()
/*说明:EEPROM 的字擦除程序
/*输入: Address 要擦除的字地址
/*输出:擦除是否成功
/***********************************************************************/
bit Rom_Erase(unsigned int Address)
{
bit EraseFlag = 0;
unsigned int Counter;
Rom_EWEN();
Rom_Start();
Rom_SendData(0x07,OPCODE_BIT);
Rom_SendData(Address,ADDRESS_BIT);
RomCS = 0;
RomCS = 1;
Counter = WAITE_TIME;
while(!RomDO)
{
Counter--;
if(Counter==0)
{
EraseFlag = 1;//EraseFlag=1则擦除失败
break;
}
}
Rom_End();
Rom_EWDS();
return EraseFlag;//返回表示擦除状态的特征
}
/***********************************************************************/
/*名称:Rom_EraseAll()
/*说明:EEPROM 的全部擦除程序
/*输出:擦除是否成功
/***********************************************************************/
bit Rom_EraseAll(void)
{
bit EraseFlag = 0;
unsigned int Counter;
Rom_EWEN();
Rom_Start();
Rom_SendData(0x04,OPCODE_BIT);
Rom_SendData(0x80,ADDRESS_BIT);
RomCS = 0;
RomCS = 1;
Counter = WAITE_TIME;
while(!RomDO)
{
Counter--;
if(Counter==0)
{
EraseFlag = 1;//EraseFlag=1则擦除失败
break;
}
}
Rom_End();
Rom_EWDS();
return EraseFlag;//返回表示擦除状态的特征
}