//实现功能:定时自毁应用程序
//使用芯片：STC15F104E
//晶振：12MHZ
//编译环境：Keil
#include "reg52.h"
#include <intrins.H>
#define uchar unsigned char //宏定义字符型变量
#define uint unsigned int //宏定义整型变量
/********************************************************************
寄存器设置
*********************************************************************/
sfr IAP_DATA =0xc2; //数据寄存器
sfr IAP_ADDRH =0xc3; //地址寄存器
sfr IAP_ADDRL =0xc4; //地址寄存器
sfr IAP_CMD =0xc5; //命令寄存器
sfr IAP_TRIG =0xc6; //触发寄存器
sfr IAP_CONTR =0xc7; //擦除寄存器
/********************************************************************
命令定义
*********************************************************************/
#define CMD_IDLE 0 //EEPROM无操作
#define CMD_READ 1 //读取字节
#define CMD_PROGRAM 2 //写入字节
#define CMD_ERASE 3 //擦除字节
/********************************************************************
编程周期由晶振决定
*********************************************************************/
//#define ENABLE_IAP 0X80 //编程周期由晶振决定（如果<30MHZ选用此项）
//#define ENABLE_IAP 0X81 //编程周期由晶振决定（如果<24MHZ选用此项）
//#define ENABLE_IAP 0X82 //编程周期由晶振决定（如果<20MHZ选用此项）
#define ENABLE_IAP 0X83 //编程周期由晶振决定（如果<12MHZ选用此项）
//#define ENABLE_IAP 0X84 //编程周期由晶振决定（如果<6MHZ选用此项）
//#define ENABLE_IAP 0X85 //编程周期由晶振决定（如果<3MHZ选用此项）
//#define ENABLE_IAP 0X86 //编程周期由晶振决定（如果<2MHZ选用此项）
//#define ENABLE_IAP 0X87 //编程周期由晶振决定（如果<1MHZ选用此项）
#define IAP_ADDRESS1 0X0000 //内部EEPROM地址
#define IAP_ADDRESS2 0X0200
/********************************************************************
最长时间定义
*********************************************************************/
#define T 4000 //定时时间（小时）
/********************************************************************
初始定义
*********************************************************************/
uint fen,days;
uchar Count;
uchar Count1;
uint cnt;
bit write;
sbit OUT1=P3^3;
sbit IN0=P3^5;
//============================================================
//延时程序
void delayms(unsigned int x)
{
int i,j;
for(i=0;i<x;i++)
{
for(j=0;j<260;j++);
}
}
/********************************************************************
操作函数
*********************************************************************/
void IapIdle()
{
IAP_CONTR=0;
IAP_CMD=0;
IAP_TRIG=0;
IAP_ADDRH=0X80;
IAP_ADDRL=0;
}
/********************************************************************
读取一个字节函数
*********************************************************************/
uchar IapReadByte(uint addr)
{
uchar dat;
IAP_CONTR=ENABLE_IAP;
IAP_CMD=CMD_READ;
IAP_ADDRL=addr;
IAP_ADDRH=addr>>8;
IAP_TRIG=0X5A;
IAP_TRIG=0XA5;
_nop_();
_nop_();
_nop_();
dat=IAP_DATA;
IapIdle();
return dat;
}
/********************************************************************
写入一个字节函数
*********************************************************************/
void IapProgramByte(uint addr,uchar dat)
{
IAP_CONTR=ENABLE_IAP;
IAP_CMD=CMD_PROGRAM;
IAP_ADDRL=addr;
IAP_ADDRH=addr>>8;
IAP_DATA=dat;
IAP_TRIG=0X5A;
IAP_TRIG=0XA5;
_nop_();
_nop_();
_nop_();
IapIdle();
}
/********************************************************************
擦除一个字节函数
*********************************************************************/
void IapEraseSector(uint addr)
{
IAP_CONTR=ENABLE_IAP;
IAP_CMD=CMD_ERASE;
IAP_ADDRL=addr;
IAP_ADDRH=addr>>8;
IAP_TRIG=0X5A;
IAP_TRIG=0XA5;
_nop_();
_nop_();
_nop_();
IapIdle();
}
/********************************************************************
定时中断服务函数
*********************************************************************/
void t0(void) interrupt 1 using 1 //定时中断服务函数
{
TH0=(65536-50000)/256; //对TH0 TL0 赋值
TL0=(65536-50000)%256;
cnt++; //每过50ms tcnt 加一
if(cnt==1200) //计满1200次1分钟
{ cnt=0; //重新再计
fen++;
if(fen==60) //定时60分钟，在从零开始计时
{
fen=0;
days++;
write=1;
}
}
}
/********************************************************************
主函数
*********************************************************************/
void main()
{
TMOD=0x01; //定时器工作在方式1
TH0=(65536-50000)/256; //对TH0 TL0 赋值
TL0=(65536-50000)%256;
ET0=1;
EA=1;
TR0=1; //定时器函数初始化
delayms(10); //开机延时
Count=IapReadByte(IAP_ADDRESS1); //读取EEPROM数据
Count1=IapReadByte(IAP_ADDRESS1+1); //读取EEPROM数据
days=(Count*100)+Count1; //从读取数据中计算时间值
while(1)
{
if(days>=T) //判断如果延时时间大于等于设置时间，继电器断开，模块停止工作。否则继电器吸合
{
OUT1=0;
TR0=0;
}
else
{
OUT1=1;
TR0=1;
}
if(write==1) // 记满一个小时，数据存储一次
{
write=0;
Count=days/100;
Count1=days%100;;
IapEraseSector(IAP_ADDRESS1); //擦除0扇区 //34us
IapEraseSector(IAP_ADDRESS1+1); //擦除0扇区 //34us
IapProgramByte(IAP_ADDRESS1,Count); //写入数据//38us
IapProgramByte(IAP_ADDRESS1+1,Count1); //写入数据//38us
}
if(IN0==0)
{
delayms(10);
if(IN0==0)
{
while(!IN0);
days=0;
Count=0;
Count1=0;
IapEraseSector(IAP_ADDRESS1); //擦除0扇区 //34us
IapEraseSector(IAP_ADDRESS1+1); //擦除0扇区 //34us
IapProgramByte(IAP_ADDRESS1,Count); //写入数据//38us
IapProgramByte(IAP_ADDRESS1+1,Count1); //写入数据//38us
}
}
}
}
/********************************************************************
结束
*********************************************************************/
|
[复制链接]
QQ好友和群
QQ空间
腾讯微博
腾讯朋友
收藏
淘帖
顶
踩
