//***************ICCAVR 编译*****************//

#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(4*i,i);
for(i=0;i<4;i++)
    Read_Data[i]=Read_EEPROM(i);
while(1)
Display(Read_Data);
}