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