021、STC12C5A60S2单片机之DS1302应用12T

张衍波

/********************************************************************
                            汇诚科技

实现功能:STC12C5A60S2单片机之DS1302应用12T
使用芯片：STC12C5A60S2
晶振：11.0592MHZ
波特率：115200
编译环境：Keil
作者：zhangxinchun
网站：www.ourhc.cn
淘宝店：
汇诚科技 http://ourhc.taobao.com
郑兴电子直销部 http://shop68451856.taobao.com
【声明】此程序仅用于学习与参考，引用请注明版权和作者信息！  


*********************************************************************/
#include "REG52.H"
#include "INTRINS.H"

typedef unsigned char BYTE;

sbit SCLK = P1^0;                   //DS1302时钟口P1.0
sbit IO = P1^1;                     //DS1302数据口P1.1
sbit RST = P1^2;                    //DS1302片选口P1.2

                    //秒    分    时    日    月  星期    年
BYTE code init[] = {0x00, 0x00, 0x20, 0x01, 0x01, 0x05, 0x10};
BYTE data now[7];

void DS1302_Initial();
void DS1302_SetTime(BYTE *p);
void DS1302_GetTime(BYTE *p);

void main()
{
    DS1302_Initial();               //初始化DS1302
    DS1302_SetTime(init);           //设置初始时间

    DS1302_GetTime(now);            //读取当前时间
    while (1);
}

/**************************************
从DS1302读1字节数据
**************************************/
BYTE DS1302_ReadByte()
{
    BYTE i;
    BYTE dat = 0;

    for (i=0; i<8; i++)             //8位计数器
    {
        SCLK = 0;                   //时钟线拉低
        _nop_();                    //延时等待
        _nop_();
        dat >>= 1;                  //数据右移一位
        if (IO) dat |= 0x80;        //读取数据
        SCLK = 1;                   //时钟线拉高
        _nop_();                    //?óê±μè′y
        _nop_();
    }

    return dat;
}

/**************************************
向DS1302写1字节数据
**************************************/
void DS1302_WriteByte(BYTE dat)
{
    char i;

    for (i=0; i<8; i++)             //8位计数器
    {
        SCLK = 0;                   //时钟线拉低
        _nop_();                    //延时等待
        _nop_();
        dat >>= 1;                  //移出数据
        IO = CY;                    //送出到端口
        SCLK = 1;                   //时钟线拉高
        _nop_();                    //延时等待
        _nop_();
    }
}

/**************************************
读DS1302某地址的的数据
**************************************/
BYTE DS1302_ReadData(BYTE addr)
{
    BYTE dat;

    RST = 0;
    _nop_();                        //延时等待
    _nop_();
    SCLK = 0;
    _nop_();                        //延时等待
    _nop_();
    RST = 1;
    _nop_();                        //延时等待
    _nop_();
    DS1302_WriteByte(addr);         //写地址
    dat = DS1302_ReadByte();        //读数据
    SCLK = 1;
    RST = 0;

    return dat;
}

/**************************************
往DS1302的某个地址写入数据
**************************************/
void DS1302_WriteData(BYTE addr, BYTE dat)
{
    RST = 0;
    _nop_();                        //延时等待
    _nop_();
    SCLK = 0;
    _nop_();                        //延时等待
    _nop_();
    RST = 1;
    _nop_();                        //延时等待
    _nop_();
    DS1302_WriteByte(addr);         //写地址
    DS1302_WriteByte(dat);          //写数据
    SCLK = 1;
    RST = 0;
}

/**************************************
写入初始时间
**************************************/
void DS1302_SetTime(BYTE *p)
{
    BYTE addr = 0x80;
    BYTE n = 7;

    DS1302_WriteData(0x8e, 0x00);   //允许写操作
    while (n--)
    {
        DS1302_WriteData(addr, *p++);
        addr += 2;
    }
    DS1302_WriteData(0x8e, 0x80);   //写保护
}

/**************************************
读取当前时间
**************************************/
void DS1302_GetTime(BYTE *p)
{
    BYTE addr = 0x81;
    BYTE n = 7;

    while (n--)
    {
        *p++ = DS1302_ReadData(addr);
        addr += 2;
    }
}

/**************************************
初始化DS1302
**************************************/
void DS1302_Initial()
{
    RST = 0;
    SCLK = 0;
    DS1302_WriteData(0x8e, 0x00);   //允许写操作
    DS1302_WriteData(0x80, 0x00);   //时钟启动
    DS1302_WriteData(0x90, 0xa6);   //一个二极管＋4K电阻充电
    DS1302_WriteData(0x8e, 0x80);   //写保护
}

/********************************************************************
                              结束
*********************************************************************/