单片机与EEPROM（24c02n）的通信问题 各位大神帮忙

Question

我直接把郭天祥教学视频中写的通信程序，下载到开发板上。单片机为STC59C52 。出现了问题 只有几个有规律的地址才能写进数去，其它地址写不进去 ，为什么
下面是源程序

#include<reg52.h>
#define uchar unsigned char
sbit sda=P2^0;
sbit scl=P2^1;
uchar a;
void delay()
{ ;; }
void start() //开始信号
{
sda=1;
delay();
scl=1;
delay();
sda=0;
delay();
}

void stop() //停止
{
sda=0;
delay();
scl=1;
delay();
sda=1;
delay();
}

void respons() //应答
{
uchar i;
scl=1;
delay();
while((sda==1)&&(i<250))i++;
scl=0;
delay();
}

void init()
{
sda=1;
delay();
scl=1;
delay();
}

void write_byte(uchar date)
{
uchar i,temp;
temp=date;

for(i=0;i<8;i++)
{
temp=temp<<1;
scl=0;
delay();
sda=CY;
delay();
scl=1;
delay();
// scl=0;
// delay();
}
scl=0;
delay();
sda=1;
delay();
}

uchar read_byte()
{
uchar i,k;
scl=0;
delay();
sda=1;
delay();
for(i=0;i<8;i++)
{
scl=1;
delay();
k=(k<<1)|sda;
scl=0;
delay();
}
return k;
}

void delay1(uchar x)
{
uchar a,b;
for(a=x;a>0;a--)
for(b=100;b>0;b--);
}

void write_add(uchar address,uchar date)
{
start();
write_byte(0xa0);
respons();
write_byte(address);
respons();
write_byte(date);
respons();
stop();
}

uchar read_add(uchar address)
{
uchar date;
start();
write_byte(0xa0);
respons();
write_byte(address);
respons();
start();
write_byte(0xa1);
respons();
date=read_byte();
stop();
return date;
}

void main()
{
init();
write_add(23,0xee); //此处的23只能是7,15,23,31,39。。。
// 。。等差为8的数才能写进数值 其它地址都不行
delay1(100);
P2=read_add(23); //此处除了上面写的那些数，P2输出ee外，其它数都输出ff，为什么
while(1);
}

Answer 1

你把delay延时加大，比如加大为原来的10倍或100倍，然后试试。

追问

还是不行，是不是与24c02有关。 我看资料说，它的内部是页存的，八位为一页。 和这个有关吗

追答

你的程序是单字节操作，与页无关。
read_byte()里面定义k时，先赋值令k=0，然后再进行8个bit的循环，看行不行。另外24c02的WP管脚没有保护起来吧？

追问

还是不行，WP脚也接着地呢

追答

我用proteus仿真了一下你的程序，用12M的晶振，最后的P2=read_add(23);改成了P3口，没啥问题，写任何地址，读回来的数据都是正常的。你是硬件仿真还是软件仿真？如果是硬件的话，是不是你的24c02芯片坏了。

追问

我在开发板上试的。不知道是不是硬件的问题，如果坏的话，为什么那些有规律的地址可以写进去。有空买个新的24c02再试试 你说的用proteus仿真，我想学一学。 哪个版本的仿真软件比较好啊，最好是那个软件的下载网站， 还有哪里有学习这款仿真软件的资料啊 谢谢

追答

用proteus吧，功能很全，绝大多数的数字芯片和模拟器件都可以仿真，比较多人用，问起来比较方便。你去搜索一下，下载一个。也可以留个email，发个给你，有六十多M。
当然了，软件仿真完了，硬件仿真还是必须的。

追问

邮箱是627855962@qq.com

Answer 2

?