ds1302.c.bak

sed1335液晶驱动器源码

/* 实时时钟模块 时钟芯片型号：DS1302 */
#include <mc9s12dt128.h>
#include "variable.h" 
/*********************************************************************/
/*#define T_CLK_SET()  (DDRM|=0x20,PTM|=0x20)//實時時鍾時鍾置高
#define T_CLK_CLR()  (DDRM|=0x20,PTM&=~0x20)//實時時鍾時鍾置低
#define T_IO_SET()   (DDRM|=0x10,PTM|=0x10)//實時時鍾數據置高
#define T_IO_CLR()   (DDRM|=0x10,PTM&=~0x10)//實時時鍾數據置低
#define T_RST_SET()  (DDRM|=0x80,PTM|=0x80)//實時時鍾復位置高
#define T_RST_CLR()  (DDRM|=0x80,PTM&=~0x80)//實時時鍾復位置低
#define T_IO_READ()  (DDRM&=~0x10)*/

/******************************************************************** 
*
* 名称: v_RTInputByte
* 说明: 
* 功能: 往DS1302写入1Byte数据
* 调用:
* 输入: ucDa 写入的数据 
* 返回值: 无
***********************************************************************/
void v_RTInputByte(unsigned char ucDa) 
{ 
		unsigned char i;
		unsigned char acc;
		acc = ucDa;
		for(i=8; i>0; i--){
			T_CLK_CLR();
			if(acc&0x01==0x01){
				  T_IO_SET();
			  }
			else{
			    T_IO_CLR();
			  }  			
			NOP();
			NOP();
			NOP();
			NOP(); 
			T_CLK_SET();
			acc = acc >> 1; 
		} 
}
/******************************************************************** 
*
* 名称: unsigned char uc_RTOutputByte
* 说明: 
* 功能: 从DS1302读取1Byte数据
* 调用: 
* 输入: 
* 返回值: ACC
***********************************************************************/
unsigned char uc_RTOutputByte(void) 
{ 
		unsigned char i;
		unsigned char acc;
		unsigned char acc1;
		T_IO_READ();
		for(i=8; i>0; i--)
		{ 
			T_CLK_CLR();
			NOP();
			NOP();
			NOP();
			NOP();
			acc1=PTIM; 
			T_CLK_SET(); 		
			acc = acc >>1;
			if(acc1&0x10){
				  acc|=0x80;
				}
			else{
			    acc&=~0x80;
			 }			 		
		} 
		return(acc); 
}
/******************************************************************** 
*
* 名称: v_W1302
* 说明: 先写地址，后写命令/数据
* 功能: 往DS1302写入数据
* 调用: v_RTInputByte() 
* 输入: ucAddr: DS1302地址, ucDa: 要写的数据
* 返回值: 无
***********************************************************************/
void v_W1302(unsigned char ucAddr, unsigned char ucDa)
{
		T_RST_CLR();
		T_CLK_CLR();
		//T_IO_SET();		
		NOP();
		NOP();
		T_RST_SET();
		NOP();
		NOP();
		v_RTInputByte(ucAddr); /* 地址，命令 */
		v_RTInputByte(ucDa); /* 写1Byte数据*/
		T_RST_CLR();
		T_IO_SET();
		T_CLK_SET();
} 
/******************************************************************** 
*
* 名称: uc_R1302
* 说明: 先写地址，后读命令/数据
* 功能: 读取DS1302某地址的数据
* 调用: v_RTInputByte() , uc_RTOutputByte()
* 输入: ucAddr: DS1302地址
* 返回值: ucDa :读取的数据
***********************************************************************/
unsigned char uc_R1302(unsigned char ucAddr)
{
		unsigned char ucDa;
		T_RST_CLR();
		T_CLK_CLR();
		T_IO_SET();		
		NOP();
		NOP();
		T_RST_SET();
		NOP();
		NOP();
		v_RTInputByte(ucAddr); /* 地址，命令 */
		ucDa = uc_RTOutputByte(); /* 读1Byte数据 */		
		T_RST_CLR();
		T_IO_SET();
		T_CLK_SET();
		return(ucDa);
}
/******************************************************************** 
*
* 名称: v_BurstW1302T
* 说明: 先写地址，后写数据(时钟多字节方式)
* 功能: 往DS1302写入时钟数据(多字节方式)
* 调用: v_RTInputByte() 
* 输入: pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年 控制
* 8Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
***********************************************************************/
void v_BurstW1302T(unsigned char *pSecDa)
{
		unsigned char i;
		v_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
		T_RST_CLR();
		T_CLK_CLR();
		T_IO_SET();		
		NOP();
		NOP();
		T_RST_SET();
		NOP();
		NOP();
		v_RTInputByte(0x01); /* 0xbe:时钟多字节写命令 */
		for (i=8;i>0;i--) /*8Byte = 7Byte 时钟数据 + 1Byte 控制*/
		{
			v_RTInputByte(*pSecDa);/* 写1Byte数据*/
			pSecDa++;
		}
		T_RST_CLR();
		T_IO_SET();
		T_CLK_SET();
} 
/******************************************************************** 
*
* 名称: v_BurstR1302T
* 说明: 先写地址，后读命令/数据(时钟多字节方式)
* 功能: 读取DS1302时钟数据
* 调用: v_RTInputByte() , uc_RTOutputByte()
* 输入: pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年 
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: ucDa :读取的数据
***********************************************************************/
void v_BurstR1302T(unsigned char *pSecDa)
{
		unsigned char i;
		T_RST_CLR();
		T_CLK_CLR();
		T_IO_SET();		
		NOP();
		NOP();
		T_RST_SET();
		NOP();
		NOP(); 
		v_RTInputByte(0xbf); /* 0xbf:时钟多字节读命令 */
		for (i=8; i>0; i--) 
		{
			*pSecDa = uc_RTOutputByte(); /* 读1Byte数据 */
			pSecDa++;
		}
		T_RST_CLR();
		T_IO_SET();
		T_CLK_SET();
}
/******************************************************************** 
*
* 名称: v_BurstW1302R
* 说明: 先写地址，后写数据(寄存器多字节方式)
* 功能: 往DS1302寄存器数写入数据(多字节方式)
* 调用: v_RTInputByte() 
* 输入: pReDa: 寄存器数据地址
* 返回值: 无
***********************************************************************/
void v_BurstW1302R(unsigned char *pReDa)
{
	unsigned char i;
	v_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
		T_RST_CLR();
		T_CLK_CLR();
		T_IO_SET();		
		NOP();
		NOP();
		T_RST_SET();
		NOP();
		NOP();
	v_RTInputByte(0xbe); /* 0xbe:时钟多字节写命令 */
	for (i=31;i>0;i--) /*31Byte 寄存器数据 */
	{
		v_RTInputByte(*pReDa); /* 写1Byte数据*/
		pReDa++;
	}
		T_RST_CLR();
		T_IO_SET();
		T_CLK_SET();
} 
/******************************************************************** 
*
* 名称: uc_BurstR1302R
* 说明: 先写地址，后读命令/数据(寄存器多字节方式)
* 功能: 读取DS1302寄存器数据
* 调用: v_RTInputByte() , uc_RTOutputByte()
* 输入: pReDa: 寄存器数据地址
* 返回值: 无
***********************************************************************/
void v_BurstR1302R(unsigned char *pReDa)
{
	unsigned char i;
		T_RST_CLR();
		T_CLK_CLR();
		T_IO_SET();		
		NOP();
		NOP();
		T_RST_SET();
		NOP();
		NOP();
	v_RTInputByte(0xbf); /* 0xbf:时钟多字节读命令 */
	for (i=31; i>0; i--) /*31Byte 寄存器数据 */
	{
		*pReDa = uc_RTOutputByte(); /* 读1Byte数据 */
		pReDa++;
	}
		T_RST_CLR();
		T_IO_SET();
		T_CLK_SET();
}
/******************************************************************** 
*
* 名称: v_Set1302
* 说明: 
* 功能: 设置初始时间
* 调用: v_W1302() 
* 输入: 设置的时间模式、新的时间值 
* 返回值: 无
***********************************************************************/
void v_Set1302(unsigned char set_mode,unsigned char set_time) 
{
	v_start_enable(0);
	v_write_enable(1); 
	v_W1302(set_mode,set_time); /* 秒 分 时 日 月 星期 年 */		
	v_write_enable(0);
	v_start_enable(1);
	//v_W1302(0x8e,0x80); /* 控制命令,WP=1,写保护?*/
}
/******************************************************************** 
*
* 名称: v_Get1302
* 说明: 
* 功能: 读取DS1302当前时间
* 调用: uc_R1302() 
* 输入: ucCurtime: 保存当前时间地址。当前时间格式为: 秒 分 时 日 月 星期 年 
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
***********************************************************************/
void v_Get1302(unsigned char *ucCurtime) 
{
		unsigned char i;
		unsigned char ucAddr = 0x81;
		for (i=0;i<7;i++)
		{
			ucCurtime[i] = uc_R1302(ucAddr);/*格式为: 秒 分 时 日 月 
			星期 年 */
			ucAddr += 2;
		}
}
/******************************************************************** 
*
* 名称: v_write_enable()
* 说明: 
* 功能: DS1302写保护
  參數：写入是否使能
* 返回值: 无
*********************************************************************/ 
void v_write_enable(unsigned char Enable)
{
   if(Enable)
		v_W1302(0x8e, 0x00);//ds1302写允许
	 else
		v_W1302(0x8e, 0x80);//ds1302写保护
}
/******************************************************************** 
*
* 名称: v_start_enable()
* 说明: 
* 功能: DS1302晶振启动使能
  參數：晶振是否使能
* 返回值: 无
*********************************************************************/ 
void v_start_enable(unsigned char Enable)
{
   unsigned char v_i;
   v_i=uc_R1302(0x81);
   if(Enable){
	    v_i&=0x7f;
			v_W1302(0x80, v_i);//ds1302振荡工作允许
	  }
	 else{
		  v_i|=0x80;
	    v_W1302(0x80, v_i);//ds1302振荡停止
	  }
}
/******************************************************************** 
*
* 名称: v_init()
* 说明: 
* 功能: DS1302初始化 
  參數：無
* 返回值: 无
***********************************************************************/  
void v_init(void)
{
	 unsigned char v_i;
	 v_i=uc_R1302(0x85);
   v_i&=0x3f;
   v_W1302(0x8e, 0x00);//ds1302写允许
   v_W1302(0x80, 0x05);//打开晶振，同时秒清零   
   v_W1302(0x84, v_i);//选用24小时制，
   v_W1302(0x86, 0x00);//天清零
   v_W1302(0x90, 0xad);//涓流充电
   v_W1302(0x8e, 0x80);//ds1302写保护
}