標題: 電子時鐘仿真與單片機編程 [打印本頁]
作者: zjzjzjz    時間: 2018-3-25 20:10
標題: 電子時鐘仿真與單片機編程
電子時鐘仿真原理圖如下（proteus仿真工程文件可到本帖附件中下載）




單片機源程序如下:
  1. //LED6CC_CLOCK
  2. #include <AT89X52.H>
  3. unsigned char code dispcode[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,
  4.                                                         0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71,0x00};
  5. unsigned char dispbitcode[]={0xfe,0xfd,0xfb,0xf7,0xef,0xdf};
  6. unsigned char dispbuf[6]={0,0,0,0,2,1};
  7. unsigned char dispbitcnt;
  8. unsigned char second;
  9. unsigned char minite;
  10. unsigned char hour;
  11. unsigned int tcnt;
  12. unsigned char mstcnt;
  13. unsigned char i,j;
  14. void delay()
  15. {
  16. unsigned char i,j;
  17. for(i=5;i>0;i--)
  18. for(j=248;j>0;j--);
  19. }

  21. void main(void)
  22. {
  23. TMOD=0x02;
  24. TH0=0x06;
  25. TL0=0x06;
  26. TR0=1;
  27. ET0=1;
  28. EA=1;
  29. hour=12;
  30. while(1)
  31. {
  32. if(P0_0==0)
  33. {
  34. delay();
  35. if(P0_0==0)
  36. {
  37. second++;
  38. if(second==60)
  39. {
  40. second=0;
  41. }
  42. dispbuf[0]=second%10;
  43. dispbuf[1]=second/10;
  44. while(P0_0==0);
  45. }
  46. }
  47. if(P0_1==0)
  48. {
  49. delay();
  50. if(P0_1==0)
  51. {
  52. minite++;
  53. if(minite==60)
  54. {
  55. minite=0;
  56. }
  57. dispbuf[2]=minite%10;
  58. dispbuf[3]=minite/10;
  59. while(P0_1==0);
  60. }
  61. }
  62. if(P0_2==0)
  63. {
  64. delay();
  65. if(P0_2==0)
  66. {
  67. hour++;
  68. if(hour==24)
  69. {
  70. hour=0;
  71. }
  72. dispbuf[4]=hour%10;
  73. dispbuf[5]=hour/10;
  74. while(P0_2==0);
  75. }
  76. }
  77. }
  78. }
  79. void t0(void) interrupt 1
  80. {

  82. mstcnt++;
  83. if(mstcnt==6)
  84. {
  85. mstcnt=0;

  87. P3=0xff; //關閉所有顯示
  88. P3=dispbitcode[dispbitcnt];//
  89. P1=dispcode[dispbuf[dispbitcnt]];//
  90. dispbitcnt++;
  91. if(dispbitcnt==6)
  92. {
  93. dispbitcnt=0;
  94. }
  95. }
  96. tcnt++;
  97. if(tcnt==4000)
  98. {
  99. tcnt=0;
  100. second++;
  101. if(second==60)
  102. {
  103. second=0;
  104. minite++;
  105. if(minite==60)
  106. {
  107. minite=0;
  108. ……………………

  110. …………限于本文篇幅 余下代碼請從51黑下載附件…………
復制代碼

所有資料51hei提供下載:
電子鐘.rar (40.12 KB, 下載次數(shù): 10)








歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1