立即注册 登录
返回首页

uid:277738的个人空间

日志

简单C51交通灯的程序红绿灯

已有 1050 次阅读2018-1-19 14:41

 /**********************BST-M51实验开发板例程************************
*  平台:BST-M51 + Keil U4 + STC89C52
*  名称:模拟交通灯显示。
  其中,红灯与绿灯显示时间均为50s,中间的黄灯显示时间为15s。
  绿灯用八位发光二极管流动闪烁作代表;
  红灯用八位发光二极管全亮作代表;
  黄灯用八位发光二极管全亮全灭闪烁作代表。
  刚开始显示的为绿灯。
  显示顺序:绿--黄--红--黄--绿--黄--红--………………
*  公司:深圳市亚博软件开发有限公司       
*  日期:2015-6
*  晶振:11.0592MHZ
*  说明:免费开源,不提供源代码分析.
******************************************************************/

#include<reg51.h>

#define uchar unsigned char
#define uint unsigned int

#define dula P0 //段选信号的锁存器控制
#define wela P2 //位选信号的锁存器控制,这里只用到P2.4-P2.7

sbit beep=P2^3;

unsigned int pp;
unsigned char code table[]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,
                        0x07,0x7f,0x6f,0x77,0x7c,0x39,0x5e,0x79,0x71};
uchar j,k,l=255;
uchar a1,a0;
uchar shijian,deng=2;
void delay(unsigned int i)
{
  for(j=i;j>0;j--)
    for(k=125;k>0;k--);
}

void display(unsigned char sh_c,unsigned char g_c)
{
   wela = wela&0x0f; 
   dula=table[g_c];
   wela = wela|0x80;
   delay(5);
   
   wela = wela&0x0f; 
   dula=table[sh_c];
   wela = wela|0x40;
   delay(5);
}

void main()
{
TMOD=0x01;
TR0=1;
TH0=(65536-46080)/256;// 由于晶振为11.0592,故所记次数应为46080,计时器每隔50000微秒发起一次中断。
TL0=(65536-46080)%256;//46080的来历,为50000*11.0592/12
ET0=1;
EA=1;
while(1)
{
if(shijian==0)
{
switch(deng)
{
case 0: shijian=50;   //红灯
deng=1;
break;
case 1: shijian=15;   //黄灯
deng=2;
break;
case 2: shijian=50;   //绿灯
deng=3;
break;
case 3: shijian=15;   //黄灯
deng=0;
break;
}
}
if(pp==20)
{ pp=0;
shijian--;
}
a0=shijian%10;
a1=shijian/10;
display(a1,a0);
switch(deng)
{
case 1: P1=0X00; //红灯
break;
case 2: //黄灯
if(shijian%2==0)
P1=0x00;
if(shijian%2==1)
P1=0xff;
break;
case 3: //绿灯
if(shijian%2==0)
P1=0x55;
if(shijian%2==1)
P1=0xaa;
break;
case 0: if(shijian%2==0)   //黄灯
P1=0x00;
if(shijian%2==1)
P1=0xff;
break;
}
}
}

void time0() interrupt 1
{ TH0=(65536-46080)/256;
TL0=(65536-46080)%256;
pp++;
}


路过

鸡蛋

鲜花

握手

雷人

评论 (0 个评论)

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

Powered by 单片机教程网

返回顶部