STC8系列单片机技术参考手册-2018 *新版

#include "reg51.h"

#include "intrins.h"



#define FOSC            11059200UL

#define BRT             (65536 - FOSC / 19200 / 4)



sfr     AUXR        =   0x8e;

sfr     T2H         =   0xd6;

sfr     T2L         =   0xd7;



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 WT_30M          0x80

#define WT_24M          0x81

#define WT_20M          0x82

#define WT_12M          0x83

#define WT_6M           0x84

#define WT_3M           0x85

#define WT_2M           0x86

#define WT_1M           0x87





void Delay7us()                //@11.0592MHz

{

        unsigned char i;



        _nop_();

        _nop_();

        _nop_();

        i = 16;

        while (--i);

}



void Delay5ms()                //@11.0592MHz

{

        unsigned char i, j;



        i = 54;

        j = 199;

        do

        {

                while (--j);

        } while (--i);

}



void Delay500ms()                //@11.0592MHz

{

        unsigned char i, j, k;



        _nop_();

        _nop_();

        i = 22;

        j = 3;

        k = 227;

        do

        {

                do

                {

                        while (--k);

                } while (--j);

        } while (--i);

}





void UartInit()

{

    SCON = 0x5a;

    T2L = BRT;

    T2H = BRT >> 8;

    AUXR = 0x15;

}



void UartSend(char dat)

{

    while (!TI);

    TI = 0;

    SBUF = dat;

}



void IapIdle()

{

    IAP_CONTR = 0;                              //关闭IAP功能

    IAP_CMD = 0;                                //清除命令寄存器

    IAP_TRIG = 0;                               //清除触发寄存器

    IAP_ADDRH = 0x80;                           //将地址设置到非IAP区域

    IAP_ADDRL = 0;

}



char IapRead(int addr)

{

    char dat;



    IAP_CONTR = WT_20M;                         //使能IAP

    IAP_CMD = 1;                                //设置IAP读命令

    IAP_ADDRL = addr;                           //设置IAP低地址

    IAP_ADDRH = addr >> 8;                      //设置IAP高地址

    IAP_TRIG = 0x5a;                            //写触发命令(0x5a)

    IAP_TRIG = 0xa5;                            //写触发命令(0xa5)

    _nop_();

    dat = IAP_DATA;                             //读IAP数据

    IapIdle();                                  //关闭IAP功能



    return dat;

}



void IapProgram(int addr, char dat)

{

    IAP_CONTR = WT_20M;                         //使能IAP

    IAP_CMD = 2;                                //设置IAP写命令

    IAP_ADDRL = addr;                           //设置IAP低地址

    IAP_ADDRH = addr >> 8;                      //设置IAP高地址

    IAP_DATA = dat;                             //写IAP数据

    IAP_TRIG = 0x5a;                            //写触发命令(0x5a)

    IAP_TRIG = 0xa5;                            //写触发命令(0xa5)

    _nop_();

    IapIdle();                                  //关闭IAP功能

}



void IapErase(int addr)

{

    IAP_CONTR = WT_20M;                         //使能IAP

    IAP_CMD = 3;                                //设置IAP擦除命令

    IAP_ADDRL = addr;                           //设置IAP低地址

    IAP_ADDRH = addr >> 8;                      //设置IAP高地址

    IAP_TRIG = 0x5a;                            //写触发命令(0x5a)

    IAP_TRIG = 0xa5;                            //写触发命令(0xa5)

    _nop_();                                    //

    IapIdle();                                  //关闭IAP功能

}



void main()

{

        

          char i;

    UartInit();



          for(i=0;i<5;i++)

        {

          Delay500ms();        

        }

          UartSend(IapRead(0x0400));

        

          IapErase(0x0400);

          Delay5ms();

    UartSend(IapRead(0x0400));

        

    IapProgram(0x0400, 0x12);

          Delay7us();

    UartSend(IapRead(0x0400));



    while (1);

}