跨届大侠
北京龙邱智能科技有限公司
- 积分
- 10332
- 威望
- 2905
- 贡献
- 6151
- 兑换币
- 4515
- 注册时间
- 2008-6-7
- 在线时间
- 638 小时
|
下面是一个完整的MC9S12DG128 EEPROM读写程序,程序来源于网络,反馈于网络,对大家肯定有用!下面仅贴出部分主文件和主函数,完整工程可以下载附件,开发板用户可以直接操作演示程序。
/********************************************************
龙丘MC9S12DG128 多功能开发板
Designed by Chiu Sir
E-mail:chiusir@163.com
软件版本:V1.2
最后更新:2009年8月25日
相关信息参考下列地址:
网站: http://www.lqist.cn
论坛: http://smartcar.5d6d.com
淘宝店:http://shop36265907.taobao.com
------------------------------------
Code Warrior 5.0
Target : MC9S12dg128b
Crystal: 16.000Mhz
busclock:16.000MHz
pllclock:32.000MHz
------------------------------------
【程序使用说明】:
【重要修改】
在Start12.c文件最前面加入:#define _HCS12_SERIALMON
在Project.prm中:
添加下面的代码:
EEPROM = READ_ONLY 0x0800 TO 0x0FFB;
修改下面的代码:
RAM = READ_WRITE 0x2000 TO 0x3FFF;
【串口波特率】:9600,n,8,1
【按UP】 修改欲写入的数据
【按OK】 对块的读操作
【按ESC】 对块的重新写入数据
【使用步骤】:
1.插上电源和串口线,并打开串口调试工具
2.按ESC读取原始数据
3.按UP/DOWN修改欲写入的数据
4.按OK写入新数据
5.复位单片机然后按ESC读取上次写入的数据,比对保存结果.
*****************************************************************************************/
#i nclude <hidef.h>
#i nclude "derivative.h"
#i nclude "LQprintp.h"
#i nclude "LQEEPROM.h"
volatile word testnumber=0;
/**************************************************
复杂测试操作:
1.按ESC读取原始数据
2.按UP/DOWN修改欲写入的数据
3.按OK写入新数据
4.复位单片机然后按ESC读取上次写入的数据,比对保存结果.
***************************************************/
void Test_EE_WriteRead(void)
{
word cnt;
if(PTIH_PTIH7==0) //OK
{
printp("write and read data:\n");
for(cnt=0;cnt<10;cnt+=2)
{
EEP_Wt_Word(EEPROM_ADDR_BASE+cnt,0xffff,EEP_Word_Erase);
EEP_Wt_Word(EEPROM_ADDR_BASE+cnt ,0x1200+cnt+testnumber ,EEP_Word_Prog);
EEP_Wt_Word(EEPROM_ADDR_BASE+cnt+1,0x1200+cnt+testnumber+1,EEP_Word_Prog);
u16ata=EEP_Rd_Word(EEPROM_ADDR_BASE+cnt);
printp("%04x,",u16ata);
u16ata=EEP_Rd_Word(EEPROM_ADDR_BASE+cnt+1);
printp("%04x,",u16ata);
}
printp("\n");
}
else if(PTIH_PTIH6==0) //ESC
{
printp("read data:\n");
for(cnt=0;cnt<10;cnt+=2)
{
u16ata=EEP_Rd_Word(EEPROM_ADDR_BASE+cnt);
printp("%04x,",u16ata);
u16ata=EEP_Rd_Word(EEPROM_ADDR_BASE+cnt+1);
printp("%04x,",u16ata);
}
printp("\n");
}
else if(PTIH_PTIH2==0) //UP
{
printp("cnt:%04x \n",++testnumber);
}
else if(PTIH_PTIH5==0) //DOWN
{
printp("cnt:%04x \n",--testnumber);
}
}
/**************************************************
总线时钟初始化函数:16MHz=晶振频率
编写:龙丘
最后修改:2009.11.18
***************************************************/
static void Set_Bus_16M(void)
{
CLKSEL=0X00; //disengage PLL to system
PLLCTL_PLLON=1; //turn on PLL
SYNR=1;
REFDV=1; //pllclock=2*osc*(1+SYNR)/(1+REFDV)=32MHz;
_asm(nop); //BUS CLOCK=16M
_asm(nop);
while(!(CRGFLG_LOCK==1)); //when pll is steady ,then use it;
CLKSEL_PLLSEL =1; //engage PLL to system;
}
/**************************************************
main()
编写:龙丘
最后修改:2009.11.18
***************************************************/
void main(void)
{
Set_Bus_16M();
SCI_Init();
printp("started!\n");
DDRB =0xff;
PORTB=0x00;
EEPROM_init();
DisableInterrupts;
PORTB=0xFF;
for(;;)
{
//Simple_Test();
Test_EE_WriteRead();
Dly_ms(500);
PORTB_BIT0=~ PORTB_BIT0;
} /* wait forever */
/* please make sure that you never leave this */
}
/**************************************************
延时函数:ms个毫秒
编写:龙丘
最后修改:2009.11.18
***************************************************/
void Dly_ms(int ms) //x取值1~65536;
{
int ii,jj;
if (ms<1) ms=1;
for(ii=0;ii<ms;ii++)
for(jj=0;jj<1335;jj++); //16MHz--1ms
}
/**************************************************
延时函数:ms个毫秒
编写:龙丘
最后修改:2009.11.18
***************************************************/
void Dly_10us(int ms) //x取值1~65536;
{
int ii,jj;
if (ms<1) ms=1;
for(ii=0;ii<ms;ii++)
for(jj=0;jj<13;jj++); //16MHz--10us
}
/*************************************************
EEPROM模块初始化程序
编写:龙丘
最后修改:2009.11.18
*************************************************/
void EEPROM_init(void)
{
ECLKDIV=0x4A; // 采用8分频,因为OSCLK=16M,又为了使ECLK
// 达到190KHZ,所以EDIV=21,即ECLK=16M/8/11=190.5KHZ
ECNFG=0x00; // 禁止EEPROM相关操作的中断
while(ECLKDIV_EDIVLD == 0); // 等待时钟设置成功
EPROT_EPOPEN=1; // EEPROM没有保护,可以进行编程与擦除
EPROT_EPDIS=1; // EEPROM保护禁止
}
/*************************************************
写EEPROM程序
Addr: 要操作的EEPROM偏移地址
Data: 要操作的EEPROM数据
OpType:操作命令类型
编写:龙丘
*************************************************/
void EEP_Wt_Word(word * Addr,word Data,byte OpType)
{
DisableInterrupts;
while(ESTAT_CBEIF == 0); // 等待EEPROM命令缓冲区为空
*Addr=Data; // 设置EEPROM的偏移地址
ECMD=OpType; // 指令的类型
ESTAT |= 0x80; // 清命令缓冲标志,开始执行命令
while(ESTAT_CCIF == 0); // 等待命令完成
EnableInterrupts;
}
/*************************************************
读EEPROM程序
Addr: 要操作的EEPROM偏移地址
返回值:读到的结果数据
编写:龙丘
最后修改:2009.11.18
*************************************************/
word EEP_Rd_Word(word * Addr)
{
word TempData;
DisableInterrupts;
TempData=*Addr; // 读EEPROM的偏移地址的数据
return(TempData);
}
/*************************************************
简单测试操作
编写:龙丘
最后修改:2009.11.18
*************************************************/
void Simple_Test(void)
{
word cnt;
printp("write and read data:\n");
for(cnt=0;cnt<1024;cnt+=2)
{
EEP_Wt_Word(EEPROM_ADDR_BASE+cnt,0xffff,EEP_Word_Erase);
EEP_Wt_Word(EEPROM_ADDR_BASE+cnt ,0x1200+cnt,EEP_Word_Prog);
EEP_Wt_Word(EEPROM_ADDR_BASE+cnt+1,0x1200+cnt+1,EEP_Word_Prog);
u16ata=EEP_Rd_Word(EEPROM_ADDR_BASE+cnt);
printp("%04x,",u16ata);
u16ata=EEP_Rd_Word(EEPROM_ADDR_BASE+cnt+1);
printp("%04x,",u16ata);
if(cnt%16==0) printp("\n");
} }
完整工程可以下载附件(密码:longqiu): |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?注册
x
|