|
|
/*---------------------------------------------------------------------*/
/* --- STC MCU Limited ------------------------------------------------*/
/* --- STC15F4K60S4 系列 內(nèi)部EEPROM舉例--------------------------------*/
/* --- Mobile: (86)13922805190 ----------------------------------------*/
/* --- Fax: 86-755-82905966 -------------------------------------------*/
/* --- Tel: 86-755-82948412 -------------------------------------------*/
/* --- Web: www.STCMCU.com --------------------------------------------*/
/* 如果要在程序中使用此代碼,請(qǐng)?jiān)诔绦蛑凶⒚魇褂昧撕昃Э萍嫉馁Y料及程序 */
/* 如果要在文章中應(yīng)用此代碼,請(qǐng)?jiān)谖恼轮凶⒚魇褂昧撕昃Э萍嫉馁Y料及程序 */
/*---------------------------------------------------------------------*/
//本示例在Keil開(kāi)發(fā)環(huán)境下請(qǐng)選擇Intel的8058芯片型號(hào)進(jìn)行編譯
//假定測(cè)試芯片的工作頻率為18.432MHz
#include "reg51.h"
#include "intrins.h"
typedef unsigned char BYTE;
typedef unsigned int WORD;
//-----------------------------------------------
sfr IAP_DATA = 0xC2; //IAP數(shù)據(jù)寄存器
sfr IAP_ADDRH = 0xC3; //IAP地址寄存器高字節(jié)
sfr IAP_ADDRL = 0xC4; //IAP地址寄存器低字節(jié)
sfr IAP_CMD = 0xC5; //IAP命令寄存器
sfr IAP_TRIG = 0xC6; //IAP命令觸發(fā)寄存器
sfr IAP_CONTR = 0xC7; //IAP控制寄存器
#define CMD_IDLE 0 //空閑模式
#define CMD_READ 1 //IAP字節(jié)讀命令
#define CMD_PROGRAM 2 //IAP字節(jié)編程命令
#define CMD_ERASE 3 //IAP扇區(qū)擦除命令
#define URMD 0 //0:使用定時(shí)器2作為波特率發(fā)生器
//1:使用定時(shí)器1的模式0(16位自動(dòng)重載模式)作為波特率發(fā)生器
//2:使用定時(shí)器1的模式2(8位自動(dòng)重載模式)作為波特率發(fā)生器
sfr T2H = 0xd6; //定時(shí)器2高8位
sfr T2L = 0xd7; //定時(shí)器2低8位
sfr AUXR = 0x8e; //輔助寄存器
//#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
//測(cè)試地址
#define IAP_ADDRESS 0x0400
void Delay(BYTE n);
void IapIdle();
BYTE IapReadByte(WORD addr);
void IapProgramByte(WORD addr, BYTE dat);
void IapEraseSector(WORD addr);
void InitUart();
BYTE SendData(BYTE dat);
void main()
{
WORD i;
P1 = 0xfe; //1111,1110 系統(tǒng)OK
InitUart(); //初始化串口
Delay(10); //延時(shí)
IapEraseSector(IAP_ADDRESS); //扇區(qū)擦除
for (i=0; i<512; i++) //檢測(cè)是否擦除成功(全FF檢測(cè))
{
if (SendData(IapReadByte(IAP_ADDRESS+i)) != 0xff)
goto Error; //如果出錯(cuò),則退出
}
P1 = 0xfc; //1111,1100 擦除成功
Delay(10); //延時(shí)
for (i=0; i<512; i++) //編程512字節(jié)
{
IapProgramByte(IAP_ADDRESS+i, (BYTE)i);
}
P1 = 0xf8; //1111,1000 編程完成
Delay(10); //延時(shí)
for (i=0; i<512; i++) //校驗(yàn)512字節(jié)
{
if (SendData(IapReadByte(IAP_ADDRESS+i)) != (BYTE)i)
goto Error; //如果校驗(yàn)錯(cuò)誤,則退出
}
P1 = 0xf0; //1111,0000 測(cè)試完成
while (1);
Error:
P1 &= 0x7f; //0xxx,xxxx IAP操作失敗
while (1);
}
/*----------------------------
軟件延時(shí)
----------------------------*/
void Delay(BYTE n)
{
WORD x;
while (n--)
{
x = 0;
while (++x);
}
}
/*----------------------------
關(guān)閉IAP
----------------------------*/
void IapIdle()
{
IAP_CONTR = 0; //關(guān)閉IAP功能
IAP_CMD = 0; //清除命令寄存器
IAP_TRIG = 0; //清除觸發(fā)寄存器
IAP_ADDRH = 0x80; //將地址設(shè)置到非IAP區(qū)域
IAP_ADDRL = 0;
}
/*----------------------------
從ISP/IAP/EEPROM區(qū)域讀取一字節(jié)
----------------------------*/
BYTE IapReadByte(WORD addr)
{
BYTE dat; //數(shù)據(jù)緩沖區(qū)
IAP_CONTR = ENABLE_IAP; //使能IAP
IAP_CMD = CMD_READ; //設(shè)置IAP命令
IAP_ADDRL = addr; //設(shè)置IAP低地址
IAP_ADDRH = addr >> 8; //設(shè)置IAP高地址
IAP_TRIG = 0x5a; //寫(xiě)觸發(fā)命令(0x5a)
IAP_TRIG = 0xa5; //寫(xiě)觸發(fā)命令(0xa5)
_nop_(); //等待ISP/IAP/EEPROM操作完成
dat = IAP_DATA; //讀ISP/IAP/EEPROM數(shù)據(jù)
IapIdle(); //關(guān)閉IAP功能
return dat; //返回
}
/*----------------------------
寫(xiě)一字節(jié)數(shù)據(jù)到ISP/IAP/EEPROM區(qū)域
----------------------------*/
void IapProgramByte(WORD addr, BYTE dat)
{
IAP_CONTR = ENABLE_IAP; //使能IAP
IAP_CMD = CMD_PROGRAM; //設(shè)置IAP命令
IAP_ADDRL = addr; //設(shè)置IAP低地址
IAP_ADDRH = addr >> 8; //設(shè)置IAP高地址
IAP_DATA = dat; //寫(xiě)ISP/IAP/EEPROM數(shù)據(jù)
IAP_TRIG = 0x5a; //寫(xiě)觸發(fā)命令(0x5a)
IAP_TRIG = 0xa5; //寫(xiě)觸發(fā)命令(0xa5)
_nop_(); //等待ISP/IAP/EEPROM操作完成
IapIdle();
}
/*----------------------------
扇區(qū)擦除
----------------------------*/
void IapEraseSector(WORD addr)
{
IAP_CONTR = ENABLE_IAP; //使能IAP
IAP_CMD = CMD_ERASE; //設(shè)置IAP命令
IAP_ADDRL = addr; //設(shè)置IAP低地址
IAP_ADDRH = addr >> 8; //設(shè)置IAP高地址
IAP_TRIG = 0x5a; //寫(xiě)觸發(fā)命令(0x5a)
IAP_TRIG = 0xa5; //寫(xiě)觸發(fā)命令(0xa5)
_nop_(); //等待ISP/IAP/EEPROM操作完成
IapIdle();
}
/*----------------------------
初始化串口
----------------------------*/
void InitUart()
{
SCON = 0x5a; //設(shè)置串口為8位可變波特率
#if URMD == 0
T2L = 0xd8; //設(shè)置波特率重裝值
T2H = 0xff; //115200 bps(65536-18432000/4/115200)
AUXR = 0x14; //T2為1T模式, 并啟動(dòng)定時(shí)器2
AUXR |= 0x01; //選擇定時(shí)器2為串口1的波特率發(fā)生器
#elif URMD == 1
AUXR = 0x40; //定時(shí)器1為1T模式
TMOD = 0x00; //定時(shí)器1為模式0(16位自動(dòng)重載)
TL1 = 0xd8; //設(shè)置波特率重裝值
TH1 = 0xff; //115200 bps(65536-18432000/4/115200)
TR1 = 1; //定時(shí)器1開(kāi)始啟動(dòng)
#else
TMOD = 0x20; //設(shè)置定時(shí)器1為8位自動(dòng)重裝載模式
AUXR = 0x40; //定時(shí)器1為1T模式
TH1 = TL1 = 0xfb; //115200 bps(256 - 18432000/32/115200)
TR1 = 1;
#endif
}
/*----------------------------
發(fā)送串口數(shù)據(jù)
----------------------------*/
BYTE SendData(BYTE dat)
{
while (!TI); //等待前一個(gè)數(shù)據(jù)發(fā)送完成
TI = 0; //清除發(fā)送標(biāo)志
SBUF = dat; //發(fā)送當(dāng)前數(shù)據(jù)
return dat;
}
這個(gè)是手冊(cè)上的例程，但是在串口調(diào)試中卻沒(méi)有效果。什么原因呢？
|
|
