找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
查看: 2807|回复: 0
打印 上一主题 下一主题
收起左侧

基于LPC2106的交通灯实现源码

[复制链接]
跳转到指定楼层
楼主
ID:271754 发表于 2018-1-5 05:51 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
单片机源程序如下:
  1. #include "config.h"
  2. #define LEDCON  0x00000200  /*P0.9引脚控制LED,低电平点亮*/
  3. #define LEDCON1 0x00000400
  4. void DelayNS(uint32 dly)   /*长软件延时*/
  5. {
  6.   uint32 i;
  7.   for(;dly>0;dly--)
  8.      for(i=0;i<50000;i++);
  9. }
  10. #include  "config.h"  
  11. #define  uchar unsigned char
  12. char LED[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};/*0-9数字段码表*/
  13. void delay(uint32 n)        /*延时子程序*/
  14. {
  15. uint32 i;
  16. for(i=0;i<500000;i++)
  17. n--;
  18. }
  19. void light(int m)           /*显示数码管子程序*/
  20. {
  21. int i;
  22. if(m==0)
  23. {
  24.    for(i=9;i>=0;i--)           /*东西亮绿灯,南北亮红灯延时9s*/
  25.    {
  26.     IOSET=LED[i];           /*查段码表送显示*/
  27.     delay(500000000);
  28.     IOCLR= 0x000001ff;       /*IO低九位清零*/
  29.    }
  30. }
  31. else
  32. {
  33.   if(m==1)
  34.   {
  35.    for(i=6;i>=0;i--)          /*东西亮黄灯,南北亮黄灯延时6s*/
  36.    {
  37.     IOSET=LED[i];          /*查段码表送显示*/
  38.     delay(500000000);
  39.     IOCLR= 0x000001ff;      /*IO低九位清零*/
  40.    }
  41.   }
  42.   else
  43.   {
  44.    for(i=8;i>=0;i--)         /*东西亮红灯,南北亮绿灯延时8s*/
  45.    {
  46.     IOSET=LED[i];           /*查段码表送显示*/
  47.     delay(500000000);
  48.     IOCLR= 0x000001ff;      /*IO低九位清零*/
  49.    }
  50.   }
  51. }
  52. }
  53. int main(void)      /*主程序*/
  54. {
  55. uint32 j;
  56. while(1)
  57. {
  58.   PINSEL0=0x00000000;                        
  59.   IODIR=0x00007fff;
  60.   IOCLR=0x00007fff ;
  61.   IOSET=0x00004200;    /*东西方向亮红灯,南北方向亮绿灯*/
  62.   j=0;
  63.   light(j);
  64.   IOCLR=0x00007fff ;
  65.   IOSET=0x00002400;    /*东西方向亮黄灯,南北方向亮黄灯*/
  66.   j=1;
  67.   light(j);
  68.   IOCLR=0x00007fff ;
  69.   IOSET=0x00001800;    /*东西方向亮绿灯,南北方向亮红灯*/
  70.   j=2;
  71.   light(j);
  72.   IOCLR=0x00007fff ;
  73.   IOSET=0x00002400;   /*东西方向亮黄灯,南北方向亮黄灯*/
  74.   j=1;
  75.   light(j);
  76. }                    
  77. return(0);
  78. }
复制代码


物联卓越1502张赢生产实习报告1.docx

16.42 KB, 下载次数: 18, 下载积分: 黑币 -5

物联卓越1502张赢生产实习报告2.docx

13.53 KB, 下载次数: 11, 下载积分: 黑币 -5

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏1 分享淘帖 顶 踩
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|小黑屋|51黑电子论坛 |51黑电子论坛6群 QQ 管理员QQ:125739409;技术交流QQ群281945664

Powered by 单片机教程网

快速回复 返回顶部 返回列表