STC89C52单片机内部EEPROM驱动

STC89C52单片机自身带有4K的存储空间，分为8个扇区，每个扇区512字节，第一扇区起始地址为：0x2000, 结束地址为：21FF， 第八扇区起始地址为0x2E00，结束地址是2FFF

#include <reg52.h>

#include <intrins.h>

#define uchar unsigned char

#define uint unsigned int

/******************定义命令字节******************/     

#define Read_COM    0x01                     //字节读数据命令   

#define Prog_COM    0x02                    //字节编程数据命令   

#define Erase_COM    0x03                   //扇区擦除数据命令    

#define En_Wait_TIME    0x81                //设置等待时间 ,并使能ISP/IAP      

#define Start_ADDRH 0x20                    //扇区地址高位    

#define Start_ADDRL 0x00                    //扇区地址低位

/****************特殊功能寄存器声明****************/

sfr ISP_DATA = 0xe2; 

sfr ISP_ADDRH = 0xe3;   

sfr ISP_ADDRL = 0xe4; 

sfr ISP_CMD = 0xe5; 

sfr ISP_TRIG = 0xe6;    

sfr ISP_CONTR = 0xe7;

/*****************关闭ISP&IAP功能*****************/   

void ISP_IAP_disable(void)   

{   

    ISP_CONTR = 0x00;   

    ISP_CMD = 0x00;    

    ISP_TRIG = 0x00;   

}   

/*********************字节读**********************/     

uchar Byte_read(uint byte_addr)   

{   

    EA = 0;                                        //关中断    

    ISP_CONTR = En_Wait_TIME;                   //开启ISP&IAP，并送等待时间    

    ISP_CMD = Read_COM;                         //送字节读命令字       

    ISP_ADDRH = (uchar)(byte_addr >> 8);          //送地址高字节    

    ISP_ADDRL = (uchar)(byte_addr & 0x00ff);    //送地址低字节        

    ISP_TRIG = 0x46;                            //送触发命令字0x46   

    ISP_TRIG = 0xB9;                            //送触发命令字0xB9   

    _nop_();   

    ISP_IAP_disable();                          //关闭ISP&IAP功能    

    EA = 1;                                     //开中断    

    return (ISP_DATA);   

}     

/*********************字节编程*********************/   

void Byte_program(uint byte_addr,uchar isp_iap_data)   

{   

    EA = 0;                                     //关中断    

    ISP_CONTR = En_Wait_TIME;                   //开启ISP&IAP，并送等待时间    

    ISP_CMD = Prog_COM;                         //送字节编程命令字      

    ISP_ADDRH = (uchar)(byte_addr >> 8);          //送地址高字节    

    ISP_ADDRL = (uchar)(byte_addr & 0x00ff);    //送地址低字节        

    ISP_DATA = isp_iap_data;                    //送数据进ISP_DATA    

    ISP_TRIG = 0x46;                            //送触发命令字0x46   

    ISP_TRIG = 0xB9;                            //送触发命令字0xB9   

    _nop_();   

    ISP_IAP_disable();                          //关闭ISP&IAP功能    

    EA = 1;                                     //开中断       

}   

   

/*********************扇区擦除*********************/   

void Sector_erase(uint sector_addr)   

{   

    EA = 0;                                     //关中断    

    ISP_CONTR = En_Wait_TIME;                   //开启ISP&IAP;并送等待时间    

    ISP_CMD = Erase_COM;                        //送扇区擦除命令字      

    ISP_ADDRH = (uchar)(sector_addr >> 8);       //送地址高字节    

    ISP_ADDRL = (uchar)(sector_addr & 0X00FF);    //送地址低字节        

    ISP_TRIG = 0X46;                            //送触发命令字0x46  

    ISP_TRIG = 0XB9;                            //送触发命令字0xB9   

    _nop_();   

    ISP_IAP_disable();                          //关闭ISP&IAP功能    

    EA = 1;   

}  

void main()   

{      

    Sector_erase(0x2000);                       //扇区擦除    

    Byte_program(0x2000,0x88);                     //写EEPROM    

    _nop_();   

    _nop_();   

    _nop_(); 

    _nop_();   

    _nop_();   

    _nop_();   

    P0=Byte_read(0x2000);                        //读EEPROM

    while(1);    

}