找回密碼
 立即注冊(cè)

QQ登錄

只需一步，快速開(kāi)始

帖子
查看: 3365|回復(fù): 2
收起左側(cè)

74HC138擴(kuò)展的96流水燈仿真及單片機(jī)程序

[復(fù)制鏈接]
ID:210588 發(fā)表于 2020-3-31 14:22 | 顯示全部樓層 |閱讀模式
51hei圖片20200331141958.png

單片機(jī)源程序如下:
  1. #define uint unsigned int
  2. #define uchar unsigned char

  4. void delay1(uchar y)
  5. {       
  6.     uchar i;
  7.         uint j;
  8.         for(i=0;i<y;i++)
  9.         {
  10.                 for(j=0;j<2000;j++);
  11.         }
  12. }
  13. void led(void)
  14. {

  16. P3=0x01; //01
  17. P2=0x00;       
  18. delay1(20);
  19. P2=0x01;
  20. delay1(20);
  21. P2=0x02;       
  22. delay1(20);
  23. P2=0x03;
  24. delay1(20);
  25. P2=0x04;       
  26. delay1(20);
  27. P2=0x05;
  28. delay1(20);
  29. P2=0x06;       
  30. delay1(20);
  31. P2=0x07;
  32. delay1(20);

  34. P3=0x02;//10
  35. P2=0x00;       
  36. delay1(20);
  37. P2=0x01;
  38. delay1(20);
  39. P2=0x02;       
  40. delay1(20);
  41. P2=0x03;
  42. delay1(20);
  43. P2=0x04;       
  44. delay1(20);
  45. P2=0x05;
  46. delay1(20);
  47. P2=0x06;       
  48. delay1(20);
  49. P2=0x07;
  50. delay1(20);

  52. P3=0x04;//100
  53. P2=0x00;       
  54. delay1(20);
  55. P2=0x01;
  56. delay1(20);
  57. P2=0x02;       
  58. delay1(20);
  59. P2=0x03;
  60. delay1(20);
  61. P2=0x04;       
  62. delay1(20);
  63. P2=0x05;
  64. delay1(20);
  65. P2=0x06;       
  66. delay1(20);
  67. P2=0x07;
  68. delay1(20);

  70. P3=0x08;//1000
  71. P2=0x00;       
  72. delay1(20);
  73. P2=0x01;
  74. delay1(20);
  75. P2=0x02;       
  76. delay1(20);
  77. P2=0x03;
  78. delay1(20);
  79. P2=0x04;       
  80. delay1(20);
  81. P2=0x05;
  82. delay1(20);
  83. P2=0x06;       
  84. delay1(20);
  85. P2=0x07;
  86. delay1(20);

  88. P3=0x10; //10000
  89. P2=0x00;       
  90. delay1(20);
  91. P2=0x01;
  92. delay1(20);
  93. P2=0x02;       
  94. delay1(20);
  95. P2=0x03;
  96. delay1(20);
  97. P2=0x04;       
  98. delay1(20);
  99. P2=0x05;
  100. delay1(20);
  101. P2=0x06;       
  102. delay1(20);
  103. P2=0x07;
  104. delay1(20);

  106. P3=0x20;//100000
  107. P2=0x00;       
  108. delay1(20);
  109. P2=0x01;
  110. delay1(20);
  111. P2=0x02;       
  112. delay1(20);
  113. P2=0x03;
  114. delay1(20);
  115. P2=0x04;       
  116. delay1(20);
  117. P2=0x05;
  118. delay1(20);
  119. P2=0x06;       
  120. delay1(20);
  121. P2=0x07;
  122. delay1(20);

  124. P3=0x40;//1000000
  125. P2=0x00;       
  126. delay1(20);
  127. P2=0x01;
  128. delay1(20);
  129. P2=0x02;       
  130. delay1(20);
  131. P2=0x03;
  132. delay1(20);
  133. P2=0x04;       
  134. delay1(20);
  135. P2=0x05;
  136. delay1(20);
  137. P2=0x06;       
  138. delay1(20);
  139. P2=0x07;
  140. delay1(20);

  142. P3=0x80;//10000000
  143. P2=0x00;       
  144. delay1(20);
  145. P2=0x01;
  146. delay1(20);
  147. P2=0x02;       
  148. delay1(20);
  149. P2=0x03;
  150. delay1(20);
  151. P2=0x04;       
  152. delay1(20);
  153. P2=0x05;
  154. delay1(20);
  155. P2=0x06;       
  156. delay1(20);
  157. P2=0x07;
  158. delay1(20);
  159. P3=0x00;

  161. P1=0x01;//P1口01
  162. P2=0x00;       
  163. delay1(20);
  164. P2=0x01;
  165. delay1(20);
  166. P2=0x02;       
  167. delay1(20);
  168. P2=0x03;
  169. delay1(20);
  170. P2=0x04;       
  171. delay1(20);
  172. P2=0x05;
  173. delay1(20);
  174. P2=0x06;       
  175. delay1(20);
  176. P2=0x07;
  177. delay1(20);

  179. P1=0x02;//P1口10
  180. P2=0x00;       
  181. delay1(20);
  182. P2=0x01;
  183. delay1(20);
  184. P2=0x02;       
  185. delay1(20);
  186. P2=0x03;
  187. delay1(20);
  188. P2=0x04;       
  189. delay1(20);
  190. P2=0x05;
  191. delay1(20);
  192. P2=0x06;       
  193. delay1(20);
  194. P2=0x07;
  195. delay1(20);

  197. P1=0x04;//P1口100
  198. P2=0x00;       
  199. delay1(20);
  200. P2=0x01;
  201. delay1(20);
  202. P2=0x02;       
  203. delay1(20);
  204. P2=0x03;
  205. delay1(20);
  206. P2=0x04;       
  207. delay1(20);
  208. P2=0x05;
  209. ……………………

  211. …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼

所有資料51hei提供下載:
74HC138擴(kuò)展的96流水燈仿真及程序.rar (104.61 KB, 下載次數(shù): 34)

評(píng)分

參與人數(shù) 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎(jiǎng)勵(lì)！

查看全部評(píng)分

回復(fù)

使用道具 舉報(bào)

ID:695749 發(fā)表于 2020-3-31 15:40 | 顯示全部樓層
這個(gè)思路很好，還可以有很多變化，達(dá)到想要顯示和控制的形式。謝謝分享!
回復(fù)

使用道具 舉報(bào)

ID:1133433 發(fā)表于 2024-11-3 20:58 | 顯示全部樓層
程序沒(méi)有完善，希望補(bǔ)齊
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

Powered by 單片機(jī)教程網(wǎng)

快速回復(fù) 返回頂部 返回列表