基于单片机设计的交通灯c程序.doc

#include#define uchar unsigned char#define uint unsigned intuchar code table11=0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d, 0x07,0x7f,0x6f,0x0;uchar code table17=0xfe,0xfd,0xfb,0xf7,0xef,0xdf,0xbf;uint table25=5,15,20,0,15;sbit dula=P10;sbit wela=P11;sbit beer=P37;sbit k1=P15;sbit k2=P12;sbit k3=P14;sbit k4=P16;sbit A1=P20;sbit A2=P21;sbit A3=P22;sbit A4=P23;uint count,count1,count2,j,tz=79,kn2,t10=15,tc=15,tf=15,tb,te,t4,t5,n=4,k=1,kn,tt,ti=20,t11=20,t12=35,t13=40,t14=55,t15=60,t16=75;void init() TMOD=0x01;TH0=(65536-50000)/256;TL0=(65536-50000)%256;EA=1;ET0=1;TR0=1;void delayms(uint x) uint y,z;for(y=x;y0;y-)for(z=110;z0;z-);void display(uint td,uchar ta) uint num;P0=0xff;wela=1;wela=0;if(td=0) P0=tableta;else P0=ta ;dula=1;dula=0;if(num=7) num=0;P0=table1num;num+;wela=1;wela=0;void ts()uchar shi,ge;ET0=0;shi=ti/10;ge=ti%10;if(k2=0)delayms(5);if(k2=0)kn2+;if(kn2=2) kn2=0;while(!k2);if(kn2=1) if(j=1) wela=1;else display(0,shi);display(0,ge);display(0,shi);display(0,ge); display(1,0xff);display(1,0x0);display(1,0x0);if(k3=0|k4=0)delayms(5);if(k3=0)table21+;table24+;table22+;ti+;t10+;t11+;t12=t12+2;t13=t13+2;t14=t14+3;t15=t15+3;t16=t16+4;tz=tz+4,tc+,tf+;if(k4=0)table21-;table22-;table24-;ti-;t10-;t11-;t12=t12-2;t13=t13-2;t14=t14-3;t15=t15-3;t16=t16-4;tz=tz-4;while(!k3);while(!k4);tb=0;te=0;tt=0;n=4;k=1;ET0=1;void incident() ET0=0;if(k1=0)delayms(5);if(k1=0)kn+;if(kn=2)beer=1;kn=0;while(!k1);if(kn=1)beer=0;if(j=1) wela=1;else display(0,10);display(0,10);display(0,10);display(0,10); display(1,0xff);display(1,0x0);display(1,0x0);ET0=1;void main()uchar shia,gea,shib,geb; uint i;init();while(1) ts(); incident(); if(count1=10) count1=0;j+;if(j=2) j=0; if(count2=5) count2=0;i+;if(i=4) i=0; if(i=0) A1=0; else A1=1; if(i=1) A2=0;else A2=1; if(i=2) A3=0; else A3=1;if(i=3) A4=0;else A4=1; if(count=20)count=0;tt+; tb+; te+;if(tttz) tt=0;if(n=3|n=5) n=0;if(t4=tb) tb=0;t4=table2n;tc=t4-tb ;if(tc=1) n+;if(k=3) k=0;if(t5=te) te=0;t5=table2k;tf=t5-te ;if(tf=1) k+;if(kn2=0&kn=0) shia=tc/10;display (0,shia);gea=tc%10; display (0,gea);shib=tf/10;display (0,shib);geb=tf%10; display (0,geb);if (tt=(t10-5)&tt=t10&tt=t11&tt=(t12-5)&tt=t12&tt=t13&tt=(t14-5)&tt=t14&tt=t15&tt=(t16-5)&ttt16&j=0) display(1,0x31);else display(1,0x37);display(1,0x0);display(1,0x8);else /*黄*/display(1,0x31);if(j=0) display(1,0x8);else