自在自线亚洲а∨天堂在线-中文字幕一区视频播放-扒开双腿猛进入喷水高潮叫声-欧美日本亚洲一区二区-老熟妇高潮偷拍一区二区-国产精品高清一区二区不卡-午夜色福利视频一区二区三区-亚洲国产成人精品福利在线观看-亚洲欧美成人一区二区在线电影

機(jī)電之家資源網(wǎng)
單片機(jī)首頁|單片機(jī)基礎(chǔ)|單片機(jī)應(yīng)用|單片機(jī)開發(fā)|單片機(jī)文案|軟件資料下載|音響制作|電路圖下載 |嵌入式開發(fā)
培訓(xùn)信息
贊助商
ds1302時(shí)鐘C程序
ds1302時(shí)鐘C程序
作者:jdzj868  來源:機(jī)電之家下載站  錄入:jdzj868  更新時(shí)間：2009-10-30 14:45:46  點(diǎn)擊數(shù)：0
【字體： 字體顏色】

/*********************************************************************/
/* ds1302實(shí)時(shí)時(shí)鐘C程序 */
/*51hei.com會(huì)員經(jīng)典作品已經(jīng)測試成功/

#include < reg52.h>
#include <intrins.h>

#define uchar unsigned char

sbit T_CLK = P3^4; /*實(shí)時(shí)時(shí)鐘時(shí)鐘線引腳 */
sbit T_IO = P3^3; /*實(shí)時(shí)時(shí)鐘數(shù)據(jù)線引腳 */
sbit T_RST = P3^2; /*實(shí)時(shí)時(shí)鐘復(fù)位線引腳 */
//sbit OE=P3^6;
sbit ACC0=ACC^0;
sbit ACC7=ACC^7;

uchar time[8]="  :  :  ";
uchar min,hou,day,mon,yea;

void Init1302(void);
void v_W1302(uchar ucAddr, uchar ucDa);
uchar uc_R1302(uchar ucAddr);
void v_BurstW1302T(uchar *pSecDa);
void v_BurstR1302T(uchar *pSecDa);
void v_BurstW1302R(uchar *pReDa);
void v_BurstR1302R(uchar *pReDa);
void v_Set1302(uchar *pSecDa);
void v_Get1302(uchar ucCurtime[]);
void donetime(void);
void bcd_int(uchar i);
void bcdtoInt(void);
void SetTime(void);
/********************************************************************
*
* 名稱: v_RTInputByte
* 說明:
* 功能: 往DS1302寫入1Byte數(shù)據(jù)
* 調(diào)用:
* 輸入: ucDa 寫入的數(shù)據(jù)
* 返回值: 無
***********************************************************************/
void v_WTInputByte(uchar ucDa)
 {
  uchar i;
  //OE=0;
  ACC= ucDa;
  for(i=8; i>0; i--)
   {
    T_IO = ACC0; //*相當(dāng)于匯編中的 RRC
    T_CLK = 1;
    T_CLK = 0;
    ACC =ACC>> 1;
   }
 // OE=1; 
 }
/********************************************************************
*
* 名稱: uchar uc_RTOutputByte
* 說明:
* 功能: 從DS1302讀取1Byte數(shù)據(jù)
* 調(diào)用:
* 輸入:
* 返回值: ACC
***********************************************************************/
uchar uc_RTOutputByte(void)
 {
  uchar i;
  //OE=0;
  for(i=8; i>0; i--)
   {
    ACC = ACC>>1; //*相當(dāng)于匯編中的 RRC
    ACC7 = T_IO;
    T_CLK = 1;        
    T_CLK = 0;
   } 
  //OE=1;   
  return(ACC);
 }
/********************************************************************
*
* 名稱: v_W1302
* 說明: 先寫地址，后寫命令/數(shù)據(jù)
* 功能: 往DS1302寫入數(shù)據(jù)
* 調(diào)用: v_RTInputByte()
* 輸入: ucAddr: DS1302地址, ucDa: 要寫的數(shù)據(jù)
* 返回值: 無
***********************************************************************/
void v_W1302(uchar ucAddr, uchar ucDa)
 {
  //OE=0;
  T_RST = 0;
  T_CLK = 0;
  T_RST = 1;
  v_WTInputByte(ucAddr); /* 地址，命令 */
  v_WTInputByte(ucDa); /* 寫1Byte數(shù)據(jù)*/
  T_CLK = 1;
  T_RST =0;
  //OE=1; 
 }
/********************************************************************
*
* 名稱: uc_R1302
* 說明: 先寫地址，后讀命令/數(shù)據(jù)
* 功能: 讀取DS1302某地址的數(shù)據(jù)
* 調(diào)用: v_RTInputByte() , uc_RTOutputByte()
* 輸入: ucAddr: DS1302地址
* 返回值: ucDa :讀取的數(shù)據(jù)
***********************************************************************/
uchar uc_R1302(uchar ucAddr)
 {
  uchar ucDa;
  //OE=0;
  T_RST = 0;
  T_CLK = 0;
  T_RST = 1;
  v_WTInputByte(ucAddr); /* 地址，命令 */
  ucDa = uc_RTOutputByte(); /* 讀1Byte數(shù)據(jù) */
  T_CLK = 1;
  T_RST =0;
 // OE=1;
  return(ucDa);
 }
/********************************************************************
*
* 名稱: v_BurstW1302T
* 說明: 先寫地址，后寫數(shù)據(jù)(時(shí)鐘多字節(jié)方式)
* 功能: 往DS1302寫入時(shí)鐘數(shù)據(jù)(多字節(jié)方式)
* 調(diào)用: v_RTInputByte()
* 輸入: pSecDa: 時(shí)鐘數(shù)據(jù)地址 格式為: 秒 分 時(shí) 日 月 星期 年 控制
* 8Byte (BCD碼) 1B 1B 1B 1B 1B 1B 1B 1B
* 返回值: 無
***********************************************************************/
/*void v_BurstW1302T(uchar *pSecDa)
 {
  uchar i;
  v_W1302(0x8e,0x00); //* 控制命令,WP=0,寫操作?
  T_RST = 0;
  T_CLK = 0;
  T_RST = 1;
  v_WTInputByte(0xbe); //* 0xbe:時(shí)鐘多字節(jié)寫命令
  for (i=8;i>0;i--) //*8Byte = 7Byte 時(shí)鐘數(shù)據(jù) + 1Byte 控制
   {
    v_WTInputByte(*pSecDa);//* 寫1Byte數(shù)據(jù)
    pSecDa++;
   }
  T_CLK = 1;
  T_RST =0;
 }  */      
/********************************************************************
*
* 名稱: v_BurstR1302T
* 說明: 先寫地址，后讀命令/數(shù)據(jù)(時(shí)鐘多字節(jié)方式)
* 功能: 讀取DS1302時(shí)鐘數(shù)據(jù)
* 調(diào)用: v_RTInputByte() , uc_RTOutputByte()
* 輸入: pSecDa: 時(shí)鐘數(shù)據(jù)地址 格式為: 秒 分 時(shí) 日 月 星期 年
* 7Byte (BCD碼) 1B 1B 1B 1B 1B 1B 1B
* 返回值: ucDa :讀取的數(shù)據(jù)
***********************************************************************/
/*void v_BurstR1302T(uchar *pSecDa)
 {
  uchar i;
  T_RST = 0;
  T_CLK = 0;
  T_RST = 1;
  v_WTInputByte(0xbf); //* 0xbf:時(shí)鐘多字節(jié)讀命令
  for (i=8; i>0; i--)
   {
    *pSecDa = uc_RTOutputByte(); //* 讀1Byte數(shù)據(jù)
    pSecDa++;
   }
  T_CLK = 1;
  T_RST =0;
 }  */    
/********************************************************************
*
* 名稱: v_BurstW1302R
* 說明: 先寫地址，后寫數(shù)據(jù)(寄存器多字節(jié)方式)
* 功能: 往DS1302寄存器數(shù)寫入數(shù)據(jù)(多字節(jié)方式)
* 調(diào)用: v_RTInputByte()
* 輸入: pReDa: 寄存器數(shù)據(jù)地址
* 返回值: 無
***********************************************************************/
/*void v_BurstW1302R(uchar *pReDa)
 {
  uchar i;
  v_W1302(0x8e,0x00); //* 控制命令,WP=0,寫操作?
  T_RST = 0;
  T_CLK = 0;
  T_RST = 1;
  v_WTInputByte(0xfe); //* 0xbe:時(shí)鐘多字節(jié)寫命令
  for (i=31;i>0;i--) //*31Byte 寄存器數(shù)據(jù)
   {
    v_WTInputByte(*pReDa); //* 寫1Byte數(shù)據(jù)
    pReDa++;
   }
  T_CLK = 1;
  T_RST =0;
 }   */   
/********************************************************************
*
* 名稱: uc_BurstR1302R
* 說明: 先寫地址，后讀命令/數(shù)據(jù)(寄存器多字節(jié)方式)
* 功能: 讀取DS1302寄存器數(shù)據(jù)
* 調(diào)用: v_RTInputByte() , uc_RTOutputByte()
* 輸入: pReDa: 寄存器數(shù)據(jù)地址
* 返回值: 無
***********************************************************************/
/*void v_BurstR1302R(uchar *pReDa)
 {
  uchar i;
  T_RST = 0;
  T_CLK = 0;
  T_RST = 1;
  v_WTInputByte(0xff); //* 0xbf:時(shí)鐘多字節(jié)讀命令
  for (i=31; i>0; i--) //*31Byte 寄存器數(shù)據(jù)
   {
    *pReDa = uc_RTOutputByte(); //* 讀1Byte數(shù)據(jù)
    pReDa++;
   }
  T_CLK = 1;
  T_RST =0;
 }  */ 
/********************************************************************
*
* 名稱: v_Set1302
* 說明:
* 功能: 設(shè)置初始時(shí)間
* 調(diào)用: v_W1302()
* 輸入: pSecDa: 初始時(shí)間地址。初始時(shí)間格式為: 秒 分 時(shí) 日 月 星期 年
* 7Byte (BCD碼) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 無
***********************************************************************/
/*void v_Set1302(uchar *pSecDa)
 {
  uchar i;
  uchar ucAddr = 0x80;
  v_W1302(0x8e,0x00); // 控制命令,WP=0,寫操作?
  for(i =7;i>0;i--)
   {
    v_W1302(ucAddr,*pSecDa);  //秒 分 時(shí) 日 月 星期 年
    pSecDa++;
    ucAddr +=2;
   }
  v_W1302(0x8e,0x80); // 控制命令,WP=1,寫保護(hù)?
 }  */
/********************************************************************
*
* 名稱: v_Get1302
* 說明:
* 功能: 讀取DS1302當(dāng)前時(shí)間
* 調(diào)用: uc_R1302()
* 輸入: ucCurtime: 保存當(dāng)前時(shí)間地址。當(dāng)前時(shí)間格式為: 秒 分 時(shí) 日 月 星期 年
* 7Byte (BCD碼) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 無
***********************************************************************/
/*void v_Get1302(uchar ucCurtime[])
 {
  uchar i;
  uchar ucAddr = 0x81;
  for (i=0;i<7;i++)
   {
    ucCurtime[i] = uc_R1302(ucAddr);//*格式為: 秒 分 時(shí) 日 月 星期 年
    ucAddr += 2;
   }
 } */ 
/***********************************************************************
* 名稱: Init1302
* 說明:
* 功能: 初始化DS1302
* 調(diào)用: 
* 輸入: 
* 返回值: 無
*****************************************************************************/
void Init1302(void)
 {
  v_W1302(0x8e,0x00);  //控制寫入WP=0
  v_W1302(0x90,0xa5);
  v_W1302(0x80,0x00);  //秒
  v_W1302(0x82,0x59);  //分
  v_W1302(0x84,0x10);  //時(shí)
  v_W1302(0x86,0x01);  //日
  v_W1302(0x88,0x08);  //月
  v_W1302(0x8a,0x03);  //星期
  v_W1302(0x8c,0x07);  //年 */ 
  v_W1302(0x8e,0x80);
 }
/**************************************************************************
* 名稱: donetime
* 說明:
* 功能: 時(shí)間處理
* 調(diào)用: 
* 輸入: 
* 返回值: 無
*****************************************************************************/
void donetime(void)
 {
  uchar d;
  d=uc_R1302(0x81);
  time[6]=d/16+48;
  time[7]=d%16+48;
  d=uc_R1302(0x83);
  time[3]=d/16+48;
  time[4]=d%16+48;
  d=uc_R1302(0x85);
  time[0]=d/16+48;
  time[1]=d%16+48;
  //bcd_int(d);    
 }   

 //
/*void bcd_int(uchar i)
  {
  uchar j;  
  time[0]=(i&0x0f)+48;
  j=i>>4;
  time[1]=(j&0x0f)+48;
 }  */
//
/*void bcdtoInt(void)
 {
  uchar i;
  for(i=0;i<7;i++)
   bcd_int(ucCurtm[i]);
 }  */
//
void SetTime(void)
 {
   v_W1302(0x8e,0x00);
   v_W1302(0x80,0x80);
   v_W1302(0x82,min);
   v_W1302(0x84,hou);
   v_W1302(0x86,day);
   v_W1302(0x88,mon);
   v_W1302(0x8c,yea);
   v_W1302(0x80,0x00);
   v_W1302(0x8e,0x80);
 }
  • 上一篇： pic標(biāo)準(zhǔn)串口和模擬串口4位74hc595動(dòng)態(tài)數(shù)碼管顯示程序
  • 下一篇： 沒有了
    		•
    發(fā)表評論   告訴好友   打印此文  收藏此頁  關(guān)閉窗口  返回頂部
    熱點(diǎn)文章
    		 
    推薦文章
    		 
    相關(guān)文章
    網(wǎng)友評論：（只顯示最新5條。）
    關(guān)于我們　|　聯(lián)系我們　|　廣告合作　|　付款方式　|　使用幫助 | 機(jī)電之家 | 會(huì)員助手 | 免費(fèi)鏈接

    點(diǎn)擊這里給我發(fā)消息66821730(技術(shù)支持)點(diǎn)擊這里給我發(fā)消息66821730(廣告投放) 點(diǎn)擊這里給我發(fā)消息41031197(編輯) 點(diǎn)擊這里給我發(fā)消息58733127(審核)
    本站提供的機(jī)電設(shè)備，機(jī)電供求等信息由機(jī)電企業(yè)自行提供，該企業(yè)負(fù)責(zé)信息內(nèi)容的真實(shí)性、準(zhǔn)確性和合法性。
    機(jī)電之家對此不承擔(dān)任何保證責(zé)任，有侵犯您利益的地方請聯(lián)系機(jī)電之家，機(jī)電之家將及時(shí)作出處理。
    Copyright 2007 機(jī)電之家 Inc All Rights Reserved.機(jī)電之家-由機(jī)電一體化網(wǎng)更名-聲明
    電話：0571-87774297 傳真：0571-87774298
    杭州濱興科技有限公司提供技術(shù)支持

    主辦：杭州市高新區(qū)（濱江）機(jī)電一體化學(xué)會(huì)
    中國行業(yè)電子商務(wù)100強(qiáng)網(wǎng)站

    網(wǎng)站經(jīng)營許可證:浙B2-20080178-1