问答文章1 问答文章501 问答文章1001 问答文章1501 问答文章2001 问答文章2501 问答文章3001 问答文章3501 问答文章4001 问答文章4501 问答文章5001 问答文章5501 问答文章6001 问答文章6501 问答文章7001 问答文章7501 问答文章8001 问答文章8501 问答文章9001 问答文章9501

单片机 交通灯控制电路的设计(急求硬件电路图和程序)

发布网友 发布时间:2022-05-14 10:19

我来回答

3个回答

热心网友 时间:2023-10-13 22:31

ORG 0000H
LJMP A1
A1:NOP
A2:MOV P0,#0FFH ;将p1口作为输入
MOV 30H,#0AH ;显示A
MOV 31H,#11H ;显示—
MOV 32H,#03H ;将30秒的十位送给32H
MOV 33H,#00H ;将30秒的个位送给33H
MOV R3,#30 ;设置为30秒
MOV P1,#0DEH ;A路口显示红灯,B路口显示绿灯
A3:MOV 2AH,P1 ;保存P1状态
MOV 2BH,R3 ;保存R3状态
LCALL DEL ;调用显示程序
MOV R3,2BH
DEC R3 ;将时间自减一
LJMP A4 ;跳到A4
A5:MOV A,R3 ;将剩余时间送给A
MOV B,#0AH ;把B送入10
DIV AB ;将剩余时间除以10
MOV 32H,A ;高位送给32H
MOV 33H,B ;低位送给33H
LJMP A3
A4:CJNE R3,#00H,A5 ;判断倒计时是否为0
B1:MOV P1,#0FFH ;将p1口作为输入
MOV R3,#8 ;设置为8秒
MOV 30H,#0CH ;显示C
MOV 31H,#11H ;显示—
MOV 32H,#00H ;将8秒的十位送给32H
MOV 33H,#08H ;将8秒的个位送给33H
MOV P1,#0DDH ;A路口显示黄灯,B路口显示绿灯
B2:MOV 2AH,P1 ;保存P1状态
MOV 2BH,R3 ;保存R3状态
LCALL DEL ;调用显示程序
DEC R3 ;将时间自减一
LJMP B3
B4: MOV A,R3 ;将剩余时间送给A
MOV B,#0AH ;把B送入10
DIV AB ;将剩余时间除以10
MOV 32H,A ;高位送给32H
MOV 33H,B ;低位送给33H
LJMP B2
B3:CJNE R3,#00H,B4 ;判断倒计时是否为0
C1:MOV P0,#0FFH ;将p1口作为输入
MOV 30H,#0BH ;显示C
MOV 31H,#11H ;显示—
MOV 32H,#03H ;将30秒的十位送给32H
MOV 33H,#00H ;将30秒的个位送给33H
MOV R3,#30 ;设置为30秒
MOV P1,#0F3H ;A绿B红
C2:MOV 2AH,P1 ;保存P1状态
MOV 2BH,R3 ;保存R3状态
LCALL DEL ;调用显示程序
DEC R3 ;将剩余时间自减1
LJMP C3
C4:MOV A,R3 ;将剩余时间送给A
MOV B,#0AH ;把B送入10
DIV AB ;将剩余时间除以10
MOV 32H,A ;高位送给32H
MOV 33H,B ;低位送给33H
LJMP C2
C3:CJNE R3,#00H,C4 ;判断倒计时是否为0
D1:MOV P1,#0FFH ;将p1口作为输入
MOV R3,#8 ;设置为8秒
MOV 30H,#0CH ;显示C
MOV 31H,#11H ;显示—
MOV 32H,#00H ;将8秒的十位送给32H
MOV 33H,#08H ;将8秒的个位送给33H
MOV P1,#0EBH A绿B黄
D2:MOV 2AH,P1 ;保存P1状态
MOV 2BH,R3 ;保存R3状态
LCALL DEL ;调用显示程序
DEC R3 将剩余时间自减1
LJMP D3
D4: MOV A,R3 ;将剩余时间送给A
MOV B,#0AH ;把B送入10
DIV AB ;将剩余时间除以10
MOV 32H,A ;高位送给32H
MOV 33H,B ;低位送给33H
LJMP D2
D3:CJNE R3,#00H,D4 ;判断倒计时是否为0
LJMP A2 ;循环
DEL:MOV R6,#0FFH ;延时
DEL1:MOV R2,#0F7H ;选择数码显示管
MOV R0,#30H ;将30H中的内容送给R0
DEL2:MOV A,#00H ;对A清0
MOV P0,#00H ;对P0清0
MOV A,@R0 ;将30H的内容送给A
MOV DPTR,#SGTR ;指向七段码表首地址
MOVC A,@A+DPTR ;查表
MOV P0,A
MOV P2,R2
MOV R1,#0FFH ;延时程序
DEL3:DJNZ R1,DEL3
INC R0 ;指向数码管下一位地址
MOV A,R2
RR A ;右移
MOV R2,A
JB P2.7,DEL2 ;判断4位数码管是否扫描完
DJNZ R6,DEL1 ;判断1S到否
RET

SGTR:DB 3FH,06H,5BH,4FH,66H,6DH
DB 7DH,07H,7FH,6FH,77H,7CH
DB 39H,5EH,79H,71H,00H,40H,0F3H
这个程序的延时就是通过循环显示来完成的,显示程序循环两次大概的时间就为1S,你可以自己在加一个循环增加延时时间,这个程序黄灯没有闪你加一个求反就可以了

热心网友 时间:2023-10-13 22:31

#include<iom16v.h>
void delay_ms(unsigned int time)
{
unsigned int k,l;
for(k=0;k<time;k++)
for(l=0;l<1141;l++);
}
void main()
{unsigned char i,j,n,m,h;
static unsigned char led[10]={0x3F,0x06,0x5B,0x4F,0x66,0x6D,0x7D,0x07,0x7F,0x6F};//定义数组0 1。。9
unsigned char count[3]={0,0,0};
DDRA=0XFF;//A口为输出
PORTA=0X00;
DDRC=0XFF;//C口为输出
PORTC=0XFF;
DDRD=0X03;//D口的PD0和PD1为输出
PORTD=0XFF;
n=0x12;
m=0x06;
h=0x02;
while(1)
{
DDRB=0XFF;//B口为输出
PORTB=n;
count[0]=1;count[1]=5;count[2]=19;//给数组COUNT赋初值。count[0]为十位,count[1]为个位
}
while(1)
{
if(0==count[2]--)//从19减到0
{count[2]=19;
if(0==count[1]--)//从5减到0
{count[1]=9;
count[0]--;// count[1]为0时count[0]减1成为0
}
}
for(i=0;i<2;i++)
{
PORTD=h;
PORTC=~led[count[i]];//输出相应数字
delay_ms(10);
h=~h;
}
if(count[0]==0&&count[1]==3)
{
PORTB=(PORTB&=m);//B输出PORTB与m的位与
PORTA=(PORTB&=m);// A输出PORTB与m的位与
}
if(count[0]==0&&count[1]==0&&count[2]==0)//当全为0时
{
PORTA=0X00;
n=~n;
m=~m;
break;
}
}
}
}

热心网友 时间:2023-10-13 22:32

大工程一个
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com
上午去烧香,晚上梦见僵尸要吃我 ...电梯顶层的上方看到死人半个身子 我我掉头走后 被吓醒了 郁_百度知... 我两次梦见去逛商场然后电梯(上升的,带扶手的)塌了,丧尸出来,我和一群... 梦见在丧尸要咬我然后被我一脚踢进电梯它里半个身体出来了还想咬,然后... 香港hpv九价预约官网网址 电脑所有的电线有哪些电脑有哪些连接线 电脑电源那么多线起什么作用电脑电源连接线有多少个基本的都有什么作用... 显示器要接几根线 ...连接线是9芯的,谁知道是哪几条有用,哪几条没有用,各是什么颜色... mbr平板膜可以倒着放么 交通灯控制电路需要哪些元件 数字电路交通灯电路 交通灯控制逻辑电路设计 给个php实现下载的代码 利用与非门实现一个交通报警控制电路。要求当交通指示灯红黄绿单独工作或黄绿灯同时工作时为正常,其他情 某十字路口设置一个交通信号灯报警电路:当红,黄,绿三种信号灯 组合逻辑电路设计,设计交通灯故障报警电路 WMV的视频被人加密了,怎么破解啊? 笔记本玩游戏。电脑是不是自动切换独显卡? 我这电脑显卡可以切换吗? 想玩游戏时切换到高性能显卡去 我用韵达快递寄的行李,如果收件人没有收到,那快件会被怎么处理? 我的快递今天忘了拿,该怎么办?是韵达快递来的。 韵达快递揽了件没有发走当天会罚款多少 求高手们写个PHP网页模块代码,高分,谢谢了 蜈蚣虫能泡酒喝吗? 能用蜈蚣泡酒喝吗? 懂的麻烦帮帮忙啊! 蜈蚣能泡酒喝吗! 蜈蚣可以泡酒喝吗? 我抓了一条大蜈蚣,身子被我给踩破了,还能泡酒用吗? 蜈蚣直接抓了17条放置于塑料瓶中用酒泡制,能喝么?有毒么? 南薰礁案件的介绍 如何评价南薰礁案件? 南沙守礁解放军11人全部失踪事件,90年南薰礁失踪事件是真的吗 是谁制造了南熏礁守礁官兵灭门惨案 介绍一下海洋局势及争端,少些评论,多谢介绍! 2014.7-8月的时事新闻。 1990年我守南熏礁官兵全部牺牲疑案 如何评价南薰礁案件 找第三方贷款,借68000元,到账后扣款22000元服务费,高额服务费占三分之一,算不算砍头息,合理吗? 捷信现金贷款5000到我手4200每个月还363算砍头息吗? 我申请了一款网贷,总共6500,砍头息砍了1千多,实际到手的就5000多,逾期一天100的罚息? 网贷借取九千元,分十二期还,最后利息加本金共还10213这属于合法嘛? 这句什么意思:青春兵荒马乱,终是潦草离散 “青春兵荒马乱我们只好潦草的离散”什么意思? 青春兵荒马乱我们只好潦草的离散什么意思 兵荒马乱的青春里 我曾与你相遇? 青春兵荒马乱,我们潦草离离散是哪首歌? 青春是一场兵荒马乱的电影,下一句, 兵荒马乱的青春 翻译成日本字 “辉煌哀伤,青春兵荒马乱,我们潦草的离散。”求下联