電子產(chǎn)業(yè)一站式賦能平臺(tái)

PCB聯(lián)盟網(wǎng)

搜索
查看: 2221|回復(fù): 2
收起左側(cè)

單片機(jī)C語(yǔ)言實(shí)例-364-基于DS1302的日歷時(shí)鐘

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
發(fā)表于 2022-4-6 10:48:23 | 只看該作者 |只看大圖 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
單片機(jī)C語(yǔ)言實(shí)例-364-基于DS1302的日歷時(shí)鐘

//實(shí)例98:基于DS1302的日歷時(shí)鐘
#include<reg51.h>     //包含單片機(jī)寄存器的頭文件
#include<intrins.h>   //包含_nop_()函數(shù)定義的頭文件
/***********************************************************************
以下是DS1302芯片的操作程序
************************************************************************/
unsigned char code digit[10]={"0123456789"};   //定義字符數(shù)組顯示數(shù)字
sbit DATA=P1^1;   //位定義1302芯片的接口,數(shù)據(jù)輸出端定義在P1.1引腳
sbit RST=P1^2;    //位定義1302芯片的接口,復(fù)位端口定義在P1.1引腳
sbit SCLK=P1^0;   //位定義1302芯片的接口,時(shí)鐘輸出端口定義在P1.1引腳
/*****************************************************
函數(shù)功能:延時(shí)若干微秒
入口參數(shù):n
***************************************************/
void delaynus(unsigned char n)
{
unsigned char i;
for(i=0;i<n;i++)
      ;
}
/*****************************************************
函數(shù)功能:向1302寫(xiě)一個(gè)字節(jié)數(shù)據(jù)
入口參數(shù):x
***************************************************/
void Write1302(unsigned char dat)
{
  unsigned char i;
  SCLK=0;            //拉低SCLK,為脈沖上升沿寫(xiě)入數(shù)據(jù)做好準(zhǔn)備
  delaynus(2);       //稍微等待,使硬件做好準(zhǔn)備
  for(i=0;i<8;i++)      //連續(xù)寫(xiě)8個(gè)二進(jìn)制位數(shù)據(jù)
    {
            DATA=dat&0x01;    //取出dat的第0位數(shù)據(jù)寫(xiě)入1302
                delaynus(2);       //稍微等待,使硬件做好準(zhǔn)備
                 SCLK=1;           //上升沿寫(xiě)入數(shù)據(jù)
                 delaynus(2);      //稍微等待,使硬件做好準(zhǔn)備
                 SCLK=0;           //重新拉低SCLK,形成脈沖
                 dat>>=1;          //將dat的各數(shù)據(jù)位右移1位,準(zhǔn)備寫(xiě)入下一個(gè)數(shù)據(jù)位
          }
       
}
/*****************************************************
函數(shù)功能:根據(jù)命令字,向1302寫(xiě)一個(gè)字節(jié)數(shù)據(jù)
入口參數(shù):Cmd,儲(chǔ)存命令字;dat,儲(chǔ)存待寫(xiě)的數(shù)據(jù)
***************************************************/
void WriteSet1302(unsigned char Cmd,unsigned char dat)
{
   RST=0;           //禁止數(shù)據(jù)傳遞
   SCLK=0;          //確保寫(xiě)數(shù)居前SCLK被拉低
        RST=1;           //啟動(dòng)數(shù)據(jù)傳輸
        delaynus(2);     //稍微等待,使硬件做好準(zhǔn)備
        Write1302(Cmd);  //寫(xiě)入命令字
        Write1302(dat);  //寫(xiě)數(shù)據(jù)
        SCLK=1;          //將時(shí)鐘電平置于已知狀態(tài)
        RST=0;           //禁止數(shù)據(jù)傳遞
}
/*****************************************************
函數(shù)功能:從1302讀一個(gè)字節(jié)數(shù)據(jù)
入口參數(shù):x
***************************************************/
unsigned char Read1302(void)
{
   unsigned char i,dat;
        delaynus(2);       //稍微等待,使硬件做好準(zhǔn)備
        for(i=0;i<8;i++)   //連續(xù)讀8個(gè)二進(jìn)制位數(shù)據(jù)
         {
           dat>>=1;       //將dat的各數(shù)據(jù)位右移1位,因?yàn)橄茸x出的是字節(jié)的最低位
                if(DATA==1)    //如果讀出的數(shù)據(jù)是1
                 dat|=0x80;    //將1取出,寫(xiě)在dat的最高位
                 SCLK=1;       //將SCLK置于高電平,為下降沿讀出
                 delaynus(2);  //稍微等待
                 SCLK=0;       //拉低SCLK,形成脈沖下降沿
                 delaynus(2);  //稍微等待
          }         
  return dat;        //將讀出的數(shù)據(jù)返回
}  
/*****************************************************
函數(shù)功能:根據(jù)命令字,從1302讀取一個(gè)字節(jié)數(shù)據(jù)
入口參數(shù):Cmd
***************************************************/
unsigned char  ReadSet1302(unsigned char Cmd)
{
  unsigned char dat;
  RST=0;                 //拉低RST
  SCLK=0;                //確保寫(xiě)數(shù)居前SCLK被拉低
  RST=1;                 //啟動(dòng)數(shù)據(jù)傳輸
  Write1302(Cmd);       //寫(xiě)入命令字
  dat=Read1302();       //讀出數(shù)據(jù)
  SCLK=1;              //將時(shí)鐘電平置于已知狀態(tài)
  RST=0;               //禁止數(shù)據(jù)傳遞
  return dat;          //將讀出的數(shù)據(jù)返回
}
/*****************************************************
函數(shù)功能: 1302進(jìn)行初始化設(shè)置
***************************************************/
void Init_DS1302(void)
{       
   WriteSet1302(0x8E,0x00);                 //根據(jù)寫(xiě)狀態(tài)寄存器命令字,寫(xiě)入不保護(hù)指令
   WriteSet1302(0x80,((0/10)<<4|(0%10)));   //根據(jù)寫(xiě)秒寄存器命令字,寫(xiě)入秒的初始值
        WriteSet1302(0x82,((0/10)<<4|(0%10)));   //根據(jù)寫(xiě)分寄存器命令字,寫(xiě)入分的初始值
        WriteSet1302(0x84,((12/10)<<4|(12%10))); //根據(jù)寫(xiě)小時(shí)寄存器命令字,寫(xiě)入小時(shí)的初始值
        WriteSet1302(0x86,((16/10)<<4|(16%10))); //根據(jù)寫(xiě)日寄存器命令字,寫(xiě)入日的初始值
        WriteSet1302(0x88,((11/10)<<4|(11%10))); //根據(jù)寫(xiě)月寄存器命令字,寫(xiě)入月的初始值
        WriteSet1302(0x8c,((8/10)<<4|(8%10)));   //根據(jù)寫(xiě)小時(shí)寄存器命令字,寫(xiě)入小時(shí)的初始值
}
/*******************************************************************************
以下是對(duì)液晶模塊的操作程序
*******************************************************************************/
sbit RS=P2^0;           //寄存器選擇位,將RS位定義為P2.0引腳
sbit RW=P2^1;           //讀寫(xiě)選擇位,將RW位定義為P2.1引腳
sbit E=P2^2;            //使能信號(hào)位,將E位定義為P2.2引腳
sbit BF=P0^7;           //忙碌標(biāo)志位,,將BF位定義為P0.7引腳
/*****************************************************
函數(shù)功能:延時(shí)1ms
(3j+2)*i=(3×33+2)×10=1010(微秒),可以認(rèn)為是1毫秒
***************************************************/
void delay1ms()
{
   unsigned char i,j;       
         for(i=0;i<10;i++)
          for(j=0;j<33;j++)
           ;                 
}
/*****************************************************
函數(shù)功能:延時(shí)若干毫秒
入口參數(shù):n
***************************************************/
void delaynms(unsigned char n)
{
   unsigned char i;
        for(i=0;i<n;i++)
           delay1ms();
}
/*****************************************************
函數(shù)功能:判斷液晶模塊的忙碌狀態(tài)
返回值:result。result=1,忙碌;result=0,不忙
***************************************************/
bit BusyTest(void)
  {
    bit result;
        RS=0;       //根據(jù)規(guī)定,RS為低電平,RW為高電平時(shí),可以讀狀態(tài)
    RW=1;
    E=1;        //E=1,才允許讀寫(xiě)
    _nop_();   //空操作
    _nop_();
    _nop_();
    _nop_();   //空操作四個(gè)機(jī)器周期,給硬件反應(yīng)時(shí)間       
    result=BF;  //將忙碌標(biāo)志電平賦給result
   E=0;         //將E恢復(fù)低電平
   return result;
  }
/*****************************************************
函數(shù)功能:將模式設(shè)置指令或顯示地址寫(xiě)入液晶模塊
入口參數(shù):dictate
***************************************************/
void WriteInstruction (unsigned char dictate)
{   
    while(BusyTest()==1);   //如果忙就等待
         RS=0;                  //根據(jù)規(guī)定,RS和R/W同時(shí)為低電平時(shí),可以寫(xiě)入指令
         RW=0;   
         E=0;                   //E置低電平(根據(jù)表8-6,寫(xiě)指令時(shí),E為高脈沖,
                           // 就是讓E從0到1發(fā)生正跳變,所以應(yīng)先置"0"
         _nop_();
         _nop_();               //空操作兩個(gè)機(jī)器周期,給硬件反應(yīng)時(shí)間
         P0=dictate;            //將數(shù)據(jù)送入P0口,即寫(xiě)入指令或地址
         _nop_();
         _nop_();
         _nop_();
         _nop_();               //空操作四個(gè)機(jī)器周期,給硬件反應(yīng)時(shí)間
         E=1;                   //E置高電平
         _nop_();
         _nop_();
         _nop_();
         _nop_();               //空操作四個(gè)機(jī)器周期,給硬件反應(yīng)時(shí)間
          E=0;                  //當(dāng)E由高電平跳變成低電平時(shí),液晶模塊開(kāi)始執(zhí)行命令
}
/*****************************************************
函數(shù)功能:指定字符顯示的實(shí)際地址
入口參數(shù):x
***************************************************/
void WriteAddress(unsigned char x)
{
     WriteInstruction(x|0x80); //顯示位置的確定方法規(guī)定為"80H+地址碼x"
}
/*****************************************************
函數(shù)功能:將數(shù)據(jù)(字符的標(biāo)準(zhǔn)ASCII碼)寫(xiě)入液晶模塊
入口參數(shù):y(為字符常量)
***************************************************/
void WriteData(unsigned char y)
{
    while(BusyTest()==1);  
          RS=1;           //RS為高電平,RW為低電平時(shí),可以寫(xiě)入數(shù)據(jù)
          RW=0;
          E=0;            //E置低電平(根據(jù)表8-6,寫(xiě)指令時(shí),E為高脈沖,
                     // 就是讓E從0到1發(fā)生正跳變,所以應(yīng)先置"0"
          P0=y;           //將數(shù)據(jù)送入P0口,即將數(shù)據(jù)寫(xiě)入液晶模塊
          _nop_();
          _nop_();
          _nop_();
     _nop_();       //空操作四個(gè)機(jī)器周期,給硬件反應(yīng)時(shí)間
          E=1;           //E置高電平
          _nop_();
          _nop_();
          _nop_();
         _nop_();        //空操作四個(gè)機(jī)器周期,給硬件反應(yīng)時(shí)間
         E=0;            //當(dāng)E由高電平跳變成低電平時(shí),液晶模塊開(kāi)始執(zhí)行命令
}
/*****************************************************
函數(shù)功能:對(duì)LCD的顯示模式進(jìn)行初始化設(shè)置
***************************************************/
void LcdInitiate(void)
{
    delaynms(15);               //延時(shí)15ms,首次寫(xiě)指令時(shí)應(yīng)給LCD一段較長(zhǎng)的反應(yīng)時(shí)間
    WriteInstruction(0x38);     //顯示模式設(shè)置:16×2顯示,5×7點(diǎn)陣,8位數(shù)據(jù)接口
        delaynms(5);                //延時(shí)5ms ,給硬件一點(diǎn)反應(yīng)時(shí)間
    WriteInstruction(0x38);
        delaynms(5);               //延時(shí)5ms ,給硬件一點(diǎn)反應(yīng)時(shí)間
        WriteInstruction(0x38);     //連續(xù)三次,確保初始化成功
        delaynms(5);               //延時(shí)5ms ,給硬件一點(diǎn)反應(yīng)時(shí)間
        WriteInstruction(0x0c);     //顯示模式設(shè)置:顯示開(kāi),無(wú)光標(biāo),光標(biāo)不閃爍
        delaynms(5);               //延時(shí)5ms ,給硬件一點(diǎn)反應(yīng)時(shí)間
        WriteInstruction(0x06);     //顯示模式設(shè)置:光標(biāo)右移,字符不移
        delaynms(5);                //延時(shí)5ms ,給硬件一點(diǎn)反應(yīng)時(shí)間
        WriteInstruction(0x01);     //清屏幕指令,將以前的顯示內(nèi)容清除
        delaynms(5);             //延時(shí)5ms ,給硬件一點(diǎn)反應(yīng)時(shí)間

}
/**************************************************************
以下是1302數(shù)據(jù)的顯示程序
**************************************************************/
/*****************************************************
函數(shù)功能:顯示秒
入口參數(shù):x
***************************************************/
void DisplaySecond(unsigned char x)
{
unsigned char i,j;     //j,k,l分別儲(chǔ)存溫度的百位、十位和個(gè)位
        i=x/10;//取十位
        j=x%10;//取個(gè)位     
        WriteAddress(0x49);    //寫(xiě)顯示地址,將在第2行第7列開(kāi)始顯示
        WriteData(digit);    //將百位數(shù)字的字符常量寫(xiě)入LCD
        WriteData(digit[j]);    //將十位數(shù)字的字符常量寫(xiě)入LCD
        delaynms(50);         //延時(shí)1ms給硬件一點(diǎn)反應(yīng)時(shí)間   
}

/*****************************************************
函數(shù)功能:顯示分鐘
入口參數(shù):x
***************************************************/
void DisplayMinute(unsigned char x)
{
unsigned char i,j;     //j,k,l分別儲(chǔ)存溫度的百位、十位和個(gè)位
        i=x/10;//取十位
        j=x%10;//取個(gè)位     
        WriteAddress(0x46);    //寫(xiě)顯示地址,將在第2行第7列開(kāi)始顯示
        WriteData(digit);    //將百位數(shù)字的字符常量寫(xiě)入LCD
        WriteData(digit[j]);    //將十位數(shù)字的字符常量寫(xiě)入LCD
        delaynms(50);         //延時(shí)1ms給硬件一點(diǎn)反應(yīng)時(shí)間   
}
/*****************************************************
函數(shù)功能:顯示小時(shí)
入口參數(shù):x
***************************************************/
void DisplayHour(unsigned char x)
{
unsigned char i,j;     //j,k,l分別儲(chǔ)存溫度的百位、十位和個(gè)位
        i=x/10;//取十位
        j=x%10;//取個(gè)位     
        WriteAddress(0x43);    //寫(xiě)顯示地址,將在第2行第7列開(kāi)始顯示
        WriteData(digit);    //將百位數(shù)字的字符常量寫(xiě)入LCD
        WriteData(digit[j]);    //將十位數(shù)字的字符常量寫(xiě)入LCD
        delaynms(50);         //延時(shí)1ms給硬件一點(diǎn)反應(yīng)時(shí)間   
}
/*****************************************************
函數(shù)功能:顯示日
入口參數(shù):x
***************************************************/
void DisplayDay(unsigned char x)
{
unsigned char i,j;     //j,k,l分別儲(chǔ)存溫度的百位、十位和個(gè)位
        i=x/10;//取十位
        j=x%10;//取個(gè)位     
        WriteAddress(0x0c);    //寫(xiě)顯示地址,將在第2行第7列開(kāi)始顯示
        WriteData(digit);    //將百位數(shù)字的字符常量寫(xiě)入LCD
        WriteData(digit[j]);    //將十位數(shù)字的字符常量寫(xiě)入LCD
        delaynms(50);         //延時(shí)1ms給硬件一點(diǎn)反應(yīng)時(shí)間   
}
/*****************************************************
函數(shù)功能:顯示月
入口參數(shù):x
***************************************************/
void DisplayMonth(unsigned char x)
{
unsigned char i,j;     //j,k,l分別儲(chǔ)存溫度的百位、十位和個(gè)位
        i=x/10;//取十位
        j=x%10;//取個(gè)位     
        WriteAddress(0x09);    //寫(xiě)顯示地址,將在第2行第7列開(kāi)始顯示
        WriteData(digit);    //將百位數(shù)字的字符常量寫(xiě)入LCD
        WriteData(digit[j]);    //將十位數(shù)字的字符常量寫(xiě)入LCD
        delaynms(50);         //延時(shí)1ms給硬件一點(diǎn)反應(yīng)時(shí)間   
}
/*****************************************************
函數(shù)功能:顯示年
入口參數(shù):x
***************************************************/
void DisplayYear(unsigned char x)
{
unsigned char i,j;     //j,k,l分別儲(chǔ)存溫度的百位、十位和個(gè)位
        i=x/10;//取十位
        j=x%10;//取個(gè)位     
        WriteAddress(0x06);    //寫(xiě)顯示地址,將在第2行第7列開(kāi)始顯示
        WriteData(digit);    //將百位數(shù)字的字符常量寫(xiě)入LCD
        WriteData(digit[j]);    //將十位數(shù)字的字符常量寫(xiě)入LCD
        delaynms(50);         //延時(shí)1ms給硬件一點(diǎn)反應(yīng)時(shí)間   
}

/*****************************************************
函數(shù)功能:主函數(shù)
***************************************************/
void main(void)
{
  unsigned char second,minute,hour,day,month,year;      //分別儲(chǔ)存苗、分、小時(shí),日,月,年
  unsigned char ReadValue;   //儲(chǔ)存從1302讀取的數(shù)據(jù)
  LcdInitiate();             //將液晶初始化
  WriteAddress(0x01);  //寫(xiě)Date的顯示地址,將在第1行第2列開(kāi)始顯示
  WriteData('D');      //將字符常量寫(xiě)入LCD
  WriteData('a');      //將字符常量寫(xiě)入LCD
  WriteData('t');      //將字符常量寫(xiě)入LCD
  WriteData('e');      //將字符常量寫(xiě)入LCD
  WriteData(':');      //將字符常量寫(xiě)入LCD
  WriteAddress(0x08);  //寫(xiě)年月分隔符的顯示地址, 顯示在第1行第9列
  WriteData('-');      //將字符常量寫(xiě)入LCD
  WriteAddress(0x0b);  //寫(xiě)月日分隔符的顯示地址, 顯示在第1行第12列
  WriteData('-');      //將字符常量寫(xiě)入LCD
  WriteAddress(0x45);  //寫(xiě)小時(shí)與分鐘分隔符的顯示地址, 顯示在第2行第6列
  WriteData(':');      //將字符常量寫(xiě)入LCD
  WriteAddress(0x48);  //寫(xiě)分鐘與秒分隔符的顯示地址, 顯示在第2行第9列
  WriteData(':');      //將字符常量寫(xiě)入LCD
  Init_DS1302();       //將1302初始化       
  while(1)
    {
          ReadValue = ReadSet1302(0x81);   //從秒寄存器讀數(shù)據(jù)
     second=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F);//將讀出數(shù)據(jù)轉(zhuǎn)化
          DisplaySecond(second);          //顯示秒
          ReadValue = ReadSet1302(0x83);  //從分寄存器讀
     minute=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉(zhuǎn)化
          DisplayMinute(minute);               //顯示分
     ReadValue = ReadSet1302(0x85);  //從分寄存器讀
     hour=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉(zhuǎn)化
          DisplayHour(hour);                     //顯示小時(shí)
     ReadValue = ReadSet1302(0x87);  //從分寄存器讀
     day=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉(zhuǎn)化
          DisplayDay(day);                //顯示日
          ReadValue = ReadSet1302(0x89);  //從分寄存器讀
     month=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉(zhuǎn)化
          DisplayMonth(month);            //顯示月
          ReadValue = ReadSet1302(0x8d);  //從分寄存器讀
     year=((ReadValue&0x70)>>4)*10 + (ReadValue&0x0F); //將讀出數(shù)據(jù)轉(zhuǎn)化
          DisplayYear(year);              //顯示年
         }
}


更多詳情參考附件文檔

游客,如果您要查看本帖隱藏內(nèi)容請(qǐng)回復(fù)

0

主題

4

帖子

18

積分

一級(jí)會(huì)員

Rank: 1

積分
18
沙發(fā)
發(fā)表于 2024-5-21 18:22:58 | 只看該作者
那六個(gè)1302的顯示程序里面的digit后面都少了[i],不加的話十位顯示不出來(lái)

0

主題

4

帖子

18

積分

一級(jí)會(huì)員

Rank: 1

積分
18
板凳
發(fā)表于 2024-7-1 13:27:19 | 只看該作者
感謝分享zsbd

發(fā)表回復(fù)

本版積分規(guī)則


聯(lián)系客服 關(guān)注微信 下載APP 返回頂部 返回列表