标题: 51单片机的流水灯 自中间至两边 自两边至中间 [打印本页]

作者: 末世子安    时间: 2017-1-6 10:57
标题: 51单片机的流水灯 自中间至两边 自两边至中间
新人做的流水灯,分享一下

  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






欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1