ATmega8535L Eeprom示例程序

//***************ICCAVR V6.30编译*****************// 

#include                  

#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!=0;i--) 
  {for(j=8000;j!=0;j--) {;}} 
} 

void Display(uchar *p)         //动态显示函数，参数p为待显示的数组名 
{uchar i,sel=0x01;            
 for(i=0;i<4;i++) 
  {PORTA=sel;                  //选通最右边的数码管 
   PORTC=0xff-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; 
} 

void Write_EEPROM(uchar Data,uint Address) 
{if(EECR&0x20) DelayMs(4); 
 EEARH=Address>>8; 
 EEARL=Address&0x00ff; 
 EEDR=Data; 
 EECR=EECR|0x04; 
 EECR=EECR|0x02; 
 DelayMs(4); 
} 

uchar Read_EEPROM(uint Address) 
{uchar i; 
 if(EECR&0x01) DelayMs(4); 
 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++) 
    Write_EEPROM(5*i,i); 
 for(i=0;i<4;i++) 
    Read_Data[i]=Read_EEPROM(i); 
 while(1) 
 Display(Read_Data); 
}