久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 4605|回復: 4
收起左側

VB上位機程序控制單片機DS1302時鐘的proteus仿真代碼

[復制鏈接]
ID:556863 發表于 2020-11-18 11:40 | 顯示全部樓層 |閱讀模式
51hei.png

VB上位機程序控制DS1302時鐘的proteus仿真.JPG

單片機源程序如下:

  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.png
全部資料51hei下載地址：
VB上位機程序控制DS1302時鐘的proteus仿真.zip (727.07 KB, 下載次數: 67)
回復

使用道具 舉報

ID:328014 發表于 2020-11-29 03:19 | 顯示全部樓層
好資料，51黑有你更精彩!!!
回復

使用道具 舉報

ID:160725 發表于 2021-11-4 20:36 | 顯示全部樓層
資料，51黑有你更精彩!!!
回復

使用道具 舉報

ID:278457 發表于 2021-12-16 05:15 | 顯示全部樓層
資料，51黑有你更精彩!!!
回復

使用道具 舉報

ID:1030689 發表于 2022-6-14 23:04 | 顯示全部樓層
51黑有你更精彩
回復

使用道具 舉報

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

本版積分規則

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

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板： 黄网站色大毛片 | 日韩中文av在线 | 国产欧美在线一区二区 | 国产午夜高清 | 精品日韩 | 国产亚洲精品91 | 日本人和亚洲人zjzjhd | 国产一区亚洲二区三区 | h在线免费观看 | 九热在线 | 在线免费看毛片 | 欧美成人精品一区 | 黑人巨大精品欧美一区二区免费 | 国产乱xxav | 亚洲一区二区中文字幕 | 国产成人精品在线 | 成人h视频 | 久久精品成人热国产成 | 欧美亚洲国产日韩 | 精品久久久久一区 | 天天操夜夜操 | 欧美精品91爱爱 | 国产精品激情 | 国产精品日韩一区 | 国产精品一卡二卡三卡 | 97人人澡人人爽91综合色 | 国产美女精品 | 中文字幕视频在线 | 欧美在线a | 精精国产xxxx视频在线播放7 | 亚洲天堂av在线 | 亚洲一一在线 | 日韩一区二区三区在线视频 | 久久久久久久网 | 国产精品一区二区三区久久久 | 亚洲 精品 综合 精品 自拍 | av电影手机在线看 | 97精品国产97久久久久久免费 | 国产成人在线播放 | 精品视频在线一区 | 亚洲在线一区二区 |