0
收藏
微博
微信
复制链接

单片机LED模拟交通灯Proteus仿真代码

提问于
2024-12-15 07:28

仿真原理图如下(proteus仿真工程文件可到本帖附件中下载)
屏幕截图 2022-04-28 150105.jpg

单片机源程序如下:

  1. #include
  2. #define uchar unsigned char
  3. #define uint unsigned int

  4. sbit RED_A=P0^0;
  5. sbit YELLOW_A=P0^1;
  6. sbit GREEN_A=P0^2;
  7. sbit RED_B=P0^3;
  8. sbit YELLOW_B=P0^4;
  9. sbit GREEN_B=P0^5;

  10. uchar Flash_Count = 0;
  11. Operation_Type = 1;

  12. void DelayMS(uint x)
  13. {
  14.         uchar t;
  15.         while(x--)
  16.         {
  17.                  for(t=120;t>0;t--);
  18.         }
  19. }

  20. void Traffic_lignt()
  21. {
  22.         switch(Operation_Type)
  23.         {
  24.                  case 1:
  25.                         RED_A=1;YELLOW_A=1;GREEN_A=0;
  26.                         RED_B=0;YELLOW_B=1;GREEN_B=1;
  27.                         DelayMS(2000);
  28.                         Operation_Type = 2;
  29.                         break;
  30.                 case 2:
  31.                         DelayMS(200);
  32.                         YELLOW_A=~YELLOW_A;
  33.                         if(++Flash_Count !=10)
  34.                                 return;
  35.                         Flash_Count=0;
  36.                         Operation_Type = 3;
  37.                         break;
  38.                 case 3:
  39.                         RED_A=0;YELLOW_A=1;GREEN_A=1;
  40.                         RED_B=1;YELLOW_B=1;GREEN_B=0;
  41.                         DelayMS(2000);
  42.                         Operation_Type = 4;
  43.                         break;      
  44.                 case 4:
  45.                         DelayMS(200);
  46.                         YELLOW_B=~YELLOW_B;
  47.                         if(++Flash_Count !=10)
  48.                                 return;
  49.                         Flash_Count=0;
  50.                         Operation_Type = 1;
  51.                         break;      
  52.         }
  53. }

  54. void main()
  55. {
  56.         while(1)
  57.         {
  58.                  Traffic_lignt();      
  59.         }
  60. }
复制代码

Keil代码与Proteus仿真下载: LED模拟交通灯.7z (44.43 KB, 下载次数: 23)
2022-4-28 16:46 上传
点击文件名下载附件

收藏 24 0 0