欧美极品高清xxxxhd,国产日产欧美最新,无码AV国产东京热AV无码,国产精品人与动性XXX,国产传媒亚洲综合一区二区,四库影院永久国产精品,毛片免费免费高清视频,福利所导航夜趣136

 找回密碼
 立即注冊

QQ登錄

只需一步,快速開始

搜索
查看: 2856|回復: 1
打印 上一主題 下一主題
收起左側

C51多開關控制LED霓虹流水形式 程序+仿真原理圖

[復制鏈接]
跳轉到指定樓層
樓主
用AT89C51實現各開關對應流水形式,按下一個開關實現一種,當同時按下兩個開關時停止工作。
Protues原理圖
新人初次發帖,各位壇友多多關照


源程序:
  1. #include<regx51.h>
  2. #include<intrins.h>
  3. void delay(unsigned int i)
  4. {
  5.         while(i--);
  6. }
  7. void move_l(unsigned char p)
  8. {
  9.         unsigned char i;
  10.         P1=p;
  11.         for(i=0;i<8;i++)
  12.         {
  13.                 delay(20000);
  14.                 P1=_crol_(P1,1);

  15.         }
  16. }

  17. void move_r(unsigned char p)
  18. {
  19.     unsigned char i;
  20.         P1=p;
  21.         for(i=0;i<8;i++)
  22.         {
  23.                  delay(20000);
  24.                  P1=_cror_(P1,1);
  25.         }
  26. }

  27. void move_to_m(unsigned char p)
  28. {
  29.         unsigned char i;
  30.         for(i=0;i<4;i++)
  31.         {
  32.                 P1=((p<<i)&0x0F)|(0xF0&(p>>i));
  33.                 delay(20000);
  34.         }
  35. }

  36. void move_from_m(unsigned char p)
  37. {
  38.         unsigned char i;
  39.         for(i=0;i<4;i++)
  40.         {
  41.                 P1=((p&0xF0)<<i)|((p&0x0F)>>i);
  42.                 delay(20000);
  43.         }
  44. }

  45. void main()
  46. {
  47.         unsigned char sw;
  48.         while(1)
  49.         {
  50.                 sw=P0&0x3f;
  51.                 switch(sw)
  52.                 {
  53.                         case 0x3e:move_l(0xfe);break;
  54.                         case 0x3d:move_r(0x7f);break;
  55.                         case 0x3b:move_l(0xfc);break;
  56.                         case 0x37:move_r(0x3f);break;
  57.                         case 0x2f:move_to_m(0x7e);break;
  58.                         case 0x1f:move_from_m(0xe7);break;
  59.                         default:P1=0xff;break;
  60.                 }
  61.         }
  62. }
復制代碼


多開關控制LED霓虹流水形式仿真工程文件及源程序下載:
開關霓虹燈.zip (49.77 KB, 下載次數: 16)

評分

參與人數 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵!

查看全部評分

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

使用道具 舉報

沙發
ID:1 發表于 2017-1-7 14:57 | 只看該作者
好資料,51黑有你更精彩!!!
回復

使用道具 舉報

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

本版積分規則

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

Powered by 單片機教程網

快速回復 返回頂部 返回列表