eeprom.c

protues仿真keil程序 初学者的福音

#include "stc90.h"
#include "EEPROM.H"
#include "intrins.h"





/* 打开 ISP,IAP 功能 */
void ISP_IAP_enable(void)
{
	EA	=	0;	/* 关中断 */
	ISP_CONTR	=	ISP_CONTR & 0x18;       /* 0001,1000 */
	ISP_CONTR	=	ISP_CONTR | WAIT_TIME;
	ISP_CONTR	=	ISP_CONTR | 0x80;       /* 1000,0000 */
}

/* 关闭 ISP,IAP 功能 */
void ISP_IAP_disable(void)
{
	ISP_CONTR	=	ISP_CONTR & 0x7f;	/* 0111,1111 */
	ISP_TRIG	=	0x00;
	EA			=   1;                	/* 开中断 */
}

/* 字节读 */
INT8U byte_read(INT16U byte_addr)
{
	ISP_ADDRH	=	(INT8U)(byte_addr >> 8);
	ISP_ADDRL	=	(INT8U)(byte_addr & 0x00ff);

	ISP_CMD		=	ISP_CMD	&	0xf8;        /* 1111,1000 */
	ISP_CMD		=	ISP_CMD	|	READ_AP_and_Data_Memory_Command;        /* 0000,0001 */

	ISP_IAP_enable();

	ISP_TRIG	=	0x46;
	ISP_TRIG	=	0xb9;
	_nop_();

	ISP_IAP_disable();
	return (ISP_DATA);
}

/* 扇区擦除 */
INT8U sector_erase(INT16U sector_addr)
{
	INT16U get_sector_addr	=	0;
	get_sector_addr			=	(sector_addr & 0xfe00); /* 1111,1110,0000,0000; 取扇区地址 */
	ISP_ADDRH        		=	(INT8U)(get_sector_addr >> 8);
	ISP_ADDRL		        =	0x00;

	ISP_CMD	=	ISP_CMD	&	0xf8;	/* 1111,1000 */
	ISP_CMD	=	ISP_CMD	|	SECTOR_ERASE_AP_and_Data_Memory_Command;	/* 0000,0011 */

	ISP_IAP_enable();
	ISP_TRIG	=	0x46;        /* 触发ISP_IAP命令 */
	ISP_TRIG	=	0xb9;        /* 触发ISP_IAP命令 */
	 _nop_();

	ISP_IAP_disable();
	return 1;
}

/* 字节编程 */
//INT8U byte_program(INT16U byte_addr, INT8U original_data)
//{
//	ISP_ADDRH	=	(INT8U)(byte_addr >> 8);
//	ISP_ADDRL	=	(INT8U)(byte_addr & 0x00ff);
//
//	ISP_CMD		=	ISP_CMD	&	0xf8;        /* 1111,1000 */
//	ISP_CMD		=	ISP_CMD	|	PROGRAM_AP_and_Data_Memory_Command;		/* 0000,0010 */
//	ISP_DATA	=	original_data;
//
//	ISP_IAP_enable();
//	ISP_TRIG	=	0x46;        /* 触发ISP_IAP命令 */
//	ISP_TRIG	=	0xb9;        /* 触发ISP_IAP命令 */
//	_nop_();
//
//	ISP_IAP_disable();
//	return	1;
//}



/* 写数据进 数据Flash存储器, 只在同一个扇区内写，不保留原有数据	*/
/* begin_addr,被写数据Flash开始地址；counter,连续写多少个字节； array[]，数据来源	*/
INT8U sequential_write_flash_in_one_sector(INT16U begin_addr, INT16U counter, INT8U array[])
{
	INT16U	i	=	0;
	INT16U	in_sector_begin_addr	=	0;
	INT16U	sector_addr	=	0;

	/* 判是否是有效范围,此函数不允许跨扇区操作 */
	if(counter > USED_BYTE_QTY_IN_ONE_SECTOR)
		return	0;
	in_sector_begin_addr =        begin_addr & 0x01ff;         /* 0000,0001,1111,1111 */
	if( (in_sector_begin_addr + counter) > USED_BYTE_QTY_IN_ONE_SECTOR )
		return 0;

    /* 擦除 要修改/写入 的扇区 */
	sector_addr	=	(begin_addr & 0xfe00);	/* 1111,1110,0000,0000; 取扇区地址 */
	ISP_ADDRH	=	(INT8U)(sector_addr >> 8);
	ISP_ADDRL	=	0x00;
	ISP_CMD		=	ISP_CMD	&	0xf8;		/* 1111,1000 */
	ISP_CMD		=	ISP_CMD	|	SECTOR_ERASE_AP_and_Data_Memory_Command;	/* 0000,0011 */

	ISP_IAP_enable();
	ISP_TRIG	=	0x46;        /* 触发ISP_IAP命令 */
	ISP_TRIG	=	0xb9;        /* 触发ISP_IAP命令 */
	_nop_();

	for(i = 0; i< counter; i++)
	{
		/* 写一个字节 */
		ISP_ADDRH	=	(INT8U)(begin_addr >> 8);
		ISP_ADDRL	=	(INT8U)(begin_addr & 0x00ff);
		ISP_DATA	=	array[i];
		ISP_CMD		=	ISP_CMD	&	0xf8;	/* 1111,1000 */
		ISP_CMD		=	ISP_CMD	|	PROGRAM_AP_and_Data_Memory_Command;		/* 0000,0010 */

		ISP_TRIG	=	0x46;	/* 触发ISP_IAP命令 */
		ISP_TRIG	=	0xb9;	/* 触发ISP_IAP命令 */
		_nop_();

		/* 读回来 */
		ISP_DATA	=	0x00;

		ISP_CMD		=	ISP_CMD	&	0xf8;	/* 1111,1000 */
		ISP_CMD     =	ISP_CMD	|	READ_AP_and_Data_Memory_Command;	/* 0000,0001 */

		ISP_TRIG	=	0x46;	/* 触发ISP_IAP命令 */
		ISP_TRIG	=	0xb9;	/* 触发ISP_IAP命令 */
		_nop_();

		/*  比较对错 */
		if(ISP_DATA != array[i])
		{
			ISP_IAP_disable();
			return 0;
		}
        begin_addr++;
	}
	ISP_IAP_disable();
	return	1;
}



void delay(INT16U counter)
{
	INT16U	temp	=	0;
	for(temp = counter; temp>0; temp--)
	{
		_nop_();
		_nop_();
		_nop_();
	}
}