eeprom(at90s8535).c

AT90S8535内有512B的EEPROM用于存放数据和表格

/*******************************************************************************
FileName        :EEPROM(AT90S8535)
Chip type       :AT90S8535
Clock frequency :8.0000MHz
Function        :AT90S8535内有512B的EEPROM用于存放数据和表格，本程序实现对EEPROM
                进行读写操作，并将数据显示在数码管上。             
*******************************************************************************/
#include <io8535v.h>                 
#define uchar unsigned char
#define uint  unsigned int

//数码管字型表，对应0，1，2，3，4，5，6，7，8，9，A,B,C,D,E,F//
uchar Table[16]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
                 0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71};
uchar Read_Data[4];            //定义读出数据

void DelayMs(uint i)           //Ms级延时，参数i为延时时间
{uint j;
 for(i=8;i!=0;i--)
  {for(j=888;j!=0;j--) {;}}
}

void Display(uchar *p)         //动态显示函数，参数p为待显示的数组名
{uchar i,sel=0x01;           
 for(i=0;i<4;i++)
  {PORTC=sel;                  //选通最右边的数码管
   PORTA=~Table[p[i]];         //送字型码
   DelayMs(1);                 //显示延时    
   sel=sel<<1;                 //移位以显示前一位
  }
}

void Init_IO(void)             //初始化I/O口
{DDRA=0xff;                    //设置A口为推挽1输出
 PORTA=0xff;
 DDRC=0xff;                    //设置C口为推挽1输出             
 PORTC=0xff;
}

//*******************写一字节数据到EEPROM********************//
void Write_EEPROM(uchar Data,uint Address)
{if(EECR&0x02) DelayMs(4);    //判断写使能是否为0
 EEARH=Address>>8;            //送高地址
 EEARL=Address&0x00ff;        //送低地址
 EEDR=Data;                   //写入数据
 EECR=EECR|0x04;              //主写使能置位
 EECR=EECR|0x02;              //写使能置位
 DelayMs(4);
}

//*******************从EEPROM读一字节数据********************//
uchar Read_EEPROM(uint Address)
{uchar i;
 if(EECR&0x01) DelayMs(4);   //判断读使能是否为0
 EEARH=Address>>8;           //送高地址
 EEARL=Address&0x00ff;       //送低地址
 EECR=EECR|0x01;             //读使能置位
 DelayMs(5);
 i=EEDR;                     //读数据
 return(i);                  //返回读取数据
}

void main(void)
{uchar i;
 Init_IO();                    //初始化I/O口
 PORTA=0xff;                   //点亮以测试所有的数码管
 PORTC=0x00;   
 DelayMs(300);                 //延时
 PORTC=0xff;                   //熄灭所有的数码管
 for(i=0;i<4;i++)              //写4B数据:9,A,b,C
    Write_EEPROM(i+9,i);
 for(i=0;i<4;i++)              //读4B数据
    Read_Data[i]=Read_EEPROM(i);
 while(1)
 Display(Read_Data);
}