#include "reg51.h"
#include "intrins.h"
typedef bit BOOL;
typedef unsigned char BYTE;
typedef unsigned int WORD;
#define T1MS (65536-500) //12T模式
sfr AUXR = 0x8e; //Auxiliary register
/*---------------------------------------------------------------------*/
/*-- 端口定義 ---------------------------------------*/
/*---------------------------------------------------------------------*/
#define PORT_3 P3
#define HIGH 1
#define LOW 0
sbit PWM_OUT_PORT = P3^2; // LED_RED LED_GREEN
sbit LED = P3^3;
/*---------------------------------------------------------------------*/
/*-- 變量定義 ---------------------------------------*/
/*---------------------------------------------------------------------*/
BYTE i,j;
BYTE test_num;
BYTE POWER_ON_TEMP_f;
BYTE POWER_ON_TIME;
BYTE READ_POWER_ON_TIME;
BOOL ON_OFF_Flag;
unsigned long POWER_ON_TEMP;
//-----------------------------------------------
sfr IAP_DATA = 0xC2; //IAP數據寄存器
sfr IAP_ADDRH = 0xC3; //IAP地址寄存器高字節
sfr IAP_ADDRL = 0xC4; //IAP地址寄存器低字節
sfr IAP_CMD = 0xC5; //IAP命令寄存器
sfr IAP_TRIG = 0xC6; //IAP命令觸發寄存器
sfr IAP_CONTR = 0xC7; //IAP控制寄存器
sfr WDT_CONTR = 0xC1; //0000,0000 看門狗控制寄存器
sfr P3M0 = 0xB2; //0000,0000 端口3模式寄存器0
sfr P3M1 = 0xB1; //0000,0000 端口3模式寄存器1
#define CMD_IDLE 0 //空閑模式
#define CMD_READ 1 //IAP字節讀命令
#define CMD_PROGRAM 2 //IAP字節編程命令
#define CMD_ERASE 3 //IAP扇區擦除命令
#define ENABLE_IAP 0x83 //if SYSCLK<12MHz
#define IAP_ADDRESS 0x0100 //測試地址
#define OFF_TIME_ADD 0x0300 //測試地址
/*----------------------------
關閉IAP
----------------------------*/
void IapIdle()
{
IAP_CONTR = 0; //關閉IAP功能
IAP_CMD = 0; //清除命令寄存器
IAP_TRIG = 0; //清除觸發寄存器
IAP_ADDRH = 0x80; //將地址設置到非IAP區域
IAP_ADDRL = 0;
}
/*----------------------------
從ISP/IAP/EEPROM區域讀取一字節
----------------------------*/
BYTE IapReadByte(WORD addr)
{
BYTE dat; //數據緩沖區
IAP_CONTR = ENABLE_IAP; //使能IAP
IAP_CMD = CMD_READ; //設置IAP命令
IAP_ADDRL = addr; //設置IAP低地址
IAP_ADDRH = addr >> 8; //設置IAP高地址
IAP_TRIG = 0x5a; //寫觸發命令(0x5a)
IAP_TRIG = 0xa5; //寫觸發命令(0xa5)
_nop_(); //等待ISP/IAP/EEPROM操作完成
dat = IAP_DATA; //讀ISP/IAP/EEPROM數據
IapIdle(); //關閉IAP功能
return dat; //返回
}
/*----------------------------
寫一字節數據到ISP/IAP/EEPROM區域
----------------------------*/
void IapProgramByte(WORD addr, BYTE dat)
{
IAP_CONTR = ENABLE_IAP; //使能IAP
IAP_CMD = CMD_PROGRAM; //設置IAP命令
IAP_ADDRL = addr; //設置IAP低地址
IAP_ADDRH = addr >> 8; //設置IAP高地址
IAP_DATA = dat; //寫ISP/IAP/EEPROM數據
IAP_TRIG = 0x5a; //寫觸發命令(0x5a)
IAP_TRIG = 0xa5; //寫觸發命令(0xa5)
_nop_(); //等待ISP/IAP/EEPROM操作完成
IapIdle();
}
/*----------------------------
扇區擦除
----------------------------*/
void IapEraseSector(WORD addr)
{
IAP_CONTR = ENABLE_IAP; //使能IAP
IAP_CMD = CMD_ERASE; //設置IAP命令
IAP_ADDRL = addr; //設置IAP低地址
IAP_ADDRH = addr >> 8; //設置IAP高地址
IAP_TRIG = 0x5a; //寫觸發命令(0x5a)
IAP_TRIG = 0xa5; //寫觸發命令(0xa5)
_nop_(); //等待ISP/IAP/EEPROM操作完成
IapIdle();
}
/*---------------------------------------------------------------------*/
/*-- 延時子程序 ---------------------------------------*/
/*---------------------------------------------------------------------*/
void DELAY_1MS(unsigned int z)
{
unsigned int x,y;
for(x=z;x>0;x--)
for(y=123;y>0;y--);
}
/*---------------------------------------------------------------------*/
/*-- 主程序 ---------------------------------------*/
/*---------------------------------------------------------------------*/
void main()
{
PORT_3=0X00;
P3M0=0xFF;
P3M1=0x00;
ON_OFF_Flag=0;
POWER_ON_TIME=0;
READ_POWER_ON_TIME=0;
AUXR |= 0x80; //定時器0為1T模式
// AUXR &= 0x7f; //定時器0為12T模式
TMOD = 0x00; //設置定時器為模式0(16位自動重裝載)
TL0 = T1MS; //初始化計時值
TH0 = T1MS >> 8;
TR0 = 1; //定時器0開始計時
ET0 = 1; //使能定時器0中斷
EA = 0;
POWER_ON_TEMP=0;
POWER_ON_TEMP_f=0;
j=0;
i=100;
DELAY_1MS(100);
WDT_CONTR = 0x35; //啟動看門狗
while (1)
{
WDT_CONTR = 0x35; //啟動看門狗
if(ON_OFF_Flag==0) //上電標志,上電只執行一次
{
ON_OFF_Flag=1;
READ_POWER_ON_TIME=IapReadByte(OFF_TIME_ADD); //////////////////////////////
if(READ_POWER_ON_TIME!=4) //上電時間監測,小于4切換模式
{
test_num=IapReadByte(IAP_ADDRESS); //////////////////////////////
if(test_num<3) // LED_RED LED_GREEN
{
test_num++;
IapEraseSector(IAP_ADDRESS);
IapProgramByte(IAP_ADDRESS,test_num);
}
else
{
test_num=0;
IapEraseSector(IAP_ADDRESS);
IapProgramByte(IAP_ADDRESS,test_num);
}
}
else //上電時間監測,大于4模式記憶
{
test_num=IapReadByte(IAP_ADDRESS); /////////////////////////////////
if(test_num>3) // LED_RED LED_GREEN
{
test_num=0;
IapEraseSector(IAP_ADDRESS);
IapProgramByte(IAP_ADDRESS,test_num);
}
}
IapEraseSector(OFF_TIME_ADD);
}
/*---------------------------------------------------------------------*/
EA = 1;
if(test_num==0)
{
j=4;
}
else if(test_num==1)
{
j=20;
}
else if(test_num==2)
{
j=50;
}
else if(test_num==3)
{
j=99;
}
}
}
//-----------------------------------------------
/* Timer0 interrupt routine */
void tm0_isr() interrupt 1 using 1
{
if(i>0)
{
i--;
if(j