找回密码
 立即注册

QQ登录

只需一步,快速开始

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

单片机中断控制交通灯 源程序

[复制链接]
跳转到指定楼层
楼主
中断控制交通灯
#include<reg51.h>
#include<intrins.h>
#define uchar unsigned char
sbit c=P1^1;
sbit d=P1^4;
uchar led[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};//0到9数码管显示
void delay1(uchar j)//延时若干ms
{uchar i;
while(j--)
{for(i=0;i<125;i++)
for(i=0;i<125;i++);}
}
void delay(uchar i)  //延时1秒钟
{
    unsigned char a,b,c;
                while(i--)
    {for(c=167;c>0;c--)
        for(b=171;b>0;b--)
            for(a=16;a>0;a--);
    _nop_; }
}
void nanbei(uchar a)//南北显示红绿灯
{uchar j=100;
P1=0X24;
for(a;a>0;a--)
{
while(j--)
{
P0=0XFE;
P2=led[a/10];//显示十位倒计时
delay1(5);//延时5毫秒,给机器一点反应时间
P0=0XFd;
P2=led[a%10];//显示个位倒计时
delay1(5);//延时5毫秒,给机器一点反应时间
if(a<=3)//如果a小于3,则开始黄灯闪烁
{
P1=0X12;               
delay1(10);
P1=0X00;
delay1(10);
}
}
}
}
void dongxi(uchar a)//东西显示红绿灯
{uchar j=100;
P1=0X09;
for(a;a>0;a--)
{
while(j--)
{
P0=0XFB;
P2=led[a/10];//显示十位倒计时
delay1(5);//延时5毫秒,给机器一点反应时间
P0=0XF7;
P2=led[a%10];//显示个位倒计时
delay1(5);//延时5毫秒,给机器一点反应时间
if(a<=3)//如果a小于3,则开始黄灯闪烁
{
P1=0X12;               
delay1(10);
P1=0X00;
delay1(10);
}
}
}
}
main()
{EA=1;//允许中断
EX0=1;//允许外部中断0
IT0=1;//跳沿触发
while(1)
{dongxi(15);//东西通行时间15秒
nanbei(30);//南北通行时间30秒
}
}
void into(void) interrupt 0  //外部中断0函数,用于强行更改红绿灯方向
{uchar i,j=1000,b;
P0=0XFF;
P1=P1&0X01;//判断如果P1最后一位为1,则东西方向为绿灯,南北方向为红灯
if(P1==0X01)
{P1=0X08;
for(b=0;b<3;b++)
{{for(i=0;i<10;i++)//黄灯闪烁次数
{delay1(100);
c=~c;
delay1(100);
}}}
P1=0Xe4;
delay(10);//改变之后的时间延时10秒
}
else
{P1=0X04;
for(b=0;b<3;b++)
{{for(i=0;i<10;i++)
{delay1(100);
d=~d;
delay1(100);
}}}
P1=0X09;
delay(10);//改变之后的时间延时10秒
}}   

2.png (157.73 KB, 下载次数: 101)

2.png

带中断的红绿灯.rar

60.72 KB, 下载次数: 21, 下载积分: 黑币 -5

评分

参与人数 1黑币 +20 收起 理由
admin + 20 共享资料的黑币奖励!

查看全部评分

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

使用道具 举报

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

本版积分规则

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

Powered by 单片机教程网

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