【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 仿真图：

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

A随风 · 2014-11-11 21:12:27

尽快离开客户、不是的刚回来没法跟你说地址

tebieguanxin · 2014-11-15 00:02:05

要看看。。。。

郝友军 · 2014-11-15 20:47:04

看看吧。。。。

倔强KK · 2014-11-20 16:43:56

滴答滴答滴答滴答滴答的

陈小北 · 2014-11-21 00:07:26

进来看看，淘点资料用用

「佐』唲！霘 · 2014-11-28 11:00:34

好好好好好好哦啊好好

王晓琳 · 2014-11-28 20:17:44

有没有仿真呀，给点仿真看看

zwp5681835 · 2014-11-30 08:22:42

感谢楼主！！！！！！！！！

yejj52112 · 2014-12-10 23:48:01

回复一个看看合不合适

彭英伟 · 2014-12-16 09:29:37

。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。

qiaoy · 2014-12-17 18:16:56

/*  名称：数码管显示 4X4矩阵
键盘按键号
说明：按下任意键时，数码
管都会显示其键的序号，扫描程
序首先判断按键发生在哪一列，
然后根据所发生的行附加不同的
值，从而得到按键的序号。
*/
#include
#define uchar unsigned char
#define uint unsigned int
//段码
uchar code DSY_CODE[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x82,0xf8,0x80,0x90,
0x88,0x83,0xc6,0xa1,0x86,0x8e,0x00};
***it BEEP=P3^7;
//上次按键和当前按键的序号，该矩阵中序号范围 0~15，16表示无按键
uchar Pre_KeyNo=16,KeyNo=16;
//延时
void DelayMS(uint x)
{
uchar i;
while(x--) for(i=0;i<120;i++);
}
//矩阵键盘扫描
void Keys_Scan()
{
uchar Tmp;
P1=0x0f; //高4 位置0，放入 4 行
DelayMS(1);
Tmp=P1^0x0f;//按键后0f变成 0000XXXX，X中一个为 0，3 个仍为 1，通过异或把 3 个1 变为0，唯
一的 0 变为1
switch(Tmp) //判断按键发生于 0~3 列的哪一列
{
  case 1: KeyNo=0;break;
  case 2: KeyNo=1;break;
  case 4: KeyNo=2;break;
  case 8: KeyNo=3;break;
  default:KeyNo=16; //无键按下
}
  P1=0xf0; //低 4 位置0，放入 4 列
DelayMS(1);
Tmp=P1>>4^0x0f;//按键后 f0 变成 XXXX0000，X中有 1 个为 0，三个仍为 1；高4 位转移到低 4位并
异或得到改变的值
switch(Tmp) //对0~3 行分别附加起始值 0，4，8，12
{
  case 1: KeyNo+=0;break;
  case 2: KeyNo+=4;break;
  case 4: KeyNo+=8;break;
  case 8: KeyNo+=12;
}
}
//蜂鸣器
void Beep()
{
uchar i;
for(i=0;i<100;i++)
{
  DelayMS(1);
  BEEP=~BEEP;
}
BEEP=0;
}
//主程序
void main()
{
P0=0x00;
BEEP=0;
while(1)
{
  P1=0xf0;
  if(P1!=0xf0) Keys_Scan();  //获取键序号
  if(Pre_KeyNo!=KeyNo)
  {
P0=~DSY_CODE[KeyNo];
Beep();
Pre_KeyNo=KeyNo;
  }
  DelayMS(100);
}
}