- 1、本文档共10页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
交通灯程序中proteus
交通灯程序
proteus
交通灯proteus
交通灯程序
#includereg52.h
#define uchar unsigned char
#define uint unsigned int
uchar code table[10]={0x03,0x9f,0x25,0x0d,0x99,0x49,0x41,0x1f,0x01,0x09} ;
sbit s4=P0^0;
sbit s3=P0^1;
sbit s2=P0^2;
sbit s1=P0^3;
sbit l1=P1^2;
sbit l=P1^3;
sbit hu=P1^0;
sbit hu1=P1^1;
sbit h1=P1^4;
sbit h=P1^5;
uchar heng,zong;
uint num,num2,num1,num3;
void delayms(uint x)
{
uint i,j;
for(i=x;i0;i--)
for(j=110;j0;j--);
}
交通灯程序
void display(uint x)
{
uchar ge,shi,bai,qian;
qian=x/1000;
bai=x%1000/100;
shi=x%100/10;
ge=x%10;
s1=1;
P2=table[ge];
delayms(5);
s1=0;
s2=1;
P2=table[shi];
delayms(5);
s2=0;
s3=1;
P2=table[bai];
delayms(5);
s3=0;
s4=1;
P2=table[qian];
delayms(5);
s4=0;
}
交通灯程序
void main()
{
TMOD=0x11;
TH0=15536/256;
TL0=15536%256;
TH1=15536/256;
TL1=15536%256;
EA=1;
num=80;
heng=30;
zong=40;
ET0=1;
ET1=1;
TR0=1;
TR1=1;
while(1)
{
display(heng*100+zong);
}
}
交通灯程序
void T0_time()interrupt 1
{
TH0=15536/256;
TL0=15536%256;
num1++;
if(num1==20)
{
num1=0;
num3++;
if(num330)
{ h=l1=0;hu=h1=1; }
else if(num340)
{
l1=1;h=0;
if(num3%2==0)
hu1=1;
else hu1=0;
}
else if(num370)
{
h=hu1=1;h1=l=0;
}
交通灯程序
else {
h1=0;
l=1;
if(num3%2==0)
hu=1;
else{
l=1;hu=h1=0;
}
}
if(num3==80)
num3=0;
}
}
交通灯程序
void T1_time()interrupt 3
{
TH1=15536/256;
TL1=15536%256;
num2++;
if(num2==20)
{
num2=0;
num--;
if(num40)
{ heng--;
zong--;
if(num==50)
heng=10;
}
if(num==40)
交通灯程序
{heng=40,zong=30;}
if(num40)
{
heng--;zong--;
if(num==10)
zong=10;
}
if(num==0)
{
num=80;
heng=30;
zong=40;
}
您可能关注的文档
最近下载
- 智慧广场-简单的重叠问题(课件)-2024-2025学年一年级上册青岛版(五四学制)(2024).pptx VIP
- 大学教学课件:Reading-The Modern Flying Carpets and Wind-Fire Wheels-.pptx
- 第四章 课程标准、教学与评估之间的“对齐”.pptx
- 在线网课学习课堂《英语电影与文化》单元测试考核答案.docx
- 钢结构施工质量验收规范2013.docx
- 壹号土猪市场营销分析.doc VIP
- 2023-2024学年北京市海淀区七年级第一学期期末数学试卷(含答案).pdf
- 债权转让协议-中国长城资产管理股份有限公司.DOC
- 壹号土猪案例SWOT分析课件.pptx VIP
- 大学生创新创业计划书PPT完整版.pptx
文档评论(0)