⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 9_4.c

📁 单片机学习的例程.rar 学习单片机要从最基本的学起。对于初学者来说很适合的单片机C程序
💻 C
字号:
//调用宏晶公司成熟的EEPROM字节写入程序byte_program_and_verify(int,*data)和字节读程序byte_read(INT16U byte_addr),
//实现断电保护的程序

#include <at89x52.h>		//借用ATMEL 89C51的头文件
#include <intrins.h>        /* use _nop_() function */
/*        新增特殊功能寄存器定义        */
sfr		ISP_DATA	=	0xe2;	/*ISP/IAP操作时的数据寄存器*/
sfr     ISP_ADDRH	=	0xe3;  	/*ISP/IAP操作时的地址寄存器高八位*/
sfr		ISP_ADDRL	=   0xe4;   /*ISP/IAP操作时的地址寄存器低八位*/
sfr		ISP_CMD		=   0xe5;   /*ISP/IAP操作时的命令模式寄存器*/
sfr		ISP_TRIG	=   0xe6;   /*ISP/IAP操作时的命令触发寄存器*/
sfr		ISP_CONTR   =   0xe7;   /*ISP/IAP控制寄存器*/
/* SFR: ISP_CONTR  (ISP Control register): E7H --------------------*/
/*--|        b7  |        b6  |        b5  |        b4  |        b3  |        b2  |        b1  |        b0  |---*/
/*--| ISPEN |  SWBS | SWRST |        -   |        -   |              WAIT                |---*/
/*-- ISPEN: ISP function enabling bit                         ----------------*/
/*--     0: Disable ISP program to change flash                    ----------------*/
/*--     1: Enable ISP program to change flash                    ----------------*/
/*-- SWBS: Secondary Booting program selecting                    ----------------*/
/*--     0: Boot from AP-Memory / Main-Memory                    ----------------*/
/*--     1: Boot from ISP-Memory                                ----------------*/
/*-- SWRST: Software reset trigger                                    ----------------*/
/*--     0: No operation                                                ----------------*/
/*--     1: Generate software system reset. It will be cleared by hardware automatically  ---*/

/* 定义命令 */
#define READ_AP_and_Data_Memory_Command 0x01 //字节读应用程序区和数据存储区
#define PROGRAM_AP_and_Data_Memory_Command 0x02 	//字节编程应用程序区和											  			//数据存储区
#define SECTOR_ERASE_AP_and_Data_Memory_Command 0x03 //扇区擦除应用程序区															//和数据存储区

typedef  unsigned char	INT8U;			/* 8 bit 无符号整型  */
typedef  unsigned int    INT16U;     	/* 16 bit 无符号整型 */
#define	DELAY_CONST  60000

/* 定义常量 */
#define ERROR   0
#define OK      1

sbit        Begin_LED = P1^0;
sbit        ERROR_LED = P1^3;
sbit        OK_LED = P1^7;

/* 定义Flash 操作等待时间 */
#define		MCU_CLOCK_40MHz
//#define     MCU_CLOCK_20MHz
//#define     MCU_CLOCK_10MHz
//#define     MCU_CLOCK_5MHz
#ifdef MCU_CLOCK_40MHz
        #define WAIT_TIME        0x00
#endif
#ifdef MCU_CLOCK_20MHz
        #define WAIT_TIME        0x01
#endif
#ifdef MCU_CLOCK_10MHz
        #define WAIT_TIME        0x02
#endif
#ifdef MCU_CLOCK_5MHz
        #define WAIT_TIME        0x03
#endif

#define         DEBUG_STC89C_LE52RC

INT8U xdata protect_buffer[USED_BYTE_QTY_IN_ONE_SECTOR];

unsigned int data fx;
unsigned int data fy;
unsigned long data x;
unsigned long data y;
signed char data xes,yes;
unsigned char data xej,yej;
unsigned char data xj,yj;
signed int data fex;
signed int data fey;	
unsigned char data X_STATUS_OLD;
unsigned char data Y_STATUS_OLD;
unsigned long data x0;
unsigned long data y0;

INT8U sector_erase(INT16U sector_addr);
INT8U byte_program_and_verify(INT16U byte_addr, INT8U original_data);
INT8U byte_read(INT16U byte_addr);		/* 字节读 */

main()
{
	.							//程序初始化
	.
	.
	.
	.
	.							//以下开始恢复断电保护下的数据
readxy();							//读断电备份的X、Y和精度补偿函数fex、fey
X_STATUS_OLD=byte_read(0x8026);		//读X_STATUS_OLD	
Y_STATUS_OLD=byte_read(0x8027);		//读Y_STATUS_OLD
xes=byte_read(0x8028);				//读断电以前的xes
xej=byte_read(0x8029);				//读断电以前的xej
xj=byte_read(0x802A);				//读断电以前的xj
yes=byte_read(0x802B);				//读断电以前的yes
yej=byte_read(0x802C);				//读断电以前的yej
yj=byte_read(0x802D);				//读断电以前的yj
direct=byte_read(0x802E);				//读断电以前的direct
sector_erase(0x8000);					//擦除EEROM,失败时再擦,为下次保护作准备
	.							//其它控制程序
	.
	.
	.
	.
	.	
}

void readxy(void)					//读断电备份的X、Y和fex、fey
{
	unsigned char *ip,t;
	unsigned int adr;
	adr=0x8000;
	ip=&x;
	for (t=0;t<=3;t++)
		{
		*ip=byte_read(adr);			/* 字节读 */
		ip++;
		adr++;
		}
	ip=&y;
	for (t=0;t<=3;t++)
		{
		*ip=byte_read(adr);			/* 字节读 */
		ip++;
		adr++;
		}
	ip=&xyab;						//读出X方向相对坐标原点
	for (t=0;t<=3;t++)
		{
		*ip=byte_read(adr);			/* 字节读 */
		ip++;
		adr++;
		}
	x0=xyab;
	ip=&xyab;						//读出Y方向相对坐标原点
	for (t=0;t<=3;t++)
		{
		*ip=byte_read(adr);			/* 字节读 */
		ip++;
		adr++;
		}
	y0=xyab;
	ip=&fex;
	for (t=0;t<=1;t++)
		{
		*ip=byte_read(adr);			/* 字节读 */
		ip++;
		adr++;
		}
	ip=&fey;
	for (t=0;t<=1;t++)
		{
		*ip=byte_read(adr);			/* 字节读 */
		ip++;
		adr++;
		}
}

void power_fail(void) interrupt 0				//断电保护中断服务子程序
{
	unsigned char *ip,t;
	unsigned int adr;
	P2&=0xC0;						//关显示
	adr=0x8000;
	ip=&x;							//保护X在EEROM的0x8000中
	for (t=0;t<=3;t++)
		{
		byte_program_and_verify(adr,*ip);
		adr++;
		ip++;
		}
	ip=&y;							//保护Y在EEROM的0x8004中
	for (t=0;t<=3;t++)
		{
		byte_program_and_verify(adr,*ip);
		adr++;
		ip++;
		}
	ip=&x0;							//保护X0在EEROM的0x8008中
	for (t=0;t<=3;t++)
		{
		byte_program_and_verify(adr,*ip);
		adr++;
		ip++;
		}
	ip=&y0;							//保护Y0在EEROM的0x800C中
	for (t=0;t<=3;t++)
		{
		byte_program_and_verify(adr,*ip);
		adr++;
		ip++;
		}
	adr=0x8010;
	ip=fx;									//保护fx
	for (t=0;t<=1;t++)
		{
		byte_program_and_verify(adr,*ip);
		adr++;
		ip++;
		}
	ip=&fy; 								//保护fy
	for (t=0;t<=1;t++)
		{
		byte_program_and_verify(adr,*ip);
		adr++;
		ip++;
		}
	byte_program_and_verify(0x8026,X_STATUS_OLD);	//保护X_STATUS_OLD
	byte_program_and_verify(0x8027,Y_STATUS_OLD);	//保护Y_STATUS_OLD
	byte_program_and_verify(0x8028,xes);			//保护xes
	byte_program_and_verify(0x8029,xej);			//保护xej
	byte_program_and_verify(0x802A,xj);				//保护xj
	byte_program_and_verify(0x802B,yes);			//保护yes
	byte_program_and_verify(0x802C,yej);			//保护yej
	byte_program_and_verify(0x802D,yj);				//保护yj
	byte_program_and_verify(0x802E,direct);			//保护direct
	PCON=2;											//进入低功耗状态
while(1);
}


/* 打开 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 OK;
}

/* 字节编程 */
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	OK;
}

/* 字节编程并校验 */
INT8U byte_program_and_verify(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_TRIG	=	0xb9;
	_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_();

	ISP_IAP_disable();

	if(ISP_DATA	==	original_data)
		return	OK;
	else
		return	ERROR;
}

/* 写数据进 数据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	ERROR;
	in_sector_begin_addr =        begin_addr & 0x01ff;         /* 0000,0001,1111,1111 */
	if( (in_sector_begin_addr + counter) > USED_BYTE_QTY_IN_ONE_SECTOR )
		return ERROR;

    /* 擦除 要修改/写入 的扇区 */
	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 ERROR;
		}
        begin_addr++;
	}
	ISP_IAP_disable();
	return	OK;
}

/* 写数据进数据Flash存储器(EEPROM), 只在同一个扇区内写,保留同一扇区中不需修改的数据	*/
/* begin_addr,被写数据Flash开始地址;counter,连续写多少个字节; array[],数据来源		*/
INT8U write_flash_with_protect_in_one_sector(INT16U begin_addr, INT16U counter, INT8U array[])
{
	INT16U	i	=	0;
	INT16U	in_sector_begin_addr	=	0;
	INT16U	sector_addr	=	0;
	INT16U	byte_addr	=	0;

	/* 判是否是有效范围,此函数不允许跨扇区操作 */
	if(counter > USED_BYTE_QTY_IN_ONE_SECTOR)
		return ERROR;
	in_sector_begin_addr =        begin_addr & 0x01ff;         /* 0000,0001,1111,1111 */
	/* 假定从扇区的第0个字节开始,到USED_BYTE_QTY_IN_ONE_SECTOR-1个字节结束,后面部分不用,程序易编写	*/
	if( (in_sector_begin_addr + counter) > USED_BYTE_QTY_IN_ONE_SECTOR )
		return ERROR;

	/* 将该扇区数据 0 - (USED_BYTE_QTY_IN_ONE_SECTOR-1) 字节数据读入缓冲区保护 */
	sector_addr		=	(begin_addr & 0xfe00); 	/* 1111,1110,0000,0000; 取扇区地址		*/
	byte_addr		=   sector_addr;			/* 扇区地址为扇区首字节地址			 	*/

	ISP_IAP_enable();
	for(i = 0; i < USED_BYTE_QTY_IN_ONE_SECTOR; i++)
	{
		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_TRIG	=	0x46;
		ISP_TRIG	=	0xb9;
		_nop_();

		protect_buffer[i]	=	ISP_DATA;
		byte_addr++;
	}

	/* 将要写入的数据写入保护缓冲区的相应区域,其余部分保留 */
	for(i = 0; i < counter; i++)
	{
		protect_buffer[in_sector_begin_addr] = array[i];
		in_sector_begin_addr++;
	}

	/* 擦除 要修改/写入 的扇区 */
	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_TRIG	=	0x46;        /* 触发ISP_IAP命令 */
	ISP_TRIG	=	0xb9;        /* 触发ISP_IAP命令 */
	_nop_();

	/* 将保护缓冲区的数据写入 Data Flash, EEPROM */
	byte_addr	=   sector_addr;			/* 扇区地址为扇区首字节地址	*/
	for(i = 0; i< USED_BYTE_QTY_IN_ONE_SECTOR; i++)
	{
		/* 写一个字节 */
		ISP_ADDRH	=	(INT8U)(byte_addr >> 8);
		ISP_ADDRL	=	(INT8U)(byte_addr & 0x00ff);
		ISP_DATA	=	protect_buffer[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 != protect_buffer[i])
		{
			ISP_IAP_disable();
			return ERROR;
        }
        byte_addr++;
	}
	ISP_IAP_disable();
	return OK;
}

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -