|
/*此程序的原型是從網(wǎng)上下載的,經(jīng)過(guò)了我的實(shí)驗(yàn)和修改,并成功應(yīng)用*/
#include <w78e58b.h> #include "ht1380.h" #include "intrins.h"
#define uchar unsigned char
/******************************************************************** * * 名稱: v_RTInputByte * 說(shuō)明: * 功能: 往HT1381寫入1Byte數(shù)據(jù) * 調(diào)用: * 輸入: ucDa 寫入的數(shù)據(jù) * 返回值: 無(wú) ***********************************************************************/ void v_RTInputByte(uchar ucDa) { ACC= ucDa; T_IO=ACC0;T_CLK=1;delay();T_CLK=0;delay(); T_IO=ACC1;T_CLK=1;delay();T_CLK=0;delay(); T_IO=ACC2;T_CLK=1;delay();T_CLK=0;delay(); T_IO=ACC3;T_CLK=1;delay();T_CLK=0;delay(); T_IO=ACC4;T_CLK=1;delay();T_CLK=0;delay(); T_IO=ACC5;T_CLK=1;delay();T_CLK=0;delay(); T_IO=ACC6;T_CLK=1;delay();T_CLK=0;delay(); T_IO=ACC7;T_CLK=1;delay();T_CLK=0;delay(); } /******************************************************************** * * 名稱: uchar uc_RTOutputByte * 說(shuō)明: * 功能: 從HT1381讀取1Byte數(shù)據(jù) * 調(diào)用: * 輸入: * 返回值: ACC ***********************************************************************/ uchar uc_RTOutputByte(void) { T_IO=1; ACC0=T_IO; T_CLK=1;delay();T_CLK=0;delay();ACC1=T_IO; T_CLK=1;delay();T_CLK=0;delay();ACC2=T_IO; T_CLK=1;delay();T_CLK=0;delay();ACC3=T_IO; T_CLK=1;delay();T_CLK=0;delay();ACC4=T_IO; T_CLK=1;delay();T_CLK=0;delay();ACC5=T_IO; T_CLK=1;delay();T_CLK=0;delay();ACC6=T_IO; T_CLK=1;delay();T_CLK=0;delay();ACC7=T_IO; return(ACC); } /******************************************************************** * * 名稱: v_W1381 * 說(shuō)明: 先寫地址,后寫命令/數(shù)據(jù) * 功能: 往HT1381寫入數(shù)據(jù) * 調(diào)用: v_RTInputByte() * 輸入: ucAddr: HT1381地址, ucDa: 要寫的數(shù)據(jù) * 返回值: 無(wú) ***********************************************************************/ void v_W1381(uchar ucAddr, uchar ucDa) { T_RST = 0; T_CLK = 0; T_RST = 1; v_RTInputByte(ucAddr); /* 地址,命令 */ v_RTInputByte(ucDa); /* 寫1Byte數(shù)據(jù)*/ T_CLK = 1; T_RST =0; } /******************************************************************** * * 名稱: uc_R1381 * 說(shuō)明: 先寫地址,后讀命令/數(shù)據(jù) * 功能: 讀取HT1381某地址的數(shù)據(jù) * 調(diào)用: v_RTInputByte() , uc_RTOutputByte() * 輸入: ucAddr: HT1381地址 * 返回值: ucDa :讀取的數(shù)據(jù) ***********************************************************************/ uchar uc_R1381(uchar ucAddr) { uchar ucDa; T_RST = 0; T_CLK = 0; T_RST = 1; v_RTInputByte(ucAddr); /* 地址,命令 */ ucDa = uc_RTOutputByte(); /* 讀1Byte數(shù)據(jù) */ T_CLK = 1; T_RST =0; return(ucDa); }
/******************************************************************** * * 名稱: v_Set1381 * 說(shuō)明: * 功能: 設(shè)置初始時(shí)間 * 調(diào)用: v_W1381() * 輸入: pSecDa: 初始時(shí)間地址。初始時(shí)間格式為: 秒 分 時(shí) 日 月 星期 年 * 7Byte (BCD碼) 1B 1B 1B 1B 1B 1B 1B * 返回值: 無(wú) ***********************************************************************/ void v_Set1381(uchar *pSecDa) { uchar i; uchar ucAddr = 0x80; v_W1381(0x8e,0x00); /* 控制命令,WP=0,寫操作?*/ for(i =7;i>0;i--) { v_W1381(ucAddr,*pSecDa); /* 秒 分 時(shí) 日 月 星期 年 */
pSecDa++; ucAddr +=2; } v_W1381(0x8e,0x80); /* 控制命令,WP=1,寫保護(hù)?*/ } /******************************************************************** * * 名稱: v_Get1381 * 說(shuō)明: * 功能: 讀取HT1381當(dāng)前時(shí)間 * 調(diào)用: uc_R1381() * 輸入: ucCurtime: 保存當(dāng)前時(shí)間地址。當(dāng)前時(shí)間格式為: 秒 分 時(shí) 日 月 星期 年 * 7Byte (BCD碼) 1B 1B 1B 1B 1B 1B 1B * 返回值: 無(wú) ***********************************************************************/ void v_Get1381(uchar *ucCurtime) { uchar i; uchar ucAddr = 0x81; for (i=0;i<7;i++) { *ucCurtime = uc_R1381(ucAddr);/*格式為: 秒 分 時(shí) 日 月 星期 年 */ ucCurtime ++; ucAddr += 2; } }
void delay() { _nop_(); _nop_();
}
#ifndef HT1380_h #define HT1380_h
#define uchar unsigned char
//define HT1380 #define T_CLK P13 #define T_IO P12 #define T_RST P10
sbit ACC0=ACC^0; sbit ACC1=ACC^1; sbit ACC2=ACC^2; sbit ACC3=ACC^3; sbit ACC4=ACC^4; sbit ACC5=ACC^5; sbit ACC6=ACC^6; sbit ACC7=ACC^7;
/******************************************************************** * * 名稱: v_RTInputByte * 說(shuō)明: * 功能: 往HT1381寫入1Byte數(shù)據(jù) * 調(diào)用: * 輸入: ucDa 寫入的數(shù)據(jù) * 返回值: 無(wú) ***********************************************************************/ void v_RTInputByte(uchar ucDa);
/******************************************************************** * * 名稱: uchar uc_RTOutputByte * 說(shuō)明: * 功能: 從HT1381讀取1Byte數(shù)據(jù) * 調(diào)用: * 輸入: * 返回值: ACC ***********************************************************************/ uchar uc_RTOutputByte(void);
/******************************************************************** * * 名稱: v_W1381 * 說(shuō)明: 先寫地址,后寫命令/數(shù)據(jù) * 功能: 往HT1381寫入數(shù)據(jù) * 調(diào)用: v_RTInputByte() * 輸入: ucAddr: HT1381地址, ucDa: 要寫的數(shù)據(jù) * 返回值: 無(wú) ***********************************************************************/ void v_W1381(uchar ucAddr, uchar ucDa);
/******************************************************************** * * 名稱: uc_R1381 * 說(shuō)明: 先寫地址,后讀命令/數(shù)據(jù) * 功能: 讀取HT1381某地址的數(shù)據(jù) * 調(diào)用: v_RTInputByte() , uc_RTOutputByte() * 輸入: ucAddr: HT1381地址 * 返回值: ucDa :讀取的數(shù)據(jù) ***********************************************************************/ uchar uc_R1381(uchar ucAddr);
/******************************************************************** * * 名稱: v_Set1381 * 說(shuō)明: * 功能: 設(shè)置初始時(shí)間 * 調(diào)用: v_W1381() * 輸入: pSecDa: 初始時(shí)間地址。初始時(shí)間格式為: 秒 分 時(shí) 日 月 星期 年 * 7Byte (BCD碼) 1B 1B 1B 1B 1B 1B 1B * 返回值: 無(wú) ***********************************************************************/ void v_Set1381(uchar *pSecDa);
/******************************************************************** * * 名稱: v_Get1381 * 說(shuō)明: * 功能: 讀取HT1381當(dāng)前時(shí)間 * 調(diào)用: uc_R1381() * 輸入: ucCurtime: 保存當(dāng)前時(shí)間地址。當(dāng)前時(shí)間格式為: 秒 分 時(shí) 日 月 星期 年 * 7Byte (BCD碼) 1B 1B 1B 1B 1B 1B 1B * 返回值: 無(wú) ***********************************************************************/ void v_Get1381(uchar *ucCurtime);
void delay();
#endif
|