Миландр

typedef unsigned char BYTE;
typedef unsigned int WORD;
typedef unsigned long DWORD;

void ErasePage(DWORD Addr)
{
 EEPROM_ADR = Addr;
 EEPROM_CMD |= 0x0040;// XE=1
 EEPROM_CMD |= 0x0400;// ERASE=1
 Sleep(35);// 5.5us
 EEPROM_CMD |= 0x2000;// NVSTR=1
 Sleep(300000);// 46ms
 EEPROM_CMD &= 0xFFFFFBFF;// ERASE=0
 Sleep(35);// 5.5us
 EEPROM_CMD &= 0xFFFFFFBF;// XE=0
 EEPROM_CMD &= 0xFFFFDFFF;// NVSTR=0
 Sleep(10); // 1.8us
}
//--------------------------------- 
void ProgramSignalsOn(void)
{
 EEPROM_CMD |= 0x0040;// XE=1
 EEPROM_CMD |= 0x1000;// PROG=1
 Sleep(35);// 5.5us
 EEPROM_CMD |= 0x2000;// NVSTR=1
 Sleep(70);// 10.6us
}
//--------------------------------- 
void ProgramSignalsOff(void)
{
 EEPROM_CMD &= 0xFFFFEFFF;// PROG=0
 Sleep(35);// 5.5us
 EEPROM_CMD &= 0xFFFFFFBF;// XE=0
 EEPROM_CMD &= 0xFFFFDFFF;// NVSTR=0
 Sleep(10); // 1.8us
}
//--------------------------------- 
void WriteFlash(DWORD Addr, DWORD Data)
{
 EEPROM_ADR = Addr;
 EEPROM_DI = Data; 

 Sleep(1);// 0.3us
 EEPROM_CMD |= 0x0080;// YE=1	
 Sleep(300);// 46us			    
 EEPROM_CMD &= 0xFFFFFF7F;// YE=0	
 Sleep(1);// 0.3us
}
//--------------------------------- 
void StoreConst_RAM(void)
{
 int i,j;
 DisableInterrupts();
 EEPROM_CMD |= 0x0001;// CON=1
 ErasePage(0x0801f000);

 for(i=0;i<4;i++)
  {
   EEPROM_ADR = 0x0801f000+i*4;

   ProgramSignalsOn();

   for(j=0;j<104;j+=4) 
    {
     WriteFlash( 0x0801f000+i*4+j*4 ,Buf[i+j]);
	}

   ProgramSignalsOff();
  }
  
 EEPROM_CMD &= 0xFFFFFFFE;// CON=0
 EnableInterrupts();
}

LR_IROM1 0x20007800 0x00000400  {    ; load region size_region
  ER_IROM1 0x20007800 0x00000400  {  ; load address = execution address
   *.o (RESET, +First)
   *(InRoot$$Sections)
   .ANY (+RO)
  }
  RW_IRAM1 0x20007C00 0x00000400  {  ; RW data
   .ANY (+RW +ZI)
  }
}