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

QQ登錄

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

搜索
查看: 3953|回復(fù): 2
打印 上一主題 下一主題
收起左側(cè)

我的單片機(jī)花樣走馬燈課程設(shè)計(jì) 簡(jiǎn)單哦！

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
樓主
我的單片機(jī)花樣走馬燈課程設(shè)計(jì) 簡(jiǎn)單哦！
都是自己設(shè)計(jì)的
在附件中有程序仿真圖和程序
不過(guò)其中的那個(gè)減速和加速功能還沒(méi)有完善
希望有朋友們可以一起討論！

程序如下
  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. …………限于本文篇幅 余下代碼請(qǐng)從51黑下載附件…………
復(fù)制代碼

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

分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏1 分享淘帖 頂頂 踩踩

相關(guān)帖子
回復(fù)

使用道具 舉報(bào)

沙發(fā)
ID:188983 發(fā)表于 2017-4-12 21:27 | 只看該作者
您好，您有時(shí)間做單片機(jī)兼職嗎？如果有興趣加我，我這里長(zhǎng)期需要編程兼職
回復(fù)

使用道具 舉報(bào)

板凳
ID:188940 發(fā)表于 2017-4-12 21:48 | 只看該作者
晨澤 發(fā)表于 2017-4-12 21:27
您好，您有時(shí)間做單片機(jī)兼職嗎？如果有興趣加我QQ，我這里長(zhǎng)期需要編程兼職

這個(gè)就不用了 謝謝 這只是我的業(yè)余愛(ài)好而已 我也有工作 謝謝
回復(fù)

使用道具 舉報(bào)

本版積分規(guī)則

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

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

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