/****************************************************/
/* Laboratoy No 2 trafic light with pedestrian Light*/
/* Roman Lopez Ph. D. */
/****************************************************/
//Traffic Light West
#define cross 10
#define red 13
#define yellow 12
#define green 11
#define button 3
//Traffic Light North
#define cross2 4
#define red2 7
#define yellow2 6
#define green2 5
#define button_2 2
//Traffic Light East
#define cross3 29
#define red3 23
#define yellow3 25
#define green3 27
#define button_3 31
//Traffic Light South
#define cross4 47
#define red4 53
#define yellow4 51
#define green4 49
#define button_4 45

#define Delay_time 500
#define Green_time 5
#define Yellow_time 3
#define Red_time 5

volatile int button_state = 0;
int i = 0;

int Flag;
int Flag2;

int Ligth_State;

void setup() {
pinMode(cross, OUTPUT);
pinMode(red,OUTPUT);
pinMode(yellow, OUTPUT);
pinMode(green, OUTPUT);
pinMode(button, INPUT);
pinMode(cross2, OUTPUT);
pinMode(red2,OUTPUT);
pinMode(yellow2, OUTPUT);
pinMode(green2, OUTPUT);
pinMode(button_2, INPUT);
pinMode(cross3, OUTPUT);
pinMode(red3,OUTPUT);
pinMode(yellow3, OUTPUT);
pinMode(green3, OUTPUT);
pinMode(button_3, INPUT);
pinMode(cross4, OUTPUT);
pinMode(red4,OUTPUT);
pinMode(yellow4, OUTPUT);
pinMode(green4, OUTPUT);
pinMode(button_4, INPUT);

attachInterrupt(0,SetFlag2,CHANGE); //Attached the Interrup subroutine
attachInterrupt(1,SetFlag,CHANGE); //Attached the Interrup subroutine
attachInterrupt(2,SetFlag2,CHANGE); //Attached the Interrup subroutine
attachInterrupt(3,SetFlag,CHANGE); //Attached the Interrup subroutine

Serial.begin(9600);
Flag=0;
Flag2=0;
}
void loop() {
LOOP:
//Set the state flag, 1=gree,2=yellow and 3=red
//Set Green ON, ref and Yellow OFF
// Green State for first traffic light
digitalWrite(red,LOW);
digitalWrite(yellow,LOW);
digitalWrite(green,HIGH);
digitalWrite(cross,LOW);
digitalWrite(red3,LOW);
digitalWrite(yellow3,LOW);
digitalWrite(green3,HIGH);
digitalWrite(cross3,LOW);
// red State for second traffic light
digitalWrite(red2,HIGH);
digitalWrite(yellow2,LOW);
digitalWrite(green2,LOW);
digitalWrite(cross2,LOW);
digitalWrite(red4,HIGH);
digitalWrite(yellow4,LOW);
digitalWrite(green4,LOW);
digitalWrite(cross4,LOW);

for (i=0;i<=Green_time;i++)
{delay(Delay_time);
if(Flag==1 || Flag2==1)
{
Ligth_State=1;
Pedestian();
goto LOOP;
}
}
//Yellow State just for the first traffic light
digitalWrite(green,LOW);
digitalWrite(yellow,HIGH);
digitalWrite(green3,LOW);
digitalWrite(yellow3,HIGH);
for (i=0;i<=Yellow_time;i++)
{delay(Delay_time);
if(Flag==1 || Flag2==1)
{
Ligth_State=2;
Pedestian();
goto LOOP;
}
}
// Red State just for the first traffic light
digitalWrite(yellow,LOW);
digitalWrite(red,HIGH);
digitalWrite(yellow3,LOW);
digitalWrite(red3,HIGH);
for (i=0;i<=Red_time;i++)
{delay(Delay_time);
if(Flag==1 || Flag2==1)
{
Ligth_State=3;
Pedestian();
goto LOOP;
}
}
// Green State for second traffic light
digitalWrite(red2,LOW);
digitalWrite(green2,HIGH);
digitalWrite(red4,LOW);
digitalWrite(green4,HIGH);
//digitalWrite();
for (i=0;i<=Green_time;i++)
{delay(Delay_time);
if(Flag==1 || Flag2==1)
{
Ligth_State=4;
Pedestian();
goto LOOP;
}
}
//Yellow State for the second traffic light
digitalWrite(green2,LOW);
digitalWrite(yellow2,HIGH);
digitalWrite(green4,LOW);
digitalWrite(yellow4,HIGH);
for (i=0;i<=Red_time;i++)
{delay(Delay_time);
if(Flag==1 || Flag2==1) {
Ligth_State=5;
Pedestian();
goto LOOP;
}
}
//Red State for the second traffic light
digitalWrite(yellow2,LOW);
digitalWrite(red2,HIGH);
digitalWrite(yellow4,LOW);
digitalWrite(red4,HIGH);
for (i=0;i<=Red_time;i++)
{delay(Delay_time);
if(Flag==1 || Flag2==1) {
Ligth_State=6;
Pedestian();
goto LOOP;
}
}
}
void SetFlag(void)
{
Flag=1;
}
void SetFlag2(void)
{
Flag2=1;
}
void Pedestian(void){
switch (Ligth_State) {
  case 1:{// Off green on Yellow
    // if flag 2 is 1 cross 2 will turn on
    if(Flag2==1){
    digitalWrite(cross2,HIGH);
    digitalWrite(cross4,HIGH);
    delay(5000);
    break;
    }
    else if(Flag==1){
    digitalWrite(green,LOW); //off Green set Yellow
    digitalWrite(yellow,HIGH);
    digitalWrite(green3,LOW); //off Green set Yellow
    digitalWrite(yellow3,HIGH);
    delay(2000);
    // Set Red on in first traffic light and Pedestrian on
    digitalWrite(yellow,LOW); //off Green set Yellow
    digitalWrite(red,HIGH);
    digitalWrite(red2,LOW);
    digitalWrite(green2,HIGH);
    digitalWrite(cross,HIGH);
    digitalWrite(yellow3,LOW); //off Green set Yellow
    digitalWrite(red3,HIGH);
    digitalWrite(red4,LOW);
    digitalWrite(green4,HIGH);
    digitalWrite(cross3,HIGH);
    delay(5000);
    break;
    }
}
   case 2:{//YELLOW state
  if(Flag2==1){
  delay(500); //Keep yellow for 1/2 second
  delay(1000);
  digitalWrite(yellow,LOW); //off Green set Yellow
  digitalWrite(red,HIGH);
  digitalWrite(red2,LOW);
  digitalWrite(green2,HIGH);
  digitalWrite(cross2,HIGH);
  digitalWrite(yellow3,LOW); //off Green set Yellow
  digitalWrite(red3,HIGH);
  digitalWrite(red4,LOW);
  digitalWrite(green4,HIGH);
  digitalWrite(cross4,HIGH);
  delay(2000);
  digitalWrite(green2,LOW);
  digitalWrite(yellow2,HIGH);
  digitalWrite(green4,LOW);
  digitalWrite(yellow4,HIGH);
  delay(2000);
  digitalWrite(yellow2,LOW);
  digitalWrite(red2,HIGH);
  digitalWrite(red,LOW);
  digitalWrite(green,HIGH);
  digitalWrite(yellow4,LOW);
  digitalWrite(red4,HIGH);
  digitalWrite(red3,LOW);
  digitalWrite(green3,HIGH);
    break;
} else if(Flag==1)//if flag one will keep yellow for 1/2 second
{
delay(500);
delay(1000);
// Set Red on and Pedestrian on
digitalWrite(yellow,LOW); //off Green set Yellow
digitalWrite(red,HIGH);
digitalWrite(cross,HIGH);
digitalWrite(red2,LOW);
digitalWrite(green2,HIGH);
digitalWrite(yellow3,LOW); //off Green set Yellow
digitalWrite(red3,HIGH);
digitalWrite(cross3,HIGH);
digitalWrite(red4,LOW);
digitalWrite(green4,HIGH);
delay(5000);
break;
}
}
case 3:{//Pedestrian on, red on
if(Flag2==1)
{
digitalWrite(cross2,HIGH);
digitalWrite(red2,LOW);
digitalWrite(green2,HIGH);
digitalWrite(cross4,HIGH);
digitalWrite(red4,LOW);
digitalWrite(green4,HIGH);
delay(2000);
digitalWrite(green2,LOW); //off Green set Yellow for second traffic light
digitalWrite(yellow2,HIGH);
digitalWrite(green4,LOW); //off Green set Yellow for second traffic light
digitalWrite(yellow4,HIGH);
delay(2000);
digitalWrite(yellow2,LOW);
digitalWrite(red2,HIGH);
digitalWrite(red,LOW);
digitalWrite(green,HIGH);
digitalWrite(yellow4,LOW);
digitalWrite(red4,HIGH);
digitalWrite(red3,LOW);
digitalWrite(green3,HIGH);
delay(2000);
break;
}
else if(Flag==1){
digitalWrite(cross,HIGH);
digitalWrite(cross3,HIGH);
delay(2000);
digitalWrite(red2,LOW);
digitalWrite(green2,HIGH);
digitalWrite(cross,HIGH);
digitalWrite(red4,LOW);
digitalWrite(green4,HIGH);
digitalWrite(cross3,HIGH);
delay(2000);
break;
}
}
case 4:{//GREEN state second traffic light
if(Flag2==1){
delay(2000);
digitalWrite(green2,LOW);
digitalWrite(yellow2,HIGH);
digitalWrite(green4,LOW);
digitalWrite(yellow4,HIGH);
delay(2000);
digitalWrite(yellow2,LOW);
digitalWrite(red2,HIGH);
digitalWrite(red,LOW);
digitalWrite(green,HIGH);
digitalWrite(cross2,HIGH);
digitalWrite(yellow4,LOW);
digitalWrite(red4,HIGH);
digitalWrite(red3,LOW);
digitalWrite(green3,HIGH);
digitalWrite(cross4,HIGH);
delay(2000);
break;
}
else if(Flag==1){
//digitalWrite(red,LOW);
//digitalWrite(green,HIGH);
digitalWrite(cross,HIGH);
digitalWrite(cross3,HIGH);
delay(2000);
break;
}
}
case 5:{//YELLOW State for second traffic light
if(Flag2==1){
digitalWrite(cross2,HIGH);
digitalWrite(cross4,HIGH);
delay(2000);
digitalWrite(yellow2,LOW);
digitalWrite(red2,HIGH);
digitalWrite(red,LOW);
digitalWrite(green,HIGH);
digitalWrite(yellow4,LOW);
digitalWrite(red4,HIGH);
digitalWrite(red3,LOW);
digitalWrite(green3,HIGH);
delay(2000);
break;
}
else if(Flag==1){
//delay(20
digitalWrite(cross,HIGH);
digitalWrite(cross3,HIGH);
delay(1000);
digitalWrite(yellow2,LOW);
digitalWrite(red2,HIGH);
digitalWrite(red,LOW);
digitalWrite(green,HIGH);
digitalWrite(yellow4,LOW);
digitalWrite(red4,HIGH);
digitalWrite(red3,LOW);
digitalWrite(green3,HIGH);
delay(2000);
digitalWrite(green,LOW);
digitalWrite(yellow,HIGH);
digitalWrite(green3,LOW);
digitalWrite(yellow3,HIGH);
delay(2000);
digitalWrite(yellow,LOW);
digitalWrite(red,HIGH);
digitalWrite(red2,LOW);
digitalWrite(green2,HIGH);
digitalWrite(yellow3,LOW);
digitalWrite(red3,HIGH);
digitalWrite(red4,LOW);
digitalWrite(green4,HIGH);
delay(1000);
break;
}
}
case 6: {//RED state second traffic light
    if(Flag2==1){
    digitalWrite(cross2,HIGH);
    digitalWrite(cross4,HIGH);
    delay(1000);
    digitalWrite(red,LOW);
    digitalWrite(green,HIGH);
    digitalWrite(red3,LOW);
    digitalWrite(green3,HIGH);
    delay(1000);
    break;
    }
  else if(Flag==1){
    digitalWrite(cross,HIGH);
    digitalWrite(cross3,HIGH);
    delay(1000);
    digitalWrite(red,LOW);
    digitalWrite(green,HIGH);
    digitalWrite(red3,LOW);
    digitalWrite(green3,HIGH);
    delay(2000);
    digitalWrite(green,LOW);
    digitalWrite(yellow,HIGH);
    digitalWrite(green3,LOW);
    digitalWrite(yellow3,HIGH);
    delay(2000);
    digitalWrite(yellow,LOW);
    digitalWrite(red,HIGH);
    digitalWrite(red2,LOW);
    digitalWrite(green2,HIGH);
    digitalWrite(yellow3,LOW);
    digitalWrite(red3,HIGH);
    digitalWrite(red4,LOW);
    digitalWrite(green4,HIGH);
    delay(1000);
    break;
    }
}
default:{};
}
  if(Flag == 1){
  for (i=0;i<=5;i++)
  {digitalWrite(cross,LOW);
  digitalWrite(cross3,LOW);
  delay(1000);
  digitalWrite(cross,HIGH);
  digitalWrite(cross3,HIGH);
  delay(1000);
  }
}
else if(Flag2 == 1){
  for (i=0;i<=5;i++)
  {
  digitalWrite(cross2,LOW);
  digitalWrite(cross4,LOW);
  delay(1000);
  digitalWrite(cross2,HIGH);
  digitalWrite(cross4,HIGH);
  delay(1000);
  }
}
if (Flag==1){
delay(1000);
digitalWrite(cross,LOW);
digitalWrite(green2,LOW);
digitalWrite(yellow2,HIGH);
digitalWrite(cross3,LOW);
digitalWrite(green4,LOW);
digitalWrite(yellow4,HIGH);
delay(2000);
digitalWrite(yellow2,LOW);
digitalWrite(red2,HIGH);
digitalWrite(yellow4,LOW);
digitalWrite(red4,HIGH);
delay(2000);
//break;
}
Flag=0;
Flag2=0;
}