找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 10654|回复: 0
打印 上一主题 下一主题
收起左侧

51单片机的流水灯 自中间至两边 自两边至中间

[复制链接]
跳转到指定楼层
楼主
ID:160146 发表于 2017-1-6 10:57 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
新人做的流水灯,分享一下

  1. #include <reg52.h>
  2. #define uchar unsigned char
  3. #define uint unsigned int

  4. char tab1[]={0xFF,0xE7,0xDB,0xBD,0x7E};//自中间至两边
  5. char tab2[]={0x7E,0xBD,0xDB,0xE7,0xFF};//自两边至中间
  6. uchar i;
  7. sbit S1 = P1^0;
  8. sbit S2 = P1^1;

  9. void DelayMS(uint x)
  10. {
  11.         uchar i;
  12.         while(x--)
  13.         {
  14.                  for(i=120;i>0;i--);
  15.         }
  16. }

  17. void main()
  18. {
  19.         uchar a;
  20.         while(1)
  21.         {
  22.                 if(S1==0&&S2==0)
  23.                 {
  24.                         P0=0xfe;a=P0;DelayMS(400);
  25.                         for(i=8;i>0;i--){a=a<<1;a|=0x01;P0=a;DelayMS(400);}
  26.                 }
  27.                 else if(S1==1&&S2==1)
  28.                 {
  29.                         P0=0x7f;a=P0;DelayMS(400);
  30.                         for(i=8;i>0;i--){a=a>>1;a|=0x80;P0=a;DelayMS(400);}
  31.                 }
  32.                 else if(S1==0&&S2==1)
  33.                 {       
  34.                         for(i=0;i<5;i++){P0=tab1[i];DelayMS(400);}
  35.                 }       
  36.                 else if(S1==1&&S2==0)
  37.                 {       
  38.                         for(i=0;i<5;i++){P0=tab2[i];DelayMS(400);}
  39.                 }       
  40.         }
  41. }
复制代码


程序.rar

26.41 KB, 下载次数: 10, 下载积分: 黑币 -5

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

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

Powered by 单片机教程网

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