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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 单片机+DS1302写入年月日程序与Proteus仿真
返回列表 发新帖
查看: 1356|回复: 0
打印 上一主题 下一主题
收起左侧

单片机+DS1302写入年月日程序与Proteus仿真

[复制链接]
跳转到指定楼层
楼主
ID:1030423 发表于 2022-5-28 15:06 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式
萌新程序，大佬门见谅。
仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序如下:
  1. #include<reg51.h>
  2. #include<intrins.h>
  3. #define uint unsigned int
  4. #define uchar unsigned char
  5. sbit rs=P1^0;
  6. sbit rw=P1^1;
  7. sbit e=P1^2;
  8. sbit RST=P1^6;
  9. sbit SCK=P1^4;
  10. sbit IO=P1^5;
  11. uint m,f,h,t,a;
  12. uchar shu1[8]={6,5,4,3,2,7,1};
  13. uchar shu2[8];
  14. void delay_LCD(uint z)
  15. {
  16. uint x,y;
  17. for(x=z;x>0;x--)
  18. for(y=110;y>0;y--);
  19. }

  21. void com(uchar com)
  22. {
  23. rs=0;
  24. e=0;
  25. rw=0;
  26. P0=com;
  27. delay_LCD(1);
  28. e=1;
  29. delay_LCD(1);
  30. e=0;
  31. }
  32. void shu(uchar shu)
  33. {
  34. rs=1;
  35. e=0;
  36. rw=0;
  37. P0=shu;
  38. delay_LCD(1);
  39. e=1;
  40. delay_LCD(1);
  41. e=0;
  42. }
  43. void chu( )       
  44. {
  45. com(0x38);
  46. com(0x0c);
  47. com(0x01);
  48. com(0x06);
  49. }
  50. ds1302_read(uchar add)
  51. {
  52. uint i,m1,m;
  53. RST=0;   _nop_();
  54. SCK=0;   _nop_();
  55. RST=1;
  56. for(i=0;i<8;i++)
  57. {
  58. IO=add&0x01;
  59. add=add>>1;
  60. SCK=1;_nop_();
  61. SCK=0;_nop_();
  62. }
  63. for(i=0;i<8;i++)
  64. {
  65. m1=IO;
  66. m=(m>>1)|(m1<<7);
  67. SCK=1;_nop_();
  68. SCK=0;_nop_();
  69. }
  70. RST=0;_nop_();
  71. SCK=1;
  72. _nop_();IO = 0;
  73. _nop_();IO = 1;
  74. _nop_();
  75. return m;
  76. }
  77. void ds1302_write(uchar add,uchar m)
  78. {
  79. uchar i;
  80. RST=0;
  81. _nop_();
  82. SCK=0;
  83. _nop_();
  84. RST=1;
  85. for(i=0;i<8;i++)
  86. {
  87. IO=add&0x01;
  88. add=add>>1;
  89. SCK=1;
  90. _nop_();
  91. SCK=0;
  92. _nop_();
  93. }
  94. for(i=0;i<8;i++)
  95. {
  96. IO=m&0x01;
  97. m=m>>1;
  98. SCK=1;
  99. _nop_();
  100. SCK=0;
  101. _nop_();
  102. }
  103. RST=0;
  104. _nop_();
  105. }

  107. read_ds1302()
  108. {       
  109. uchar i;
  110. shu1[6]=ds1302_read(0x81)&0x7f;
  111. shu1[5]=ds1302_read(0x83);
  112. shu1[4]=ds1302_read(0x85);
  113. shu1[3]=ds1302_read(0x87);
  114. shu1[2]=ds1302_read(0x89);
  115. shu1[7]=ds1302_read(0x8b);
  116. shu1[1]=ds1302_read(0x8d);
  117. for(i=1;i<8;i++)
  118. {
  119. shu2[i]=(shu1[i]>>4)*10+(shu1[i]&0x0f);
  120. }
  121. }
  122. void ds1302_init()
  123. {
  124. RST=0;
  125. SCK=0;
  126. ds1302_write(0x8e,0x00);
  127. ds1302_write(0x80,0x14);
  128. ds1302_write(0x82,0x13);
  129. ds1302_write(0x84,0x12);
  130. ds1302_write(0x8a,0x04);
  131. ds1302_write(0x86,0x22);
  132. ds1302_write(0x88,0x02);
  133. ds1302_write(0x8c,0x22);
  134. ds1302_write(0x8e,0x80);
  135. }
  136. //lcd_riqi(uchar ddd1,uchar dat1)
  137. //{
  138. //uchar gw,sw;
  139. //gw=dat1%10;
  140. //sw=dat1/10;
  141. //com(0x80+ddd1);
  142. //shu(0x30+sw);
  143. //shu(0x30+gw);
  144. //}
  145. //lcd_shijian(uchar ddd2,uchar dat2)
  146. //{
  147. //uchar gw,sw;
  148. //gw=dat2%10;
  149. //sw=dat2/10;
  150. //com(0x80+0x40+ddd2);
  151. //shu(0x30+sw);
  152. //shu(0x30+gw);
  153. //}
  154. //lcd_write(uchar *shuju)
  155. //{
  156. //lcd_riqi(0,shuju[0]);
  157. //lcd_riqi(2,shuju[1]);
  158. //lcd_riqi(5,shuju[2]);
  159. //lcd_riqi(8,shuju[3]);
  160. //lcd_shijian(0,shuju[4]);
  161. //lcd_shijian(3,shuju[5]) ;
  162. //lcd_shijian(6,shuju[6]);
  163. // }
  164. void main()
  165. {
  166. chu();
  167. ds1302_init();
  168. while(1)
  169. {
  170. read_ds1302();
  171. com(0x82);
  172. shu(shu2[1]/10+0x30);
  173. shu(shu2[0]%10+0x30);
  174. shu(shu2[1]/10+0x30);
  175. shu(shu2[1]%10+0x30);
  176. shu('-');
  177. shu(shu2[2]/10+0x30);
  178. shu(shu2[2]%10+0x30);
  179. shu('-');
  180. shu(shu2[3]/10+0x30);
  181. shu(shu2[3]%10+0x30);
  182. com(0xc2);
  183. shu(shu2[4]/10+0x30);
  184. shu(shu2[4]%10+0x30);
  185. shu(':');
  186. shu(shu2[5]/10+0x30);
  187. shu(shu2[5]%10+0x30);
  188. shu(':');
  189. shu(shu2[6]/10+0x30);
  190. shu(shu2[6]%10+0x30);
  191. }
  192. }
复制代码

Keil代码与Proteus8.8仿真下载:
写入年月日.zip (71.92 KB, 下载次数: 17)


评分

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

查看全部评分

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享淘帖 顶顶 踩踩
回复

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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