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

 找回密码
 立即注册

QQ登录

只需一步，快速开始

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

搜索
»论坛 › 嵌入式/单片机论坛 › 单片机仿真论坛 › VB上位机程序控制DS1302时钟的proteus仿真+单片机代码
返回列表 发新帖
查看: 2482|回复: 0
打印 上一主题 下一主题
收起左侧

VB上位机程序控制DS1302时钟的proteus仿真+单片机代码

[复制链接]
跳转到指定楼层
楼主
ID:319133 发表于 2019-1-22 17:59 | 只看该作者 |只看大图 回帖奖励 |倒序浏览 |阅读模式


仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源码:
  1. include <reg52.h>

  3. sbit T_CLK = P2^4; /*实时时钟时钟线引脚 */
  4. sbit T_IO = P2^3; /*实时时钟数据线引脚 */
  5. sbit T_RST = P2^2; /*实时时钟复位线引脚 */
  6. sbit ACC0=ACC^0;
  7. sbit ACC7=ACC^7;
  8. sbit rs=P2^0;
  9. sbit rw=P2^1;
  10. sbit e=P2^7;
  11. sbit setd=P3^2;
  12. sbit sett=P3^3;
  13. sbit add=P2^5;
  14. sbit enter=P2^6;
  15. sbit speaker=P3^7;
  16. unsigned char code tab[]={0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39};


  19. void v_RTInputByte(unsigned char ucDa)
  20. {
  21. unsigned char i;
  22. ACC = ucDa;
  23. for(i=8; i>0; i--)
  24. {
  25. T_IO = ACC0; /*相当于汇编中的 RRC */
  26. T_CLK = 1;
  27. T_CLK = 0;
  28. ACC = ACC >> 1;
  29. }
  30. }

  32. unsigned char uc_RTOutputByte(void)
  33. {
  34. unsigned char i;
  35. for(i=8; i>0; i--)
  36. {
  37. ACC = ACC >>1; /*相当于汇编中的 RRC */
  38. ACC7 = T_IO;
  39. T_CLK = 1;
  40. T_CLK = 0;
  41. }
  42. return(ACC);
  43. }

  45. void v_W1302(unsigned char ucAddr, unsigned char ucDa)
  46. {
  47. T_RST = 0;
  48. T_CLK = 0;
  49. T_RST = 1;
  50. v_RTInputByte(ucAddr); /* 地址，命令 */
  51. v_RTInputByte(ucDa); /* 写1Byte数据*/
  52. T_CLK = 1;
  53. T_RST =0;
  54. }

  56. unsigned char uc_R1302(unsigned char ucAddr)
  57. {
  58. unsigned char ucDa;
  59. T_RST = 0;
  60. T_CLK = 0;
  61. T_RST = 1;
  62. v_RTInputByte(ucAddr); /* 地址，命令 */
  63. ucDa = uc_RTOutputByte(); /* 读1Byte数据 */
  64. T_CLK = 1;
  65. T_RST =0;
  66. return(ucDa);
  67. }

  69. void v_BurstW1302T(unsigned char *pSecDa)
  70. {
  71. unsigned char i;
  72. v_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
  73. T_RST = 0;
  74. T_CLK = 0;
  75. T_RST = 1;
  76. v_RTInputByte(0xbe); /* 0xbe:时钟多字节写命令 */
  77. for (i=8;i>0;i--) /*8Byte = 7Byte 时钟数据 + 1Byte 控制*/
  78. {
  79. v_RTInputByte(*pSecDa);/* 写1Byte数据*/
  80. pSecDa++;
  81. }
  82. T_CLK = 1;
  83. T_RST =0;
  84. }

  86. void v_BurstR1302T(unsigned char *pSecDa)
  87. {
  88. unsigned char i;
  89. T_RST = 0;
  90. T_CLK = 0;
  91. T_RST = 1;
  92. v_RTInputByte(0xbf); /* 0xbf:时钟多字节读命令 */
  93. for (i=8; i>0; i--)
  94. {
  95. *pSecDa = uc_RTOutputByte(); /* 读1Byte数据 */
  96. pSecDa++;
  97. }
  98. T_CLK = 1;
  99. T_RST =0;
  100. }

  102. void v_BurstW1302R(unsigned char *pReDa)
  103. {
  104. unsigned char i;
  105. v_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
  106. T_RST = 0;
  107. T_CLK = 0;
  108. T_RST = 1;
  109. v_RTInputByte(0xfe); /* 0xbe:时钟多字节写命令 */
  110. for (i=31;i>0;i--) /*31Byte 寄存器数据 */
  111. {
  112. v_RTInputByte(*pReDa); /* 写1Byte数据*/
  113. pReDa++;
  114. }
  115. T_CLK = 1;
  116. T_RST =0;
  117. }

  119. void v_BurstR1302R(unsigned char *pReDa)
  120. {
  121. unsigned char i;
  122. T_RST = 0;
  123. T_CLK = 0;
  124. T_RST = 1;
  125. v_RTInputByte(0xff); /* 0xbf:时钟多字节读命令 */
  126. for (i=31; i>0; i--) /*31Byte 寄存器数据 */
  127. {
  128. *pReDa = uc_RTOutputByte(); /* 读1Byte数据 */
  129. pReDa++;
  130. }
  131. T_CLK = 1;
  132. T_RST =0;
  133. }

  135. void v_setd1302(unsigned char *pSecDa)
  136. {
  137. unsigned char i;
  138. unsigned char ucAddr = 0x80;
  139. v_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
  140. for(i =7;i>0;i--)
  141. {
  142. v_W1302(ucAddr,*pSecDa); /* 秒 分 时 日 月 星期 年 */

  144. pSecDa++;
  145. ucAddr +=2;
  146. }
  147. v_W1302(0x8e,0x80); /* 控制命令,WP=1,写保护?*/
  148. }


  151. void delay()
  152. { unsigned char y;
  153. for(y=0;y<0xff;y++)
  154. {;}
  155. }


  158. void wc51r(unsigned char j)//写命令
  159. {
  160. e=0;rs=0;rw=0;
  161. e=1;
  162. P1=j;
  163. e=0;
  164. delay();
  165. }

  167. void init()//初始化
  168. {
  169. wc51r(0x01);
  170. wc51r(0x38);
  171. wc51r(0x38);
  172. wc51r(0x0e);
  173. wc51r(0x06);
  174. wc51r(0x0c);
  175. }


  178. void wc51ddr(unsigned char j)//写数据
  179. {
  180. e=0;rs=1;rw=0;
  181. e=1;
  182. P1=j;
  183. e=0;
  184. delay();
  185. }

  187. void write1602(unsigned char add,unsigned char da)//写入显示数据
  188. {wc51r(add);wc51ddr(da);}



  192. void main(void)
  193. {
  194. unsigned char ucCurtime[7];
  195. unsigned char i,yearh,yearl,monh,monl,dah,dal,hoh,hol,mih,mil,seh,sel;
  196. unsigned char ucAddr;
  197. unsigned int c;

  199. init();
  200. write1602(0x85,0x35);
  201. for(c=0;c<30000;c++);
  202. write1602(0x86,0x32);
  203. for(c=0;c<30000;c++);
  204. write1602(0x87,0x4D);
  205. for(c=0;c<30000;c++);
  206. write1602(0x88,0x43);
  207. for(c=0;c<30000;c++);
  208. write1602(0x89,0x55);
  209. for(c=0;c<30000;c++);
  210. write1602(0xC2,0x51);
  211. write1602(0xC3,0x51);
  212. write1602(0xC4,0x3A);
  213. write1602(0xC5,0x35);
  214. write1602(0xC6,0x39);
  215. write1602(0xC7,0x37);
  216. write1602(0xC8,0x33);
  217. write1602(0xC9,0x38);
  218. write1602(0xCA,0x35);
  219. write1602(0xCB,0x33);
  220. write1602(0xCC,0x36);
  221. write1602(0xCD,0x39);
  222. for(c=0;c<50000;c++);
  223. init();//LCD初始化





  229. TMOD=0X20;
  230. TH1=0XF3;
  231. TL1=0XF3;
  232. SCON=0X50;
  233. PCON=0X00;
  234. IT0=1;
  235. EX0=1;
  236. IT1=1;
  237. EX1=1;
  238. TR1=1;
  239. EA=1;
  240. ES=1;
  241. while(1)
  242. {ucAddr = 0x81;
  243. for (i=0;i<7;i++)
  244. {
  245. ucCurtime[i] = uc_R1302(ucAddr);/*格式为: 秒 分 时 日 月 星期 年 */
  246. ucAddr += 2;
  247. }


  250. yearh=ucCurtime[6]/16;
  251. yearl=ucCurtime[6]%16;
  252. monh=ucCurtime[4]/16;
  253. monl=ucCurtime[4]%16;
  254. dah=ucCurtime[3]/16;
  255. dal=ucCurtime[3]%16;

  257. hoh=ucCurtime[2]/16;
  258. hol=ucCurtime[2]%16;
  259. mih=ucCurtime[1]/16;
  260. mil=ucCurtime[1]%16;
  261. seh=ucCurtime[0]/16;
  262. sel=ucCurtime[0]%16;



  266. write1602(0x80,0x44);
  267. write1602(0x81,0x61);
  268. write1602(0x82,0x74);
  269. write1602(0x83,0x65);
  270. write1602(0x84,0x3a);//显示date:

  272. write1602(0x85,tab[yearh]);
  273. write1602(0x86,tab[yearl]);
  274. write1602(0x87,0x2d);//显示年
  275. write1602(0x88,tab[monh]);
  276. write1602(0x89,tab[monl]);
  277. write1602(0x8a,0x2d);//显示月
  278. write1602(0x8b,tab[dah]);
  279. write1602(0x8c,tab[dal]);

  281. write1602(0xc0,0x54);
  282. write1602(0xc1,0x69);
  283. write1602(0xc2,0x6d);
  284. write1602(0xc3,0x65);
  285. write1602(0xc4,0x3a);//显示time:

  287. write1602(0xc5,tab[hoh]);
  288. write1602(0xc6,tab[hol]);
  289. write1602(0xc7,0x3a);//显示小时
  290. write1602(0xc8,tab[mih]);
  291. write1602(0xc9,tab[mil]);
  292. write1602(0xca,0x3a);//显示小时
  293. write1602(0xcb,tab[seh]);
  294. write1602(0xcc,tab[sel]);

  296. if((ucCurtime[1]==0)&(ucCurtime[0]==0|ucCurtime[0]==1|ucCurtime[0]==2))//3秒整点报时
  297.   speaker=0;
  298. else speaker=1;

  300. }
  301. }




  306. serint() interrupt 4
  307. { //EA=0;
  308.   static unsigned char k;
  309.   unsigned char temp,year,month,date,hour,min,sec,week;
  310.   unsigned char stemp[7]={0};
  311.   RI=1;
  312.   temp=SBUF;
  313.   RI=0;
  314.   k++;
  315.   switch (k)
  316.   { case 1:sec=temp;
  317.            break;
  318.         case 2:min=temp;
  319.                break;
  320.         case 3:hour=temp;
  321.                break;
  322.         case 4:date=temp;
  323.                break;
  324.         case 5:month=temp;
  325.                break;
  326.         case 6:week=temp;
  327.                break;
  328.         case 7:year=temp;
  329.                stemp[0]=(sec/10)*16+sec%10;
  330.                    stemp[1]=(min/10)*16+min%10;
  331.                    stemp[2]=(hour/10)*16+hour%10;
  332.                    stemp[3]=(date/10)*16+date%10;
  333.                    stemp[4]=(month/10)*16+month%10;
  334.                    stemp[5]=(week/10)*16+week%10;
  335.                    stemp[6]=(year/10)*16+year%10;
  336.            v_setd1302(stemp);//设定值
  337.                    k=0;
  338.                break;
  339.   }
  340. }
复制代码

全部资料51hei下载地址：
0007、VB上位机程序控制DS1302时钟的proteus仿真.rar (682.27 KB, 下载次数: 32)

评分

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

查看全部评分

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

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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