找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

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

HC6800-ES V2.0單片機(jī)DS1302可調(diào)電子時鐘程序

[復(fù)制鏈接]
ID:465013 發(fā)表于 2019-1-9 01:42 | 顯示全部樓層 |閱讀模式
實(shí)現(xiàn)的功能如下（無鬧鐘功能）。實(shí)物圖和工程文件在壓縮包
制作出來的實(shí)物圖如下：
0.jpg IMG_20190109_005722.JPG

1302顯示可調(diào)時間日期+設(shè)置鬧鐘

單片機(jī)源程序如下:

  2. //顯示格式24-35-25 ，小時-分鐘-秒鐘， 按下S3后，顯示年月日，2017.09.10，延時6秒后返回

  4. #include <reg52.h>
  5. #include <intrins.h>
  6. #define uchar unsigned char
  7. #define uint unsigned  int
  8. #define sce   timedate[1]
  9. #define min   timedate[2]
  10. #define hour  timedate[3]
  11. #define date  timedate[4]
  12. #define week  timedate[6]
  13. #define month timedate[5]
  14. #define year  timedate[7]


  17. uchar displaychar1[8]={0,1,2,3,4,5,6,7},a,ya,ja ;                                         //a結(jié)尾的字符都用來專門延時，a通用，ya日期延時程序用
  18. uchar commandchar[9]={0,0x80,0x82,0x84,0x86,0x88,0x8a,0x8c,0x8e};                  //與timedate對應(yīng)，分別控制每個寄存器的寫，讀時數(shù)組+1，第8個數(shù)是控制寫保護(hù)位
  19. uchar timedate[8],sdat,seta,m;
  20. bit s,s2,s3,s4,K,setbit,sk;
  21. sbit d = P2^6;
  22. sbit w = P2^7;
  23. sbit S2 = P3^0;
  24. sbit S3 = P3^1;
  25. sbit S4 = P3^2;
  26. sbit SCLK = P3^3;
  27. sbit TIO  = P3^4;
  28. sbit TRST = P3^5;


  31. uchar LD = 1;             //************數(shù)碼管,亮度調(diào)節(jié),0最小,10最高,越亮越閃 因會影響開始信號查詢時間,建議最高設(shè)置為3**************
  32. unsigned char code duan[]=
  33. {                0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f,0x40,0x00                };           //段選碼0-9


  36. void timeout(uchar a)
  37. {
  38.    uchar b;
  39.    for(;a>0;a--)
  40.                 for(b=114;b>0;b--);
  41. }
  42. void timeout5us()
  43. {
  44.         _nop_();
  45. }

  47. void display()                                           //兩個數(shù),分別記錄鍵值和重復(fù)碼個數(shù)
  48. {
  49.        
  50.         P0 = 0xfe;                                         w = 1;          w = 0;    //顯示1位               
  51.         P0 = (displaychar1[0]);                d = 1;                 d = 0;
  52.         timeout(LD);
  53.         P0 = 0;                                                d = 1;                d = 0;                                                            //清除段選       
  54.                                                                                                          
  55.         P0 = 0xfd;                                  w = 1;                 w = 0;    //顯示2位        
  56.         P0 = displaychar1[1];                 d = 1;                d = 0;
  57.         timeout(LD);
  58.         P0 = 0;                                                d = 1;                d = 0;                                                          //清除段選  

  60.         P0 = 0xfb;                                  w = 1;                 w = 0;   //顯示3位        
  61.         P0 = displaychar1[2];                d = 1;                 d = 0;
  62.         timeout(LD);
  63.         P0 = 0;                                                d = 1;                d = 0;                                                          //清除段選        

  65.         P0 = 0xf7;                                        w = 1;                w = 0;   //顯示4位         
  66.         P0 = displaychar1[3];                d = 1;                 d = 0;
  67.         timeout(LD);
  68.         P0 = 0;                                                d = 1;                d = 0;                                                        //清除段選，否則下一個位選變化后由于段選沒變會將此位信息顯示到下一個位。
  69.        
  70.         P0 = 0xef;                                        w = 1;          w = 0;   //顯示5位        
  71.         P0 = displaychar1[4];                d = 1;                d = 0;
  72.         timeout(LD);
  73.         P0 = 0;                                                d = 1;                d = 0;                                                          //清除段選
  74.        
  75.         P0 = 0xdf;                                         w = 1;                 w = 0;   //顯示6位        
  76.         P0 = displaychar1[5];                d = 1;                d = 0;
  77.         timeout(LD);                                                          
  78.         P0 = 0;                                                d = 1;                 d = 0;                                                  //清除段選       

  80.         P0 = 0xbf;                                         w = 1;                w = 0;   //顯示7位                
  81.         P0 = displaychar1[6];                 d = 1;                 d = 0;       
  82.         timeout(LD);
  83.         P0 = 0;                                                d = 1;                 d = 0;                                                  //清除段選       

  85.         P0 = 0x7f;                                        w = 1;                w = 0;  //顯示8位           
  86.         P0 = displaychar1[7];                d = 1;                d = 0;
  87.         timeout(LD);
  88.         P0 = 0;                                                d = 1;                d = 0;                                                        //清除段選，否則下一個位選變化后由于段選沒變會將此位信息顯示到下一個位。
  89.        
  90. }
  91. /************************************************************************************
  92. -------------------------------以下是與時鐘芯片的數(shù)據(jù)時序---------------------------*/

  94. //寫控制和一個字節(jié)
  95. void sendchar(uchar csdat,uchar sdat)
  96. {        SCLK = 0;
  97.         TRST = 1;
  98.         for(a=0;a<8;a++)
  99.         {                                   
  100.                 SCLK = 0;
  101.                 TIO  = (csdat%2);
  102.                 SCLK = 1;
  103.                 csdat >>=1;
  104.         }
  105.         for(a=0;a<8;a++)
  106.         {                                   
  107.                 SCLK = 0;
  108.                 TIO  = (sdat%2);
  109.                 SCLK = 1;
  110.                 sdat >>=1;
  111.         }
  112.         SCLK = 0;
  113.         TRST = 0;

  115. }
  116. //讀一個字節(jié)
  117. uchar receviechar(uchar crdat)
  118. {                         
  119.         uchar rdat;
  120.         TRST = 1;       
  121. //        TIO  = 1;
  122.         TRST = 1;
  123.         for(a=0;a<8;a++)
  124.         {                                   
  125.                 SCLK = 0;
  126.                 TIO  = (crdat%2);
  127.                 SCLK = 1;
  128.                 crdat >>=1;
  129.         }
  130.         for(a=0;a<8;a++)
  131.         {
  132.                 SCLK =   1;
  133.                 rdat >>= 1;
  134.                 SCLK =   0;
  135.        
  136.                 if(TIO)
  137.                         rdat = rdat|0x80;
  138.         }
  139.         SCLK = 0;        TRST = 0;       
  140.         return rdat ;
  141. }
  142. //讀取時分秒
  143. void readtime()
  144. {                                  
  145.         sendchar(0x8e,0);
  146.         hour = receviechar(0x85);
  147.         min  = receviechar(0x83);
  148.         sce  = receviechar(0x81);
  149.         sendchar(0x8e,0x80); //       
  150.        
  151. }
  152. //讀取年月日
  153. void readyear()
  154. {                                  
  155.         sendchar(0x8e,0);
  156.         date = receviechar(0x87);
  157.         month  = receviechar(0x89);
  158.         year  = receviechar(0x8d);
  159.         sendchar(0x8e,0x80);         //       
  160.        
  161. }
  162. //=========================鍵盤掃描，用定時器延時================================
  163. bit jianpan(K)
  164. {
  165.         if((!K)&TF0)    //如果S2按下且計(jì)時器0溢出
  166.                 {
  167.                         TF0 = 0;
  168.                         ja++;          
  169.                         if(ja>=2)
  170.                                 {//        P1 = 0;  
  171.                                         TR0 = 0;                    //每次按下后都會關(guān)閉定時器，后面的程度會檢測松手，松開按鍵后會重新打開定時器，可以保護(hù)每次按下只起作用一次
  172.                                         ja = 0;                               
  173.                                         s = 1;
  174.                                 }
  175.                         return s;
  176.                 }

  178.         return s;

  180. }

  182. //===========================================================================================================
  183. //**********************************************設(shè)置時間日期子函數(shù)*******************************************
  184. //===========================================================================================================
  185. void settime()
  186. {       
  187. //        uchar sdat,seta;
  188. //        bit sk;
  189.         setbit=1;                                           //設(shè)置控制標(biāo)識，進(jìn)本函數(shù)后先就讓標(biāo)識打開，在下面延時跳出前都會一直跳入設(shè)置功能函數(shù)
  190.         if(TF1&(s2==s3==s4==0))                          //沒有按鍵按下時用定時器1來延時跳出
  191.         {                  
  192.                 TF1=0;         
  193.                 seta ++;
  194.         }
  195.         if(!(s2==s3==s4==0))        seta = 0;        //延時時間超過一定值，或者有按鍵被按下（注意！這個符號）時，時間會被延長
  196.         if(s3); //P1++;                                                  //P1++無用：調(diào)試軟件時檢測運(yùn)行的次數(shù)
  197.         if(seta>=70)
  198.         {                   
  199.                 setbit=0;                                          //關(guān)閉設(shè)置
  200.                 sdat = 0;       
  201.         }
  202.         if(sk!=s2)                                              //sk用來做s2的中間暫存數(shù)據(jù)，用來用來識別S2是否變化過
  203.         {
  204.                 sk = s2;
  205.                 if(s2)
  206.                 sdat ++;                                               //每次進(jìn)行一次S2動作時才自加一次SDTA
  207.                 if(sdat ==6)sdat=7;                         //跳過星期，本程序不顯示星期                          
  208.         }
  209.         m = timedate[sdat]/16*10+timedate[sdat]%16;                          //m用10進(jìn)制存下
  210.         if(s3) m--;
  211.         if(s4) m++;
  212.         switch (sdat)                                                   //每次進(jìn)入設(shè)置的對應(yīng)操作判斷
  213.         {
  214.         case 1:
  215.                 if(m>59) m = 0;                                break;
  216.         case 2:
  217.                 if(m>59) m = 0;                                break;
  218.         case 3:
  219.                 if(m>23) m = 0;                                break;
  220.         case 4:
  221.                 if(timedate[5]==4|timedate[5]==6|timedate[5]==9|timedate[5]==11)  //小月
  222.                 {
  223.                         if(m>30) m = 1;                        break;
  224.                 }
  225.                 if(timedate[5]==2&(timedate[7]%4==0))                                                  //閏年2月
  226.                 {
  227.                         if(m>29) m=1;         P1++;                break; //
  228.                 }
  229.                 if(timedate[5]==2&(timedate[7]%4!=0))                                                  //平年2月
  230.                 {
  231.                         if(m>28) m=1;                        break;                                                          
  232.                 }
  233.                 if(m>31) m =1;                                break;                                                          //其它月分情況
  234.         case 5:
  235.                 if(m>12) m = 1;                                 break;
  236.         case 6:                 sdat++;                                           //跳過星期本程序不顯示星期
  237.                 if(m>7)  m = 1;                                 break;
  238.         case 7:
  239.                 if(m>99) m = 0;                                 break;
  240.         default : /****不在判斷范圍的進(jìn)行初始化處理*/
  241.                 sdat = 0; sk=0; setbit = 0;s2 = 0;//        P1++;        //本程序所有P1++都是測試軟件運(yùn)行情況用                                  //每次在不滿足條件時自動讓數(shù)據(jù)初始化，
  242.                                                                         break;
  243.                                                    //s2=0是優(yōu)化點(diǎn)，在按下S2后按鍵標(biāo)識不會清零，松手時程序已重復(fù)運(yùn)行了很多遍，所以會重新跳回設(shè)置的第一位，加本命令可以讓設(shè)置判斷失效，不進(jìn)設(shè)置頁。
  244.         }
  245.         //==================================
  246.         //setbit為1則說明以上有成立的條件，需要發(fā)送修改數(shù)據(jù)
  247.         if(setbit)       
  248.         {
  249.                 sendchar(0x8e,0);                                                                                                //去寫保護(hù)
  250.                 sendchar(commandchar[sdat],m/10*16+m%10);                                                //將改好的數(shù)字發(fā)送到1302
  251.                 sendchar(0x8e,0x80);                                                                                        //加寫保護(hù)
  252.        
  253.                 if(seta%5>2&seta<50)
  254.                 timedate[sdat] = 0xbb;                                                                                        //設(shè)置延時操作期間控制閃爍時間
  255.         }                                          //顯示空，對應(yīng)段選的兩位11；0xbb/16=11，0xbb%16=11  ，而上面段選數(shù)組中第12個數(shù)是顯示空


  258. //寫程序時用的測試語句，無用時未刪供復(fù)習(xí)時看看當(dāng)時的思路
  259. /*        switch (sdat)
  260.         {
  261.                 case 1:
  262.                 P1=0xfe;
  263.                 m = sce;
  264.                 if(s4) m++;
  265.                 if(s3) m--;
  266.        
  267.                            break;
  268.                 case 2:
  269.                 P1=0xfd;                   break;
  270.                 case 3:
  271.                 P1=0xfb;                   break;
  272.                 case 4
  273.                 :P1=0xf7;                   break;
  274.                 case 5:
  275.                 P1=0xef;                   break;
  276.                 case 6:
  277.                 P1=0xdf;                   break;
  278.                 case 7:
  279.                 P1=0xbf;                   break;
  280.                 case 8:
  281.                 P1=0x7f;                   break;
  282.                 default :
  283.                 sdat = 0;sk=0;                                //每次在不滿足條件時自動讓數(shù)據(jù)初始化，
  284.                 break;

  286.         } */
  287. }
  288. //===================================================================================
  289. //============================== 主函數(shù)==============================================
  290. main()
  291. {
  292.                                                   
  293.         SCLK = 0 ;
  294.         TRST = 0 ;
  295.         readyear();                                                                          //讀取年月日
  296.         if(year!=0x17)                                                                 //如果不是2017年，就初始化1302        ，給初值是17年10月03日，12：11：15
  297.         {
  298.                 sendchar(0x8e,0);
  299.                 sendchar(0x80,0x15);
  300.                 sendchar(0x82,0x11);
  301.                 sendchar(0x84,0x12);
  302.                
  303.                 sendchar(0x86,0x03);
  304.                 sendchar(0x88,0x10);
  305.                 sendchar(0x8c,0x17);
  306.                 sendchar(0x8e,0x80);
  307.         }
  308.         TMOD = 0x12;                   //設(shè)置定時器工作模式
  309.         TR1 = 1;                         
  310.         TR0 = 1;
  311.         while(1)
  312.         {
  313.                 if(!S2) s2 = jianpan(S2);
  314.                 if(!S3) s3 = jianpan(S3);
  315.                 if(!S4) s4 = jianpan(S4);
  316.        
  317.                 TRST = 0;
  318.         /*以下是開始年月日自動歸零的問題修改，問題產(chǎn)生原因是開始沒有加！setbit這個條件，程序在運(yùn)行到設(shè)置年月日時依然會進(jìn)
  319.           入下面這個判斷，然后再進(jìn)入設(shè)置，但是年月日在這里還沒有讀數(shù)，所以這里的設(shè)置就會進(jìn)入M=0然后加或減，從而讓設(shè)置值
  320.           出現(xiàn)錯誤
  321.         */
  322.                 if((!ya&(!setbit)&(!s3))|(setbit&(sdat<4)))                                         //如果S2沒有被按下且不在顯示年月日的延時范圍，而且設(shè)置標(biāo)識為0時，或者在標(biāo)識為1但是設(shè)置值在123中時，則正常顯示時間格式
  323.                 {
  324.                         readtime();         //P1++;           //先讀一下時間然后再判官設(shè)置程序，這樣的主要目的是讓初m的值由1302決定。
  325.                         if(s2|setbit)                        //按下S2或設(shè)置標(biāo)識打開時會進(jìn)入本判斷
  326.                         {
  327.                                 ya = 0;
  328.                                 settime();
  329.                         }
  330.                         displaychar1[0] = duan[hour/16];
  331.                         displaychar1[1] = duan[hour%16];
  332.                         displaychar1[2] = duan[10];
  333.                         displaychar1[3] = duan[min/16];
  334.                         displaychar1[4] = duan[min%16];
  335. ……………………

  337. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復(fù)制代碼

所有資料51hei提供下載:
單片機(jī)DS1302可調(diào)電子時鐘.rar (214.88 KB, 下載次數(shù): 52)


回復(fù)

使用道具 舉報

ID:619942 發(fā)表于 2019-12-23 11:17 | 顯示全部樓層
實(shí)驗(yàn)程序很方便，就是還沒上去試試行不行
自己技術(shù)太差了，需要師兄們幫助啊、~~~~~
回復(fù)

使用道具 舉報

ID:619942 發(fā)表于 2019-12-23 12:53 | 顯示全部樓層
感覺這個程序還是太長了點(diǎn)，不過比我自己寫的好很多，說實(shí)話，小拜對這些東西了解起來實(shí)在是困難
回復(fù)

使用道具 舉報

ID:315554 發(fā)表于 2020-1-8 10:23 | 顯示全部樓層
謝謝樓主，不錯的程序代碼，注釋詳細(xì)，如果有個原理圖更妙，
回復(fù)

使用道具 舉報

ID:737450 發(fā)表于 2020-4-25 08:31 | 顯示全部樓層
有點(diǎn)讀不懂
回復(fù)

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規(guī)則

手機(jī)版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術(shù)交流QQ群281945664

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表