【proteus练一练2.8】LED模拟交通灯

ti

/*  名称：LED模拟交通灯
  说明：东西向绿灯亮若干秒，黄
灯闪烁 5 次后红灯亮，红灯亮后，南
北向由红灯变为绿灯，若干秒后南北
向黄灯闪烁 5 此后变红灯，东西向变
绿灯，如此重复。
*/
#include
#define uchar unsigned char
#define uint unsigned int
***it RED_A=P0^0; //东西向灯
***it YELLOW_A=P0^1;
***it GREEN_A=P0^2;
***it RED_B=P0^3; //南北向灯
***it YELLOW_B=P0^4;
***it GREEN_B=P0^5;
uchar Flash_Count=0,Operation_Type=1; //闪烁次数，操作类型变量
//交通灯切换
void Traffic_Light()
{
switch(Operation_Type)
{
  case 1: //东西向绿灯与南北向红灯亮
RED_A=1;YELLOW_A=1;GREEN_A=0;
RED_B=0;YELLOW_B=1;GREEN_B=1;
DelayMS(2000);
Operation_Type=2;
break;
  case 2: //东西向黄灯闪烁，绿灯关闭
DelayMS(300);
YELLOW_A=~YELLOW_A;GREEN_A=1;
if(++Flash_Count!=10) return; //闪烁5次
Flash_Count=0;
Operation_Type=3;
break;
  case 3: //东西向红灯，南北向绿灯亮
RED_A=0;YELLOW_A=1;GREEN_A=1;
RED_B=1;YELLOW_B=1;GREEN_B=0;
DelayMS(2000);
Operation_Type=4;
break;
  case 4: //南北向黄灯闪烁 5 次
DelayMS(300);
YELLOW_B=~YELLOW_B;GREEN_B=1;
if(++Flash_Count!=10) return;
Flash_Count=0;
Operation_Type=1;
}
}
//主程序
void main()
{
while(1) Traffic_Light();
}
proteus 仿真图：

游客
，如果您要查看本帖隐藏内容请回复

Mi咚 · 2013-11-13 21:32:47

{:7:}{:7:}{:7:}{:7:}{:7:}{:7:}{:7:}{:7:}{:7:}{:7:}{:7:}{:7:}

李松泽 · 2013-12-3 13:13:34

非常感谢，挺好的。。

刘波 · 2013-12-4 11:12:24

谢谢分享好好学习

挖沟 · 2013-12-4 13:01:27

论坛有你更精彩

·__久伴 · 2013-12-11 08:48:46

看看...............................................................

你猜 · 2013-12-11 10:50:10

来看看来看看来看看

林三爷 · 2013-12-11 11:11:36

楼主好牛逼。。。。。

jskj2014 · 2013-12-11 13:58:41

kkkkkkkkkkkkkkkklllll

子不语123 · 2013-12-11 19:23:33

赞个真好啊。是你自己写的吗

ｄéｌéτé · 2013-12-12 12:01:18

楼主你好求原理图

h1654155755.2434 · 2013-12-12 19:06:06

谢谢大家分享

Jun--生 · 2013-12-13 21:11:21

学习一个看看看

靳纯照 · 2013-12-14 13:51:11

自己弄有一个学习的过程~~~，更有益

zzz19941994 · 2013-12-16 17:41:47

试试看能不能用

1653469526.372400 · 2013-12-16 21:14:27

正需要，参考下

2013-12-21 10:22:54

good，，，，，，

冷—小君 · 2013-12-21 10:42:52

很不错喔很喜欢

菊次郎的夏天 · 2013-12-21 11:18:55

谢谢楼主的分享，万分感谢

Q大怪 · 2013-12-21 11:41:44

经典学习案例之一。。。。。。

Vanitatum_Aries · 2013-12-22 09:28:41

感谢楼主分享

搜索历史

【proteus练一练2.8】LED模拟交通灯

相关推荐

402 条评论

评论

精选推荐

浏览过的版块

站长推荐 /9