|
- DS1302.H 頭文件:
- /*********************************************************************
- 公司名稱:
- 模塊名稱:DS1302.c
- 功 能:實時時鐘模塊 時鐘芯片型號:DS1302
- 說 明:
- 程序設計:zhaojunjie
- 設計時間:2002.03.02
- 版 本 號: 20020302
- *********************************************************************/
- #include
- sbit T_CLK = P2^7; /*實時時鐘時鐘線引腳 */
- sbit T_IO = P1^4; /*實時時鐘數據線引腳 */
- sbit T_RST = P1^5; /*實時時鐘復位線引腳 */
- sbit ACC0 = ACC^0;
- sbit ACC7 = ACC^7;
- void RTInputByte(uchar); /* 輸入 1Byte */
- uchar RTOutputByte(void); /* 輸出?1Byte */
- void W1302(uchar, uchar);
- uchar R1302(uchar);
- void Set1302(uchar *); /* 設置時間 */
- void Bcd2asc(uchar,uchar *);
- void Get1302(uchar curtime[]); /* 讀取1302當前時間 */
- /********************************************************************
- 函 數 名:RTInputByte()
- 功 能:實時時鐘寫入一字節
- 說 明:往DS1302寫入1Byte數據 (內部函數)
- 入口參數:d 寫入的數據
- 返 回 值:無
- 設 計:zhaojunjie 日 期:2002-03-19
- 修 改: 日 期:
- ***********************************************************************/
- void RTInputByte(uchar d)
- {
- uchar i;
- ACC = d;
- for(i=8; i>0; i--)
- {
- 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 i;
- for(i=8; i>0; i--)
- {
- ACC = ACC >>1; /*相當于匯編中的 RRC */
- ACC7 = T_IO;
- T_CLK = 1;
- T_CLK = 0;
- }
- return(ACC);
- }
- /********************************************************************
- 函 數 名:W1302()
- 功 能:往DS1302寫入數據
- 說 明:先寫地址,后寫命令/數據 (內部函數)
- 調 用:RTInputByte() , RTOutputByte()
- 入口參數:ucAddr: DS1302地址, ucData: 要寫的數據
- 返 回 值:無
- 設 計:zhaojunjie 日 期:2002-03-19
- 修 改: 日 期:
- ***********************************************************************/
- 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 :讀取的數據
- 設 計:zhaojunjie 日 期:2002-03-19
- 修 改: 日 期:
- ***********************************************************************/
- 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);
- }
- /********************************************************************
- 函 數 名:BurstW1302T()
- 功 能:往DS1302寫入時鐘數據(多字節方式)
- 說 明:先寫地址,后寫命令/數據
- 調 用:RTInputByte()
- 入口參數:pWClock: 時鐘數據地址 格式為: 秒 分 時 日 月 星期 年 控制
- 8Byte (BCD碼)1B 1B 1B 1B 1B 1B 1B 1B
- 返 回 值:無
- 設 計:zhaojunjie 日 期:2002-03-19
- 修 改: 日 期:
- ***********************************************************************/
- void BurstW1302T(uchar *pWClock)
- {
- uchar i;
- W1302(0x8e,0x00); /* 控制命令,WP=0,寫操作?*/
- T_RST = 0;
- T_CLK = 0;
- T_RST = 1;
- RTInputByte(0xbe); /* 0xbe:時鐘多字節寫命令 */
- for (i = 8; i>0; i--) /*8Byte = 7Byte 時鐘數據 + 1Byte 控制*/
- {
- RTInputByte(*pWClock); /* 寫1Byte數據*/
- pWClock++;
- }
- T_CLK = 1;
- T_RST = 0;
- }
- /********************************************************************
- 函 數 名:BurstR1302T()
- 功 能:讀取DS1302時鐘數據
- 說 明:先寫地址/命令,后讀數據(時鐘多字節方式)
- 調 用:RTInputByte() , RTOutputByte()
- 入口參數:pRClock: 讀取時鐘數據地址 格式為: 秒 分 時 日 月 星期 年
- 7Byte (BCD碼)1B 1B 1B 1B 1B 1B 1B
- 返 回 值:無
- 設 計:zhaojunjie 日 期:2002-03-19
- 修 改: 日 期:
- ***********************************************************************/
- void BurstR1302T(uchar *pRClock)
- {
- uchar i;
- T_RST = 0;
- T_CLK = 0;
- T_RST = 1;
- RTInputByte(0xbf); /* 0xbf:時鐘多字節讀命令 */
- for (i=8; i>0; i--)
- {
- *pRClock = RTOutputByte(); /* 讀1Byte數據 */
- pRClock++;
- }
- T_CLK = 1;
- T_RST = 0;
- }
- /********************************************************************
- 函 數 名:BurstW1302R()
- 功 能:往DS1302寄存器數寫入數據(多字節方式)
- 說 明:先寫地址,后寫數據(寄存器多字節方式)
- 調 用:RTInputByte()
- 入口參數:pWReg: 寄存器數據地址
- 返 回 值:無
- 設 計:zhaojunjie 日 期:2002-03-19
- 修 改: 日 期:
- ***********************************************************************/
- void BurstW1302R(uchar *pWReg)
- {
- uchar i;
- W1302(0x8e,0x00); /* 控制命令,WP=0,寫操作*/
- T_RST = 0;
- T_CLK = 0;
- T_RST = 1;
- RTInputByte(0xfe); /* 0xbe:時鐘多字節寫命令 */
- for (i=31; i>0; i--) /* 31Byte 寄存器數據 */
- {
- RTInputByte(*pWReg); /* 寫1Byte數據*/
- pWReg++;
- }
- T_CLK = 1;
- T_RST = 0;
- }
- /********************************************************************
- 函 數 名:BurstR1302R()
- 功 能:讀取DS1302寄存器數據
- 說 明:先寫地址,后讀命令/數據(寄存器多字節方式)
- 調 用:RTInputByte() , RTOutputByte()
- 入口參數:pRReg: 寄存器數據地址
- 返 回 值:無
- 設 計:zhaojunjie 日 期:2002-03-19
- 修 改: 日 期:
- ***********************************************************************/
- void BurstR1302R(uchar *pRReg)
- {
- uchar i;
- T_RST = 0;
- T_CLK = 0;
- T_RST = 1;
- RTInputByte(0xff); /* 0xff:時鐘多字節讀命令 */
- for (i=31; i>0; i--) /*31Byte 寄存器數據 */
- {
- *pRReg = RTOutputByte(); /* 讀1Byte數據 */
- pRReg++;
- }
- T_CLK = 1;
- T_RST = 0;
- }
- /********************************************************************
- 函 數 名:Set1302()
- 功 能:設置初始時間
- 說 明:先寫地址,后讀命令/數據(寄存器多字節方式)
- 調 用:W1302()
- 入口參數:pClock: 設置時鐘數據地址 格式為: 秒 分 時 日 月 星期 年
- 7Byte (BCD碼)1B 1B 1B 1B 1B 1B 1B
- 返 回 值:無
- 設 計:zhaojunjie 日 期:2002-03-19
- 修 改: 日 期:
- ***********************************************************************/
- void Set1302(uchar *pClock)
- {
- uchar i;
- uchar ucAddr = 0x80;
- W1302(0x8e,0x00); /* 控制命令,WP=0,寫操作?*/
- for(i =7; i>0; i--)
- {
- W1302(ucAddr,*pClock); /* 秒 分 時 日 月 星期 年 */
- pClock++;
- ucAddr +=2;
- }
- W1302(0x8e,0x80); /* 控制命令,WP=1,寫保護?*/
- }
- /********************************************************************
- 函 數 名:Get1302()
- 功 能:讀取DS1302當前時間
- 說 明:
- 調 用:R1302()
- 入口參數:ucCurtime: 保存當前時間地址。當前時間格式為: 秒 分 時 日 月 星期 年
- 7Byte (BCD碼) 1B 1B 1B 1B 1B 1B 1B
- 返 回 值:無
- 設 計:zhaojunjie 日 期:2002-03-19
- 修 改: 日 期:
- ***********************************************************************/
- void Get1302(uchar ucCurtime[])
- {
- uchar i;
- uchar ucAddr = 0x81;
- for (i=0; i<7; i++)
- {
- ucCurtime[i] = R1302(ucAddr);/*格式為: 秒 分 時 日 月 星期 年 */
- ucAddr += 2;
- }
- }
復制代碼 |
|