ds1302.c

单片机驱动32X64点阵资料

#include "NEW_8051.H"
#include <intrins.h>
#include"task.h"
#include"sbit.h"

uchar starts_time[7]={0x00,0x10,0x22,0x20,0x05,0x04,0x10};	 //初始化后设置

uchar Sec;
uchar Cent;
uchar Hour;
uchar Year;
uchar Day;
uchar Week;
uchar Month;
uchar AddTime=0;
uchar UpdateMode=0;
/******************************************************************/

//根据选择调整相应项目
void Set(uchar sel,uchar sel_1) 
{
  uchar address;
  char max,min,time;
 
  if(sel==11)  {address=0xc2; max=22;min=1;}    //自动转换时间时最大为20秒。
  if(sel==10)  {address=0xc0; max=1;min=0; }     //显示自动转换或手动转换。为零自动，为1手动。
  if(sel==9) {address=0xc6; max=20;min=0;}
  if(sel==8) {address=0xc4; max=1;min=0;}      //UpdateMode
  if(sel==7)  {address=0x80; max=59;min=0;}     //秒
  if(sel==6)  {address=0x82; max=59;min=0;}    //分钟
  if(sel==5)  {address=0x84; max=23;min=0;}    //小时
  if(sel==4)  {address=0x8a; max=7; min=1;}    //星期
  if(sel==3)  {address=0x86; max=31;min=1;}    //日
  if(sel==2)  {address=0x88; max=12;min=1;}    //月
  if(sel==1)  {address=0x8c; max=99;min=0;}    //年
  
  
  time=R1302(address+1)/16*10+R1302(address+1)%16;	   //变成BCD码
  if (sel_1==0) time++;  else time--;
  if(time>max) time=min;   
  if(time<min) time=max;
           
  W1302(0x8e,0x00);
  W1302(address,time/10*16+time%10);		 
  W1302(0x8e,0x80);  
}

/**************************延时***********************/

void DelayMs(void)
 {
  uchar TempCyc;
  for(TempCyc=50;TempCyc>1;TempCyc--)
     {;}
 }

//********DS1302读写程序***************//
/******************************************************************** 
函 数 名：RTInputByte()
功    能：实时时钟写入一字节
说    明：往DS1302写入1Byte数据 (内部函数)
入口参数：d 写入的数据 
返 回 值：无  
***********************************************************************/
void RTInputByte(uchar d) 
{ 
    uchar h;
    ACC = d;
    for(h=8; h>0; h--)
    {
        T_IO = ACC0;           /*相当于汇编中的 RRC */
        T_CLK = 1;
        T_CLK = 0;
        ACC = ACC >> 1; 
    } 
}
/******************************************************************** 
函 数 名：RTOutputByte()
功    能：实时时钟读取一字节
说    明：从DS1302读取1Byte数据 (内部函数)
入口参数：无  
返 回 值：ACC
设    计：zhaojunjie           日    期：2002-03-19
修    改：                     日    期： 
***********************************************************************/
uchar RTOutputByte(void) 
{ 
    uchar h;
    for(h=8; h>0; h--)
    {
        ACC = ACC >>1;         /*相当于汇编中的 RRC */
        ACC7 = T_IO;
        T_CLK = 1;
        T_CLK = 0;
    } 
    return(ACC); 
}
/******************************************************************** 
函 数 名：W1302()
功    能：往DS1302写入数据
说    明：先写地址，后写命令/数据 (内部函数)
调    用：RTInputByte() , RTOutputByte()
入口参数：ucAddr: DS1302地址, ucData: 要写的数据
返 回 值：无
***********************************************************************/
void W1302(uchar ucAddr, uchar ucDa)
{
    T_RST = 0;
    T_CLK = 0;
    T_RST = 1;
    RTInputByte(ucAddr);       /* 地址，命令 */
    RTInputByte(ucDa);       /* 写1Byte数据*/
    T_CLK = 1;
    T_RST = 0;
}
/******************************************************************** 
函 数 名：R1302()
功    能：读取DS1302某地址的数据
说    明：先写地址，后读命令/数据 (内部函数)
调    用：RTInputByte() , RTOutputByte()
入口参数：ucAddr: DS1302地址
返 回 值：ucData :读取的数据
***********************************************************************/
uchar R1302(uchar ucAddr)
{
    uchar ucData;
    T_RST = 0;
    T_CLK = 0;
    T_RST = 1;
    RTInputByte(ucAddr);             /* 地址，命令 */
    ucData = RTOutputByte();         /* 读1Byte数据 */
    T_CLK = 1;
    T_RST = 0;
    return(ucData);
}

/******************************************************************** 
函 数 名：Set1302()
功    能：设置初始时间
说    明：先写地址，后读命令/数据(寄存器多字节方式)
调    用：W1302()
入口参数：pClock: 设置时钟数据地址 格式为: 秒 分 时 日 月 星期 年
                               7Byte (BCD码)1B 1B 1B 1B 1B  1B  1B
返 回 值：无
***********************************************************************/
void Set1302(uchar *pClock) 
{
    uchar h;
    uchar ucAddr = 0x80; 
    W1302(0x8e,0x00);           /* 控制命令,WP=0,写操作?*/
    for(h =7; h>0; h--)
    { 
        W1302(ucAddr,*pClock);  /* 秒 分 时 日 月 星期 年 */ 
        pClock++;
        ucAddr +=2;
    }
	W1302(0xc0,0x01);
	W1302(0XC2,0X03);			//初始自动转换显示时间为3秒。
    W1302(0x8e,0x80);           /* 控制命令,WP=1,写保护?*/

}
/******************读取DS1302中的时间****************/
void du1302()
{
      Sec=R1302(0x81);   //对取 秒 分 时 日 月 星期 年
	  Cent=R1302(0x83);
	  Hour=R1302(0x85);
	  Day=R1302(0x87);
	  Month=R1302(0x89);
	  Week=R1302(0x8b);
	  Year=R1302(0x8d);				
	  b=R1302(0xc1);
      a=R1302(0xc3);
	  //a=a/16*10+a%16;
	  UpdateMode=R1302(0xc5);
	  AddTime=R1302(0xc7);
	 // AddTime=AddTime/16*10+AddTime%16;
}