標題: 我的單片機花樣走馬燈課程設計 簡單哦！ [打印本頁]
作者: Coolguyisme    時間: 2017-4-12 18:55
標題: 我的單片機花樣走馬燈課程設計 簡單哦！
我的單片機花樣走馬燈課程設計 簡單哦！
都是自己設計的
在附件中有程序仿真圖和程序
不過其中的那個減速和加速功能還沒有完善
希望有朋友們可以一起討論！

程序如下
  1. #include<reg51.h>
  2. #include<intrins.h>
  3. #define uchar unsigned char
  4. #define uint unsigned int
  5. sbit k1=P3^5;
  6. sbit k2=P3^6;
  7. sbit k3=P3^7;
  8. uchar code number1[]={0xf9,0xa4,0xb0};
  9. uchar code number2[]={0x01,0x03,0x07,0x0f,0x1f,0x3f,0x7f,0xff,
  10.                       0x7f,0x3f,0x1f,0x0f,0x07,0x03,0x01,0x00};
  11. uchar code number3[]={0x80,0xc0,0xe0,0xf0,0xf8,0xfc,0xfe,0xff,
  12.                       0xfe,0xfc,0xf8,0xf0,0xe0,0xc0,0x80,0x00};


  15. void delay(uchar del)
  16. {
  17. uint i,j;
  18. for(i=0;i<del;i++)
  19. for(j=0;j<1827;j++)
  20. ;
  21. }

  23. void main()
  24. {
  25. IT0=1;
  26. EX0=1;
  27. EA=1;

  29. }

  31. void into () interrupt 0
  32. {
  33. uint i,j;
  34. uchar a,b;
  35. EX0=1;

  37. if(k1==0)
  38. {
  39. while(1)
  40. {
  41. a=0xfe;
  42. P2=number1[0];
  43. for(i=0;i<8;i++)
  44. {
  45. if(k2==0||k3==0)
  46. goto kk;
  47. P1=a;
  48. a=_crol_(a,1);
  49. delay(10);
  50. }
  51. P1=0xff;
  52. for(i=0;i<8;i++)
  53. {
  54. if(k2==0||k3==0)
  55. goto kk;
  56. P0=a;
  57. delay(10);
  58. a=_crol_(a,1);
  59. }
  60. P0=0xff;                                                         //模式一
  61. a=0xbf;
  62. for(i=0;i<7;i++)
  63. {
  64. if(k2==0||k3==0)
  65. goto kk;
  66. P0=a;
  67. a=_cror_(a,1);
  68. delay(10);
  69. }
  70. P0=0xff;
  71. a=0x7f;
  72. for(i=0;i<7;i++)
  73. {
  74. if(k2==0||k3==0)
  75. goto kk;
  76. P1=a;
  77. delay(10);
  78. a=_cror_(a,1);
  79. }
  80. P1=0xff;

  82. P0=0x00;
  83. P1=0x00;
  84. delay(10);
  85. P0=0xff;
  86. P1=0xff;

  88. }
  89. }
  90. if(k2==0)
  91. {
  92. while(1)
  93. {
  94. a=0xfe;
  95. b=0x7f;
  96. P2=number1[1];
  97. for(i=0;i<7;i++)
  98. {
  99. if(k1==0||k3==0)
  100. goto kk;
  101. P1=a;
  102. P0=b;
  103. delay(10);
  104. a=_crol_(a,1);
  105. b=_cror_(b,1);
  106. }                                                           //模式二

  108. P1=0x7f;
  109. P0=0xfe;
  110. for(j=0;j<7;j++)
  111. {
  112. if(k1==0||k3==0)
  113. goto kk;
  114. P1=a;
  115. P0=b;
  116. delay(10);
  117. a=_cror_(a,1);
  118. b=_crol_(b,1);
  119. }                                                           //模式二
  120. P1=0xff;
  121. P0=0xff;
  122. }
  123. }

  125. if(k3==0)
  126. {
  127. while(1)
  128. {
  129. P2=number1[2];
  130. P1=0x00;
  131. P0=0x00;
  132. delay(10);
  133. for(i=0;i<16;i++)
  134. {
  135. if(k1==0||k2==0)
  136. goto kk;
  137. P1=number2[i];
  138. P0=number3[i];
  139. delay(10);
  140. }
  141. P1=0xff;

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

下載：
實訓任務一 花樣走馬燈.zip (75.01 KB, 下載次數: 14)
花樣走馬燈 - ISIS Professional 2017_4_12 18_49_24.zip (12.62 MB, 下載次數: 16)

作者: 晨澤    時間: 2017-4-12 21:27
您好，您有時間做單片機兼職嗎？如果有興趣加我，我這里長期需要編程兼職
作者: Coolguyisme    時間: 2017-4-12 21:48
晨澤 發(fā)表于 2017-4-12 21:27
您好，您有時間做單片機兼職嗎？如果有興趣加我QQ，我這里長期需要編程兼職

這個就不用了 謝謝 這只是我的業(yè)余愛好而已 我也有工作 謝謝



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