红绿灯程序

交通灯硬件原理图及说明
一、实验目的
1、掌握8255与显示器的接口方法和编程方法。

2、掌握数码管的工作原理及编码。

3、掌握交通灯工作原理、及电路其控制程序的设计方法。

二、实验内容与要求
实验电路如图所示，交通灯套件是通过接口平台板中二十六芯插座引出来的并口实验。

PA0-2控制（G1、Y1、R1），PA3-5控制（G2、Y2、R2），PC0-2控制（G3、Y3、R3），PC5-7控制（G4、Y4、R4），所有的并口控制信号都先通过７４LS０４引出。

１２个灯的另一端接A４７２J的排阻再接到地。

PB口接数码管的８个控制引脚。

PC3、PC4分别接两个数码管片选引脚（低电平有效）。

电路分析如下:
PA0-5是用来控制北面和西面的交通灯（分别为红，黄，绿），PC0-2,PC5-7是用来控制南面和东面的交通灯（分别为红，黄，绿）．PB口是来控制数码管．了解了原理图就可以很容易的在程序来编写，使交通灯可以正常运行．
原理图如下：
数码管管脚图
共阴极数码管编码表
实验要求实现功能如下：
实现南北、东西交通车辆直行红绿灯控制。

南北两面亮起绿灯的时候，东西两面就会亮起红灯．并而这时中间的数码会以５０为倒计时，当倒计时为５时，南北两的的绿灯熄灭，黄灯亮起．东西两面的红灯不变．直到倒计时为０时．东西两面亮绿灯，南北两面亮红灯．如此死循环．模拟生活中的交通灯．
参考程序（C语言）：
#include<dos.h>
#include<stdio.h>
#include<conio.h>
int East_west();
int South_north();
void main()
{
printf("\n **********************************************\n");
printf("\n * Advert the traffic light -- Be carefull ! *\n");
printf("\n **********************************************\n");
outportb(0x303,0x80);
do{
outportb(0x300,0x24);
outportb(0x302,0x21);
East_west();
outportb(0x300,0x09);
outportb(0x302,0x84);
South_north();
}while(1);
}
int East_west()
{
int set[2]={0x29,0x31};
int xu[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};
int a,b,t,buf1,num;
for(num=50;num>0;num--)
{
a=num%10;
b=num/10;
buf1=xu[a];
if(num>=15)
{
for(t=0;t<2;t++)
{
outportb(0x302,set[t]);
outportb(0x301,buf1);
if(t==1) delay(300);
else delay(20);
buf1=xu[b];
}
}
else
{
outportb(0x300,0x24);
outportb(0x302,0x42);
int set[4]={0x4a,0x08,0x52,0x10};
for(t=0;t<4;t++)
{
outportb(0x302,set[t]);
outportb(0x301,buf1);
if(t==3) delay(300);
else delay(20);
buf1=xu[b];
}
}
}
}
int South_north()
{
int set[2]={0x8c,0x94};
int xu[10]={0x3f,0x06,0x5b,0x4f,0x66,0x6d,0x7d,0x07,0x7f,0x6f};
int a,b,t,buf1,num;
for(num=50;num>0;num--)
{
a=num%10;
b=num/10;
buf1=xu[a];
if(num>=15)
{
for(t=0;t<2;t++)
{
outportb(0x302,set[t]);
outportb(0x301,buf1);
if(t==1) delay(300);
else delay(20);
buf1=xu[b];
}
}
else
{
outportb(0x300,0x12);
delay(30);
outportb(0x302,0x84);
int set[2]={0x8c,0x94};
for(t=0;t<2;t++)
{
outportb(0x302,set[t]);
outportb(0x300,0x00);
outportb(0x301,buf1);
if(t==1) delay(300);
else delay(20);
buf1=xu[b];
}
}
}
}
汇编程序：
data segment
light db 6fh,7fh,07h,7dh,6dh,66h,4fh,5bh,06h,3fh
message db '**********************************************',0dh,0ah db '* Advert the traffic light -- Be carefull ! *',0dh,0ah
db '**********************************************',0dh,0ah,'$' set1 db 89h,91h
set2 db 2ch,34h
num db ?
data ends
code segment
assume cs:code,ds:code
East_west proc near
mov si,offset light
mov cx,10
jmp lop
lop1: inc cx
dec cx
jz L4
mov dx,300h
mov al,22h
out dx,al
mov dx,302h
mov al,8ah
out dx,al
jmp L3
lop: mov dx,302h
mov al,89h
out dx,al
L3: mov al,[si]
mov dx,301h
out dx,al
mov bp,01fffh
mov ax,0ffffh;延时
delay: dec ax
jnz delay
dec bp
jnz delay
push bp
push ax
mov bp,01ffh
mov ax,0ffffh;延时
delay1:dec ax
jnz delay1
dec bp
jnz delay1
pop ax
pop bp
inc si
dec cx
cmp cx,4
jbe lop1
jnz lop
L4:ret
East_west endp。