单片机交通灯C语言程序

来源:网络时间:2022-02-09 10:19:02
这是一款单片机交通灯C语言程序,单片机用的是AT89C51,两只共阴两位一体的数码管分另显示两个路口的倒计时,用12只发光二极管模拟红、黄、绿灯。电路简单,制作容易。电子小制作。

#include#define uchar unsigned charbit flag;sbit red1_1=P1^0;//南北红灯D1sbit yel1_1=P1^1;//南北黄灯D2sbit gre1_1=P1^2;//南北绿灯D3sbit red1_2=P1^3;//南北红灯D4sbit yel1_2=P1^4;//南北黄灯D5sbit gre1_2=P1^5;//南北绿灯D6

sbit red2_1=P1^6;//东西红灯D7sbit yel2_1=P1^7;//东西黄灯D8sbit gre2_1=P0^0;//东西绿灯D9sbit red2_2=P0^1;//东西红灯D10sbit yel2_2=P0^2;//东西黄灯D11sbit gre2_2=P0^3;//东西绿灯D12

uchar code tab[]={0xc0,0xf9,0xa4,0xb0,0x99,0x92,0x83,0xf8,0x80,0x98};uchar n,n1,aa=0,shi,ge,shi1,ge1;void init();void xianshi1(uchar shi,uchar ge);void xianshi2(uchar shi1,uchar ge1);void delay(uchar z){uchar x,y;for(x=z;x>0;x--)for(y=110;y>0;y--);}main(){n=30;shi=n/10;ge=n;n1=30;shi1=n1/10;ge1=n1;

init();while(1){if(flag!=1)xianshi1(shi,ge);elsexianshi2(shi1,ge1);}}

void xianshi1(uchar shi,uchar ge){P3=0x02;P2=tab[ge];delay(200);P3=0x01;P2=tab[shi];delay(200);}

//http://www.duankudp.com/void xianshi2(uchar shi1,uchar ge1){P3=0x08;P2=tab[ge1];delay(200);P3=0x04;P2=tab[shi1];delay(200);

}

void init(){TMOD=0x01;TH0=(65536-50000)/256;TL0=(65536-50000)%6;EA=1;ET0=1;TR0=1;}

void timer0() interrupt1{TH0=(65536-50000)/256;TL0=(65536-50000)%6;aa++;if(flag!=1){if(aa==20){aa=0;red1_1=0;red1_2=0;gre2_1=0;gre2_2=0;//启动南北红灯1和东西绿灯2

n--;shi=n/10;ge=n;

if(n<=3){red1_1=0;red1_2=0;gre2_1=1;gre2_2=1;yel2_1=0;yel2_2=0;//启动南北红灯1和东西黄灯2if(n<=0){n=30;red1_1=1;red1_2=1;gre1_1=0;gre1_2=0;yel2_1=1;yel2_2=1;red2_1=0;red2_2=0;//启动南北绿灯1和东西红灯2http://www.5imcu.net/TR0=0;TH0=(65536-50000)/256;TL0=(65536-50000)%6;TR0=1;aa++;flag=1;

}}}}else{if(flag==1){//TH0=(65536-50000)/256;//TL0=(65536-50000)%6;//TR0=1;//aa++;if(aa==20){aa=0;n1--;shi1=n1/10;ge1=n1;if(n1<=3){gre1_1=1;gre1_2=1;yel1_1=0;yel1_2=0;red2_1=0;red2_2=0;//启动南北黄灯1和东西红灯2if(n1<=0){n1=30;yel1_1=1;yel1_2=1;red2_1=1;red2_2=1;

TR0=0;TH0=(65536-50000)/256;TL0=(65536-50000)%6;TR0=1;flag=0;}}}}}}

标签: 单片机交通灯C语

相关阅读

推荐阅读

江苏省养老方式及服务需求研究报告发布

江苏省养老方式及服务需求研究报告发布

当你老了,如何养老?10月11日,江苏省消保委发布《江苏省养老方式及服务需求研究报告》(简称《报告》),本次研究采用线上问卷和线下问卷调 更多

2021-10-12 07:55:20
电影票房狂吸金超40亿元  上市公司表现如何呢?

电影票房狂吸金超40亿元 上市公司表现如何呢?

在刚刚过去的国庆长假里,电影票房成绩优秀。据灯塔专业版数据,2021年国庆档总票房43 86亿元,这是国庆档票房历史第二次破40亿,仅次于201 更多

2021-10-09 07:54:06
国庆假期你去露营了吗?我国目前有3.2万家露营相关企业

国庆假期你去露营了吗?我国目前有3.2万家露营相

相约露营,现如今变得新潮又时尚。把客厅、厨房和卧室,都搬到野外去,食于山野,宿于山野,每一帧画面都透露出一种岁月静好的美好。扬子晚 更多

2021-10-08 08:27:04
我国现存眼镜企业超132万家  南京居全国第四

我国现存眼镜企业超132万家 南京居全国第四

日前,在第三届国民视觉健康高峰论坛上分享了一组数据,2020年,我国儿童青少年总体近视率为52 7%,其中6岁儿童为14 3%,小学生为35 6%,初 更多

2021-10-08 07:54:47
兴昌塑胶拟减持不超1%股份  大股东减持曾重挫股价

兴昌塑胶拟减持不超1%股份 大股东减持曾重挫股价

股东减持出现新理由,要借给上市公司无偿使用。9月29日晚间,高乐股份(002348)披露称,公司实控人之一兴昌塑胶五金厂有限公司(以下简称兴昌 更多

2021-09-30 08:43:16
”酱油三剑客“股价都在涨  股价再度突破百元大关

”酱油三剑客“股价都在涨 股价再度突破百元大关

9月26日晚间,海天味业公告:由于今年以来各主要原材物料、运输、能源等成本持续大幅上涨,给经营带来了一定的挑战,近期正在评估是否对产 更多

2021-09-28 07:50:33
“丝绸文创第一股”来了!万事利发行价格为5.24元/股

“丝绸文创第一股”来了!万事利发行价格为5.24元

9月22日,以丝绸文化创意领先的杭州丝绸品牌万事利登陆A股创业板。万事利(301066)发行价格为5 24元 股,截至9月24日,最新股价为24 18元, 更多

2021-09-26 07:51:26
组团减持后股价大跌  百亚股份跌逾8%

组团减持后股价大跌 百亚股份跌逾8%

卫生巾第一股百亚股份(003006)股东组团减持不超过公司10%股份的消息果然影响了公司9月22日的股价。截至9月22日收盘,百亚股份股价大跌8 02% 更多

2021-09-23 08:07:23
+ 点击查看更多精彩
不一样的天猫“6·18”新指标  每笔订单减碳17.6%
    今年的6·18有些不一样:没有公布总成交额,而是改用碳排放量做衡...
上市公司海外收入哪家强? 化工、采掘、电子行业的海外收入最高
      中建迪拜山庄基础设施升级改造施工现场。  中国建筑供图 ...
“新电商人才发展计划”发布 四位一体布局 培养急需人才
    今年是决胜全面小康、决战脱贫攻坚的最后一年,数字经济持续快速...
各地侨企铆足干劲 释放着攒了数月的能量
    近期,侨企益海嘉里(哈尔滨)粮油食品工业有限公司面粉车间日夜...
2小时带货6100万元湖北商品!快手直播带货助力湖北重启
    夏丹喊你下单了,一起为湖北拼单、立马&lsquo;夏丹&rsquo;,无法&...
商业银行正式进入金融期货市场
    谢卫群 摄商业银行今天(4月10日)正式进入中国金融期货市场。首批...