设为首页收藏本站
开启辅助访问 切换到宽版

 找回密码
 立即注册

QQ登录

只需一步，快速开始

热门： 51单片机 | 24小时必答区 | 单片机教程 | 单片机DIY制作 | STM32 | Cortex M3 | 模数电子 | 电子DIY制作 | 音响/功放 | 拆机乐园 | Arduino | 嵌入式OS | 程序设计

搜索
»论坛 › 嵌入式/单片机论坛 › 51单片机 › 单片机按键操纵魔幻流水灯源程序
返回列表 发新帖
查看: 1863|回复: 0
打印 上一主题 下一主题
收起左侧

单片机按键操纵魔幻流水灯源程序

[复制链接]
跳转到指定楼层
楼主
ID:251973 发表于 2017-11-21 17:25 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
这是我用keil通过按键来操作led灯程序不是很难，请大家多多指教

单片机源程序如下:
  1. #include< reg52.h>
  2. #include<intrins.h>
  3. typedef unsigned int c16;
  4. typedef unsigned char c8;
  5. sbit k1=P3^1;
  6. sbit k2=P3^0;
  7. #define led P2          
  8. void delay(c16 x);
  9. void keypros();
  10. void main()
  11. {
  12. keypros();
  13. }
  14. void keypros()
  15. { c8 i=0;
  16. delay(5000);
  17.          //led1=0xfe;       
  18. //        led=0xf7;
  19.                           while(1)
  20.                            {

  22. //#if 0  /*表示屏蔽下面的东西，不编译*/       
  23.                                    if (k1==0)
  24.                                      {
  25.                                       delay (1000);
  26.                                                                           if (k1==0)
  27.                                                                           { for(i=0;i<4;i++)
  28.                                                 {
  29.                                                   P2=~(0x08>>i);
  30. //    led=_crol_(0xe0,1);
  31.                                                     delay(5000)        ;          
  32.                                                  }
  33.                                         //while (!k1); //加了这个的话就保持上面程序所显示的最终状态；如果没加的话，就一直执行上面的程序，如果是静态的话，就显示静态；如果是动态的话，就呈动态显示。
  34.                                        }
  35.                                        if(k1==0)
  36.                                            {
  37.                                             for(i=4;i<8;i++)
  38.                                                 {
  39.                                                   P2=~(0x01<<i);
  40. //    led=_crol_(0xfe,1);
  41.                                                      delay(5000)        ;
  42.                                                 }
  43.                                                              //while (!k1);
  44.                                                                                      }
  45.                                                                             P2=0xff;
  46.    
  47.                                                                            }
  48. //#endif
  49. while (!k2)
  50.    {
  51.            delay (1000);
  52.    while (!k2)
  53.          { for(i=0;i<8;i++)
  54.             {
  55.             P2=~(0x7f>>i);
  56.    //led=_cror_(led,1);
  57.               delay(5000);   
  58.             }
  59.           }
  60.    if (k2==1)
  61.    {
  62.    for(i=0;i<8;i++)       
  63.        {
  64.              P2=(0xfe<<i);
  65.      //led=_crol_(led,1);
  66.              delay(5000);
  67.        }
  68.    }
  69.    }

  71. //if (k1==0)
  72. //{
  73. //delay (1000);
  74. //s=1;
  75. //}
  76. // while (s=1)
  77. //{
  78. //          
  79. //}
  80.                
  81.                                  }

  83.                                
  84. }


  87. #if 0
  88.   led=0x00;
  89.   delay(50000);           //加这个是为了能够突出全亮的效果
  90.           
  91.    led=0xff;
  92.    delay(50000);
  93.    
  94.    



  98.   while (!k1);

  100. else
  101. {
  102. P2=0xff;
  103. }
  104. //#elif 1        /*表示编译以下的程序*/
  105. if (k1==0)
  106. {
  107. delay (1000);
  108. if (k1==0)
  109. {
  110. for(i=0;i<8;i++)       
  111.    {
  112.    P2=(0xfe<<i);
  113.      //led=_crol_(led,1);
  114. ……………………

  116. …………限于本文篇幅 余下代码请从51黑下载附件…………
复制代码

所有资料51hei提供下载:
按键操纵魔幻灯流.zip (28 KB, 下载次数: 10)


分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 分享淘帖 顶顶 踩踩
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表