设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 51单片机简单易懂的ds1302时间代码
返回列表 发新帖
查看: 4146|回复: 2
收起左侧

51单片机简单易懂的ds1302时间代码

[复制链接]
ID:126738 发表于 2018-12-24 16:11 | 显示全部楼层 |阅读模式
ds1302 数码管显示时间，年份，日期交互显示， 51单片机适用的代码，简单易懂，包括的功能有，定时报警亮灯，定时控制，可改写成控制家电代码

单片机源程序如下:
  1. #include<reg51.h>
  2. #define uchar unsigned char
  3. #define uint unsigned int
  4. uchar code table[17]={
  5. 0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
  6. 0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71,0x40};
  7. //0、1、2、3、4、5、6、7、8、9、A、b、C、d、E、F的显示码

  9. sbit wei = P2^7 ;
  10. sbit duan = P2^6 ;
  11. sbit TCE=P1^2;
  12. sbit TCLK=P1^0;
  13. sbit TIO =P1^1;

  15. uchar position[] = {0xFE, 0xFD, 0xFB, 0xF7, 0xEF, 0xDF, 0xBF, 0x7F};          //8个数码管位选数组
  16. uchar udata[]={1,2,16,4,5,16,7,8};


  19. uchar code write_addr[7]={0x80,0x82,0x84,0x86,0x88,0x8a,0x8c};
  20. uchar code read_addr[7]={0x81,0x83,0x85,0x87,0x89,0x8b,0x8d};   

  22. #define hex(dat) (dat / 10 * 16 + (dat % 10)) //十进制转BCD码  
  23. #define dec(dat) ((dat >> 4)* 10 + (dat & 0x0f)) //BCD码转十进制

  25. /*形式上为十六进，数值是BCD码*/
  26. //存储格式是BCD码秒   分   时   日   月   周   年
  27. //uchar time[7]={0x50,0x59,0x14,0x20,0x06,0x06,0x19};

  29. /*如果数值时间是十进制，写入时间时要先转化为BCD码*/
  30. uchar time[7]={0,59,15,15,12,6,18}; //十进制
  31. uchar settime[3] = {5,59,15};         //定时时间设置

  33. uchar i,changeflag=0;
  34. uint num=0;
  35. uchar temp[7];

  37. /*******向DS1302读入一字节数据*********/
  38. uchar DS1302Read(uchar add)  
  39. {   uchar a, d=0;  
  40.     TCE = 0;  
  41.     TCLK = 0;  
  42.     TCE=1;  
  43.     for(a=0; a<8; a++)   //发送控制字节  
  44.     {  
  45.         TCLK=0;  
  46.         TIO= add & 0x01;  
  47.         TCLK=1;//制造上升沿  
  48.         add>>=1;  
  49.     }  
  50.     for(a=0; a<8; a++)   //读1字节数据  
  51.     {  
  52.         TCLK=1;  
  53.         d >>= 1;//右移1位  
  54.         TCLK=0;//制造下降沿  
  55.         if(TIO) {//如果读到1  
  56.             d |= 0x80;//把最高位置1  
  57.         }  
  58.     }  
  59.     TCE=0;              //拉低TCE  
  60.     return dec(d);        //读取的数据转换成十进制  
  61.   //return d;  
  62. }
  63. /*******向DS1302写入一字节数据*********/  
  64. void DS1302Write(uchar add,uchar d)  
  65. {  
  66.     uchar i;  
  67.     d = hex(d);   //转换为BCD码  
  68.     TCE=0;      //拉低TCE引脚，终止数据传输  
  69.     TCLK=0;     //拉低TCLK引脚，清零时钟线  
  70.     TCE=1;      //拉高TCE引脚，所有数据传输都要拉高TCE脚，启动控制逻辑  
  71.     //先写入控制字节  
  72.     for(i=0; i<8; i++)  
  73.     {  
  74.         TIO= add & 0x01;    //TIO引脚准备好要写入的1位数据  
  75.         TCLK=1;             //TCLK上升沿，1位数据从TIO脚写入，低位先写入  
  76.         add>>=1;          //数据右移1位  
  77.         TCLK=0;             //拉低TCLK，为下次写入准备，循环8次写入1字节  
  78.     }  
  79.     //再写入数据字节  
  80.     for(i=0; i<8; i++)  
  81.     {  
  82.         TIO= d & 0x01;  
  83.         TCLK=1;  
  84.         d>>=1;  
  85.         TCLK=0;  
  86.     }  
  87.     TCE=0;      //数据传输完拉低TCE  
  88. }

  90. void DS1302Init()
  91. {
  92.         uchar i;
  93.         DS1302Write(0x8e,0x00);//关闭写保护
  94.         for(i=0;i<7;i++)
  95.                 DS1302Write(write_addr[i],time[i]);
  96.         DS1302Write(0x8e,0x80);
  97. }
  98. void DS1302ReadTime()
  99. {
  100.         udata[0] = temp[2]/10;
  101.         udata[1] = temp[2]%10;
  102.         udata[2] = 16;         
  103.         udata[3] = temp[1]/10;
  104.         udata[4] = temp[1]%10;
  105.         udata[5] = 16;
  106.         udata[6] = temp[0]/10;
  107.         udata[7] = temp[0]%10;

  109. }
  110. void  DS1302ReadTimeyear()
  111. {
  112.         udata[0] = 2;
  113.         udata[1] = 0;
  114.         udata[2] = temp[6]/10;
  115.         udata[3] = temp[6]%10;
  116.        
  117.         udata[4] = temp[4]/10;
  118.         udata[5] = temp[4]%10;
  119.        
  120.         udata[6] = temp[3]/10;
  121.         udata[7] = temp[3]%10;
  122. }

  124. void Init_Timer0(void)
  125. {
  126.         TMOD |= 0x01;          //使用模式1，16位定时器，使用"|"符号可以在使用多个定时器时不受影响                     
  127.         TH0=(65536-1000)/256;              //给定初值
  128.         TL0=(65536-1000)/256;
  129.         EA=1;            //总中断打开
  130.         ET0=1;           //定时器中断打开
  131.         TR0=1;           //定时器开关打开
  132. }

  134. void main()
  135. {
  136.         Init_Timer0();
  137.         DS1302Init();

  139.         while(1)
  140.         {         
  141.                 uchar i;
  142.                 for(i=0;i<7;i++)
  143.                         temp[i] = DS1302Read(read_addr[i]);
  144.                 if(!changeflag)
  145.                         DS1302ReadTime() ;
  146.                 else
  147.                         DS1302ReadTimeyear();
  148.                
  149.                 if(temp[0] == settime[0] && temp[1] == settime[1] && temp[2] == settime[2])
  150.                 {
  151.                           P1 &= 0xf;
  152.                           
  153.                 }
  154.         }
  155. }
  156. void Timer0_isr(void) interrupt 1
  157. {
  158.         static uchar i;
  159.         TH0=(65536-1000)/256;              //给定初值
  160.         TL0=(65536-1000)/256;
  161.         P0=0xff;
  162.         duan =1;
  163.         P0=table[udata[i]];
  164.         duan = 0;
  165.         P0=0xff;
  166.         wei = 1;
  167.         P0 = position[i];
  168.         wei =0;
  169.         i++;
  170.         num++;
  171.         if(num > 30000)
  172.         {
  173.                 num=0;
  174.                 changeflag = ~changeflag ;
  175.         }       
  176.         if(i == 8)
  177.                 i=0;
  178. }
复制代码

所有资料51hei提供下载:
DS1302.zip (32.12 KB, 下载次数: 55)

评分

参与人数 1黑币 +50 收起 理由
admin + 50 共享资料的黑币奖励！

查看全部评分

回复

使用道具 举报

ID:468209 发表于 2019-12-16 10:14 来自手机 | 显示全部楼层
非常感谢
回复

使用道具 举报

ID:607143 发表于 2020-3-28 20:32 | 显示全部楼层
非常感谢
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表