51单片机上实现的交通灯程序

发布时间:2023-08-28  

  这是我前几天无聊自己写的交通灯程序,在51单片机上实现的。基本的定时的交通灯转换是实现了,根据时间来改变交通灯的变换。可以下载下来看看的,电路图和原程序都有,代码就自己下载吧。我不全放上了。


  单片机源程序:

  #include

  sbit beiR=P1^0;

  sbit beiY=P1^1;

  sbit beiG=P1^2;

  sbit nanR=P1^3;

  sbit nanY=P1^4;

  sbit nanG=P1^5;

  uint a,b,c,type,j,i;

  void Delay(uint x) //延时

  {

  uchar i;

  while(x--)for(i=0;i《120;i++);

  }

  void delay_ms(uint q) //延时

  {

  uint i,j;

  for(i=q;i》0;i--)

  for(j=141;j》0;j--);

  }

  void shumaguan(uint k) //数码管显示

  {

  b=k/10;

  c=k%10;

  P3=11111101;

  P2=smg_dw;//选段码

  delay_ms(20);//延时5ms

  P3=11111110;

  P2=smg_dw[c];//选段码

  delay_ms(20);//延时5ms

  }

  main()

  {

  TMOD=0x01; //设置定时器T0为工作方式1定时

  TH0=(65536-50000)/256;

  TL0=(65536-50000)%256;

  TR0=1; //启动T0计数

  ET0=1; //允许T0中断

  EX0=1; //允许外部中断0中断

  EA=1; //开中断

  IT0=1; //允许外部中断0为边沿触发方式

  a=10; //倒计时10s

  type=1;

  while(1){

  switch(type)

  {

  case 1: //东西向绿灯与南北向红灯亮

  beiR=0;beiY=1;beiG=1;

  nanR=1;nanY=1;nanG=0;

  shumaguan(a);

  break;

  case 2: //东西向黄灯闪烁,绿灯关闭

  if(a%2!=0)

  {

  beiR=1;beiY=0;beiG=1;

  }

  if(a%2==0)

  {

  beiR=1;beiY=1;beiG=1;

  }

  shumaguan(a);

  break;

  case 3: //东西向红灯,南北向绿灯亮

  beiR=1;beiY=1;beiG=0;

  nanR=0;nanY=1;nanG=1;

  shumaguan(a);

  break;

  case 4: //南北向黄灯闪烁3次

  if(a%2!=0)

  {

  nanR=1;nanY=0;nanG=1;

  }

  if(a%2==0)

  {

  nanR=1;nanY=1;nanG=1;

  }

  shumaguan(a);

  break;

  }

  }

  }


文章来源于:电子工程世界    原文链接
本站所有转载文章系出于传递更多信息之目的,且明确注明来源,不希望被转载的媒体或个人可与我们联系,我们将立即进行删除处理。

我们与500+贴片厂合作,完美满足客户的定制需求。为品牌提供定制化的推广方案、专属产品特色页,多渠道推广,SEM/SEO精准营销以及与公众号的联合推广...详细>>

利用葫芦芯平台的卓越技术服务和新产品推广能力,原厂代理能轻松打入消费物联网(IOT)、信息与通信(ICT)、汽车及新能源汽车、工业自动化及工业物联网、装备及功率电子...详细>>

充分利用其强大的电子元器件采购流量,创新性地为这些物料提供了一个全新的窗口。我们的高效数字营销技术,不仅可以助你轻松识别与连接到需求方,更能够极大地提高“闲置物料”的处理能力,通过葫芦芯平台...详细>>

我们的目标很明确:构建一个全方位的半导体产业生态系统。成为一家全球领先的半导体互联网生态公司。目前,我们已成功打造了智能汽车、智能家居、大健康医疗、机器人和材料等五大生态领域。更为重要的是...详细>>

我们深知加工与定制类服务商的价值和重要性,因此,我们倾力为您提供最顶尖的营销资源。在我们的平台上,您可以直接接触到100万的研发工程师和采购工程师,以及10万的活跃客户群体...详细>>

凭借我们强大的专业流量和尖端的互联网数字营销技术,我们承诺为原厂提供免费的产品资料推广服务。无论是最新的资讯、技术动态还是创新产品,都可以通过我们的平台迅速传达给目标客户...详细>>

我们不止于将线索转化为潜在客户。葫芦芯平台致力于形成业务闭环,从引流、宣传到最终销售,全程跟进,确保每一个potential lead都得到妥善处理,从而大幅提高转化率。不仅如此...详细>>