#include“ds1302.h“

//---DS1302寫入和讀取時分秒的地址命令---//
//---秒分時日月周年?最低位讀寫位;-------//
uchar?code?READ_RTC_ADDR[7]?=?{0x81?0x83?0x85?0x87?0x89?0x8b?0x8d};?
uchar?code?WRITE_RTC_ADDR[7]?=?{0x80?0x82?0x84?0x86?0x88?0x8a?0x8c};

//---DS1302時鐘初始化2013年1月1日星期二12點00分00秒。---//
//---存儲順序是秒分時日月周年存儲格式是用BCD碼---//
uchar?TIME[7]?=?{0X00?0X29?0x00?0x27?0x03?0x12??0x18};

/*******************************************************************************
*?函?數?名?????????:?Ds1302Write
*?函數功能		???:?向DS1302命令（地址+數據）
*?輸????入?????????:?addrdat
*?輸????出?????????:?無
*******************************************************************************/

void?Ds1302Write（uchar?addr?uchar?dat）
{
	uchar?n;
	RST?=?0;
	_nop_（）;

	SCLK?=?0;//先將SCLK置低電平。
	_nop_（）;
	RST?=?1;?//然后將RST（CE）置高電平。
	_nop_（）;

	for?（n=0;?n<8;?n++）//開始傳送八位地址命令
	{
		DSIO?=?addr?&?0x01;//數據從低位開始傳送
		addr?>>=?1;
		SCLK?=?1;//數據在上升沿時，DS1302讀取數據
		_nop_（）;
		SCLK?=?0;
		_nop_（）;
	}
	for?（n=0;?n<8;?n++）//寫入8位數據
	{
		DSIO?=?dat?&?0x01;
		dat?>>=?1;
		SCLK?=?1;//數據在上升沿時，DS1302讀取數據
		_nop_（）;
		SCLK?=?0;
		_nop_（）;	
	}	
		?
	RST?=?0;//傳送數據結束
	_nop_（）;
}

/*******************************************************************************
*?函?數?名?????????:?Ds1302Read
*?函數功能		???:?讀取一個地址的數據
*?輸????入?????????:?addr
*?輸????出?????????:?dat
*******************************************************************************/

uchar?Ds1302Read（uchar?addr）
{
	uchar?ndatdat1;
	RST?=?0;
	_nop_（）;

	SCLK?=?0;//先將SCLK置低電平。
	_nop_（）;
	RST?=?1;//然后將RST（CE）置高電平。
	_nop_（）;

	for（n=0;?n<8;?n++）//開始傳送八位地址命令
	{
		DSIO?=?addr?&?0x01;//數據從低位開始傳送
		addr?>>=?1;
		SCLK?=?1;//數據在上升沿時，DS1302讀取數據
		_nop_（）;
		SCLK?=?0;//DS1302下降沿時，放置數據
		_nop_（）;
	}
	_nop_（）;
	for（n=0;?n<8;?n++）//讀取8位數據
	{
		dat1?=?DSIO;//從最低位開始接收
		dat?=?（dat>>1）?|?（dat1<<7）;
		SCLK?=?1;
		_nop_（）;
		SCLK?=?0;//DS1302下降沿時，放置數據
		_nop_（）;
	}

	RST?=?0;
	_nop_（）;	//以下為DS1302復位的穩定時間必須的。
	SCLK?=?1;
	_nop_（）;
	DSIO?=?0;
	_nop_（）;
	DSIO?=?1;
	_nop_（）;
	return?dat;	
}

/*******************************************************************************
*?函?數?名?????????:?Ds1302Init
*?函數功能		???:?初始化DS1302.
*?輸????入?????????:?無
*?輸????出?????????:?無
*******************************************************************************/

void?Ds1302Init（）
{
	Ds1302Write（0x8E0x80）;		?//打開寫保護功能
}

/*******************************************************************************
*?函?數?名?????????:?Ds1302ReadTime
*?函數功能		???:?讀取時鐘信息
*?輸????入?????????:?無
*?輸????出?????????:?無
*******************************************************************************/

void?Ds1302ReadTime（）
{
	uchar?n;
	for?（n=0;?n<7;?n++）//讀取7個字節的時鐘信號：分秒時日月周年
	{
		TIME[n]?=?Ds1302Read（READ_RTC_ADDR[n]）;
	}
		
}

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2018-05-09?08:39??ad13\
?????文件????????4051??2018-04-30?16:52??ad13\Free?Documents.OutJob
?????目錄???????????0??2018-05-09?08:39??ad13\History\
?????文件???????10107??2018-04-26?17:20??ad13\History\Sheet1.~（1）.SchDoc.Zip
?????文件???????24445??2018-04-26?17:20??ad13\History\Sheet1.~（2）.SchDoc.Zip
?????文件???????24447??2018-04-30?16:31??ad13\History\Sheet1.~（3）.SchDoc.Zip
?????文件???????23948??2018-04-30?16:54??ad13\History\Sheet1.~（4）.SchDoc.Zip
?????文件?????????134??2018-04-26?14:14??ad13\Sheet1?SCH?ECO?2018-4-26?14-14-41.LOG
?????文件?????????332??2018-04-26?14:22??ad13\Sheet1?SCH?ECO?2018-4-26?14-22-20.LOG
?????文件????????1197??2018-04-26?14:50??ad13\Sheet1?SCH?ECO?2018-4-26?14-50-32.LOG
?????文件??????227840??2018-04-30?16:54??ad13\Sheet1.SchDoc
?????文件??????334089??2018-04-30?16:52??ad13\Sheet1.pdf
?????目錄???????????0??2018-05-09?08:39??ad13\__Previews\
?????文件???????81088??2018-04-30?16:54??ad13\__Previews\Sheet1.SchDocPreview
?????目錄???????????0??2018-07-03?14:52??畢業設計8（查詢）\
?????文件?????????455??2017-06-17?14:32??畢業設計8（查詢）\GA6_module_errors.h
?????文件????????6376??2009-05-07?14:37??畢業設計8（查詢）\STARTUP.A51
?????文件???????14048??2018-04-29?16:56??畢業設計8（查詢）\STARTUP.LST
?????文件?????????749??2018-04-29?16:56??畢業設計8（查詢）\STARTUP.OBJ
?????文件????????6691??2018-04-29?16:56??畢業設計8（查詢）\ds1302.LST
?????文件????????5383??2018-04-29?16:56??畢業設計8（查詢）\ds1302.OBJ
?????文件????????3132??2018-03-27?00:38??畢業設計8（查詢）\ds1302.c
?????文件?????????534??2018-03-27?00:12??畢業設計8（查詢）\ds1302.h
?????文件????????7012??2018-04-29?16:56??畢業設計8（查詢）\i2c.LST
?????文件????????4068??2018-04-29?16:56??畢業設計8（查詢）\i2c.OBJ
?????文件????????3482??2013-05-31?16:42??畢業設計8（查詢）\i2c.c
?????文件?????????234??2018-04-08?14:43??畢業設計8（查詢）\i2c.h
?????文件????????3516??2018-04-29?16:56??畢業設計8（查詢）\key.LST
?????文件????????2713??2018-04-29?16:56??畢業設計8（查詢）\key.OBJ
?????文件????????1252??2018-04-09?17:51??畢業設計8（查詢）\key.c
?????文件?????????502??2018-04-09?17:51??畢業設計8（查詢）\key.h
............此處省略20個文件信息