标题: 单片机开关控制心型LED闪烁状态源程序与Proteus仿真 [打印本页]
作者: 洋洋ww    时间: 2022-6-2 14:42
标题: 单片机开关控制心型LED闪烁状态源程序与Proteus仿真
Proteus通过使用单片机C51控制流水灯的闪硕状态，语言简单

仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序如下:
  1. #include<reg51.h>
  2. #include<intrins.h>
  3. #define uchar unsigned char
  4. #define uint unsigned int
  5. sbit S1=P2^0;
  6. sbit S2=P2^1;
  7. sbit S3=P2^2;
  8. sbit S4=P2^3;
  9. uchar keyval;   //定义键值变量
  10. void key_scan();        //按键扫描函数声明
  11. void delayms(uint);       //延时函数声明
  12. void pattern1();
  13. void pattern2();
  14. void pattern3();
  15. void pattern4();

  17. void main(void)
  18. {
  19. keyval=0;
  20. while(1)
  21. {
  22.   key_scan();                         //调用按键扫描函数
  23.   switch(keyval)                  
  24.   {
  25.    case 1:pattern1();break; //按键1被按下时执行操作
  26.    case 2:pattern2();break; //按键2被按下时执行操作
  27.    case 3:pattern3();break; //按键3被按下时执行操作
  28.    case 4:pattern4();break; //按键4被按下时执行操作
  29.   }
  30. }
  31. }
  32. void key_scan(void)       //按键扫描函数定义
  33. {
  34. P2=0xff;
  35. if((P2&0x0f)!=0x0f)
  36. {
  37.   delayms(100);    //按键消抖
  38.   if(S1==0)
  39.   keyval=1;
  40.   if(S2==0)
  41.   keyval=2;
  42.   if(S3==0)
  43.   keyval=3;
  44.   if(S4==0)
  45.   keyval=4;
  46. }
  47. }
  48. void delayms(uint j)
  49. {
  50.         uchar i;
  51.         for(;j>0;j--)
  52.         {
  53.                 i=250;
  54.                 while(--i);
  55.                 i=249;
  56.                 while(--i);
  57.         }
  58. }


  61. void pattern1()
  62. {
  63.   uchar i;
  64.         P0=0x7f;
  65.         P1=0xfe;
  66.         for(i=0;i<8;i++)
  67.         {delayms(200);
  68.          P0=_cror_(P0,1);
  69.          P1=_crol_(P1,1);
  70.   }
  71. }

  73. void pattern2()
  74. {
  75.   uchar i,temp;
  76.         temp=0xfe;
  77.         for(i=0;i<8;i++)
  78.         {delayms(200);
  79.          P0=P1=temp;
  80.          temp=temp<<1;
  81.   }
  82. }

  84. void pattern3()
  85. {
  86.     P0=P1=0xff;
  87.           delayms(200);
  88.           P0=P1=0x00;
  89.           delayms(200);
  90. }


  93. void pattern4()
  94. {
  95.   uchar i;
  96.         P0=0x7f;
  97.         for(i=0;i<8;i++)
  98.         {delayms(200);
  99.          P0=_cror_(P0,1);
  100.   }        
  101.         P0=0xff;
  102.         P1=0xfe;
  103.         for(i=0;i<8;i++)
  104.         {delayms(200);
  105.          P1=_crol_(P1,1);
  106.   }
  107.         P1=0xff;
  108. }
复制代码
本人初学,仅供参考,存在错误和不足之处,请大家回帖多多指教,切勿照搬,文件下载:
以上的Keil5代码工程文件和Proteus仿真8.13下载:
以上代码下载.7z (60.43 KB, 下载次数: 17)
作者: qsddxu    时间: 2022-6-8 16:56
刚试用了  发现要切换不同的闪烁只能在刚接通电源时才能，中途按下其他键没有反应，
作者: 164908060    时间: 2023-1-29 16:13
我的也是这样的效果 只有复位后按按键可以切换 之后就切换不了



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