//STC12C5620AD系列单片机EEPROM/IAP 功能测试程序演示
/*--------------------------------------------------------------------------*/
/* --- STC MCU International Limited ---------------------------------------*/
/* --- 演示STC 1T 系列单片机 EEPROM/IAP功能------------------------------*/
/* --- Mobile: (86)13922805190 ---------------------------------------------*/
/* --- Fax: 86-755-82944243 ------------------------------------------------*/
/* --- Tel: 86-755-82948412 ------------------------------------------------*/
/* --- Web: www.STCMCU.com -------------------------------------------------*/
/* 如果要在程序中使用或在文章中引用该程序,---------------------------------*/
/* 请在程序中或文章中注明使用了宏晶科技的资料及程序-------------------------*/
/*--------------------------------------------------------------------------*/
// 在STC官方手册例程的基础上加上了串口打印功能,方便看出测试成功否?
// 连续打印512次01表示读成功;连续打印512次02表示写成功;
// 连续打印512次03表示检验比对成功;打印1次04测试程序完成
//#include "reg51.h"
#include "intrins.h"
#include "STC12C5608AD.h"
typedef unsigned char u8;
typedef unsigned int u16;
/* Declare SFR associated with the IAP */
sfr IAP_DATA = 0xE2; //Flash data register
sfr IAP_ADDRH = 0xE3; //Flash address HIGH
sfr IAP_ADDRL = 0xE4; //Flash address LOW
sfr IAP_CMD = 0xE5; //Flash command register
sfr IAP_TRIG = 0xE6; //Flash command trigger
sfr IAP_CONTR = 0xE7; //Flash control register
/*Define ISP/IAP/EEPROM command*/
#define CMD_IDLE 0 //Stand-By
#define CMD_READ 1 //Byte-Read
#define CMD_PROGRAM 2 //Byte-Program
#define CMD_ERASE 3 //Sector-Erase
/*Define ISP/IAP/EEPROM operation const for IAP_CONTR*/
//#define ENABLE_IAP 0x80 //if SYSCLK<30MHz
//#define ENABLE_IAP 0x81 //if SYSCLK<24MHz
//#define ENABLE_IAP 0x82 //if SYSCLK<20MHz
#define ENABLE_IAP 0x83 //if SYSCLK<12MHz
//#define ENABLE_IAP 0x84 //if SYSCLK<6MHz
//#define ENABLE_IAP 0x85 //if SYSCLK<3MHz
//#define ENABLE_IAP 0x86 //if SYSCLK<2MHz
//#define ENABLE_IAP 0x87 //if SYSCLK<1MHz
//Start address for STC12C5620AD series EEPROM
#define IAP_ADDRESS 0x0400
#define FOSC 11059200L
#define BAUD 9600
void Delay(u8 n);
void IapIdle();
u8 IapReadu8(u16 addr);
void IapProgramu8(u16 addr, u8 dat);
void IapEraseSector(u16 addr);
void Uart0_init()
{
TMOD = 0x21;
TH1 = TL1 = -(FOSC/12/32/BAUD);
SCON = 0x50;
PCON = 0x00;
TR1 = 1;
ES = 1;
EA = 1;
}
void UART0_SendByte(u8 comd)
{
SBUF=comd;
while(!TI);
TI=0;
}
void main()
{
u16 i;
Uart0_init();
P1 = 0xfe; //1111,1110 System Reset OK
Delay(10); //Delay
IapEraseSector(IAP_ADDRESS); //Erase current sector
for (i=0; i<512; i++) //Check whether all sector data is FF
{
if (IapReadu8(IAP_ADDRESS+i) != 0xff)
goto Error; //If error, break
else
UART0_SendByte(0x01);
}
P1 = 0xfc; //1111,1100 Erase successful
Delay(10); //Delay
for (i=0; i<512; i++) //Program 512 u8s data into data flash
{
IapProgramu8(IAP_ADDRESS+i, (u8)i);
UART0_SendByte(0x02);
}
P1 = 0xf8; //1111,1000 Program successful
Delay(10); //Delay
for (i=0; i<512; i++) //Verify 512 u8s data
{
if (IapReadu8(IAP_ADDRESS+i) != (u8)i)
goto Error; //If error, break
else
UART0_SendByte(0x03);
}
P1 = 0xf0; //1111,0000 Verify successful
UART0_SendByte(0x04);
while (1);
Error:
P1 &= 0x7f; //0xxx,xxxx IAP operation fail
UART0_SendByte(0x08);
while(1);
}
/*-----Software delay function-----*/
void Delay(u8 n)
{
u16 x;
while (n--)
{
x = 0;
while (++x);
}
}
/*-----Disable ISP/IAP/EEPROM function
Make MCU in a safe state
----------------------------*/
void IapIdle()
{
IAP_CONTR = 0; //Close IAP function
IAP_CMD = 0; //Clear command to standby
IAP_TRIG = 0; //Clear trigger register
IAP_ADDRH = 0x80; //Data ptr point to non-EEPROM area
IAP_ADDRL = 0; //Clear IAP address to prevent misuse
}
/*-----Read one u8 from ISP/IAP/EEPROM area
Input: addr (ISP/IAP/EEPROM address)
Output: Flash data
----------------------*/
u8 IapReadu8(u16 addr)
{
u8 dat; //Data buffer
IAP_CONTR = ENABLE_IAP; //Open IAP function, and set wait time
IAP_CMD = CMD_READ; //Set ISP/IAP/EEPROM READ command
IAP_ADDRL = addr; //Set ISP/IAP/EEPROM address low
IAP_ADDRH = addr >> 8; //Set ISP/IAP/EEPROM address high
IAP_TRIG = 0x46; //Send trigger command1 (0x46)
IAP_TRIG = 0xb9; //Send trigger command2 (0xb9)
_nop_(); //MCU will hold here until ISP/IAP/EEPROM
//operation complete
dat = IAP_DATA; //Read ISP/IAP/EEPROM data
IapIdle(); //Close ISP/IAP/EEPROM function
return dat; //Return Flash data
}
/*-----Program one u8 to ISP/IAP/EEPROM area
Input: addr (ISP/IAP/EEPROM address)
dat (ISP/IAP/EEPROM data)
Output:
-----------------------------*/
void IapProgramu8(u16 addr, u8 dat)
{
IAP_CONTR = ENABLE_IAP;
IAP_CMD = CMD_PROGRAM;
IAP_ADDRL = addr;
IAP_ADDRH = addr >> 8;
IAP_DATA = dat; //Write ISP/IAP/EEPROM data
IAP_TRIG = 0x46;
IAP_TRIG = 0xb9;
_nop_();
IapIdle();
}
/*-----Erase one sector area
Input: addr (ISP/IAP/EEPROM address)
Output:
-----------------------------*/
void IapEraseSector(u16 addr)
{
IAP_CONTR = ENABLE_IAP;
IAP_CMD = CMD_ERASE;
IAP_ADDRL = addr;
IAP_ADDRH = addr >> 8;
IAP_TRIG = 0x46;
IAP_TRIG = 0xb9;
_nop_();
IapIdle();
}