PAS CHER : 4 détecteurs IR, 4 relais, 1 Arduino : 2 boucles de retournement

/*
***********************************************************************
**  Programme ARDUINO pour deux boucles de retournement à l'aide de  **                                        
**  détecteurs infrarouge                                            **
***********************************************************************
*/


int LED = 13;
int OUT9 = 9 ;// définit le numéro de broche de sortie 9
int OUT10 = 10 ;// définit le numéro de broche de sortie 10
int OUT11 = 11 ;// définit le numéro de broche de sortie 11
int OUT12 = 12 ;// définit le numéro de broche de sortie 12

int buttonpin3 = 3; // définit le numéro de broche de l'interface IR 1
int buttonpin4 = 4; // définit le numéro de broche de l'interface IR 2
int buttonpin5 = 5; // définit le numéro de broche de l'interface IR 3
int buttonpin6 = 6; // définit le numéro de broche de l'interface IR 4

int val1 ;// définit la variable de lecture de l'état de l'interface IR 1
int val2 ;// définit la variable de lecture de l'état de l'interface IR 2
int val3 ;// définit la variable de lecture de l'état de l'interface IR 3
int val4 ;// définit la variable de lecture de l'état de l'interface IR 4

unsigned long temps1;
unsigned long temps2;

long prevMillis1 = 0;
long prevMillis2 = 0;

byte antirebond = 50;      // permet d'eviter les rebonds du au materiel


void setup (){
  Serial.begin(9600);
  while(!Serial);
  pinMode(3,INPUT_PULLUP); // entrée 3 en mode PULLUP
  pinMode(4,INPUT_PULLUP); // entrée 4 en mode PULLUP
  pinMode(5,INPUT_PULLUP); // entrée 5 en mode PULLUP
  pinMode(6,INPUT_PULLUP); // entrée 6 en mode PULLUP
  
  pinMode (LED, OUTPUT) ;// initialise la LED en sortie
  pinMode (OUT9, OUTPUT); // initialise la broche en sortie 9
  pinMode (OUT10, OUTPUT); // initialise la broche en sortie 10
  pinMode (OUT11, OUTPUT); // initialise la broche en sortie 11
  pinMode (OUT12, OUTPUT); // initialise la broche en sortie 10  
  }



void loop (){
  
  val1 = digitalRead (buttonpin3) ;// lit la valeur de l'état de l'interface IR 1 et la mémorise dans la variable
  val2 = digitalRead (buttonpin4) ;// lit la valeur de l'état de l'interface IR 2 et la mémorise dans la variable
  val3 = digitalRead (buttonpin5) ;// lit la valeur de l'état de l'interface IR 3 et la mémorise dans la variable
  val4 = digitalRead (buttonpin6) ;// lit la valeur de l'état de l'interface IR 4 et la mémorise dans la variable

  delay(antirebond);              // antirebond pour la detection


  if ((val1 == LOW) || (val2 == LOW))  // teste si l'interface IR 1 ou IR 2 est active, c'est à dire si la variable val est à 1 ou à 0
  {
    
  digitalWrite (OUT9, LOW);// éteint la sortie
  temps1=millis();
  digitalWrite (OUT10, LOW);// éteint la sortie
  temps1=millis();
  }
  if ((val1 == HIGH) && (val2 == HIGH) && (millis()-temps1> 500))
  {
  digitalWrite (OUT9, HIGH);// éteint la sortie
  digitalWrite (OUT10, HIGH);// éteint la sortie
  prevMillis1 = millis();
  }
  
 

  if ((val3 == LOW) || (val4 == LOW))  // teste si l'interface IR 3 ou IR 4 est active, c'est à dire si la variable val est à 1 ou à 0
  {
    
  digitalWrite (OUT11, LOW);// éteint la sortie
  temps2=millis();
  digitalWrite (OUT12, LOW);// éteint la sortie
  temps2=millis();
  }
  if ((val3 == HIGH) && (val4 == HIGH) && (millis()-temps2> 500))
  {
  digitalWrite (OUT11, HIGH);// éteint la sortie
  digitalWrite (OUT12, HIGH);// éteint la sortie
  //prevMillis2 = millis();
  }
  
  

  if ((val3 == HIGH) && (val4 == HIGH) && (val1 == HIGH) && (val2 == HIGH))
  {
  digitalWrite (LED , LOW);
  }
  else
  {
  digitalWrite (LED, HIGH);
  }
}

/*
***********************************************************************
**  Programme ARDUINO pour deux boucles de retournement à l'aide de  **                                        
**  détecteurs infrarouge                                            **
***********************************************************************
*/

// L'utilisation de #define permet de definir un mnemonique qui sera remplacé par sa valeur à la compilation
// Cela permet de minimiser le nombre de variable non utilisées
#define LED         13 // Definit la led interne
#define Relais1     9  // définit la broche du relais 1
#define Relais2     10 // définit la broche du relais 2
#define Relais3     11 // définit la broche du relais 3
#define Relais4     12 // définit la broche du relais 4

#define Occupation1 3  // définit la broche de l'interface IR 1
#define Occupation2 4  // définit la broche de l'interface IR 2
#define Occupation3 5  // définit la broche de l'interface IR 3
#define Occupation4 6  // définit la broche de l'interface IR 4

// On definit des variables si leur valeur évolue lors de l'execution du programme.
int IR1 ;              // définit la variable de lecture de l'état de l'interface IR 1
int IR2 ;              // définit la variable de lecture de l'état de l'interface IR 2
int IR3 ;              // définit la variable de lecture de l'état de l'interface IR 3
int IR4 ;              // définit la variable de lecture de l'état de l'interface IR 4

unsigned long tempoBoucle1;
unsigned long tempoBoucle2;

#define antirebond 500 // permet d'eviter les rebonds dus au materiel (en ms)

// ============================================
// Initialisations
// ============================================
void setup (){
  Serial.begin(9600);
  while(!Serial);
  // Initialisation des Capteurs IR
  pinMode(Occupation1,INPUT_PULLUP);
  pinMode(Occupation2,INPUT_PULLUP);
  pinMode(Occupation3,INPUT_PULLUP);
  pinMode(Occupation4,INPUT_PULLUP);
  
  // Initialisation de la LED en sortie
  pinMode (LED, OUTPUT) ;            
  
  // Initialisation des Relais
  pinMode (Relais1, OUTPUT);         // initialise la broche en sortie 9
  pinMode (Relais2, OUTPUT);         // initialise la broche en sortie 10
  pinMode (Relais3, OUTPUT);         // initialise la broche en sortie 11
  pinMode (Relais4, OUTPUT);         // initialise la broche en sortie 10  
  
  Serial.begin(9600);                // Permet d'utiliser le Monitor pour comprendre ce qui se passe (debug)
}

// ============================================
// Gestion Boucle :
//   Teste les 2 capteurs d'occupations de la boucle
//   et positionne les relais correspondant
// L'utilisation du else if permet de voir tous les cas possibles.
// ============================================
void Gest_inversion(int Ir1, int Ir2, int R1, int R2, long tempoBoucle) {

  if ((Ir1 == LOW) || (Ir2 == LOW)) // Un train est detecté en entrée de la boucle (au moins une occupations)=> on ferme les relais
  {
    Serial.println("Un train est detecte en entrée de la boucle");
    digitalWrite (R1, LOW);    // ferme le relais 1
    digitalWrite (R2, LOW);    // ferme le relais 2
    tempoBoucle1=millis();     // Remise a zero de la temporisation de la boucle
  }
  else if ((Ir1 == HIGH) && (Ir2 == HIGH) && (millis()-tempoBoucle> antirebond)) // Passé le delais antirebond, il n'y a plus de train face aux 2 capteurs => on ouvre les relais
  {
    Serial.println("Passe le delais antirebond, il n'y a plus de train face aux 2 capteurs");
    digitalWrite (R1, HIGH);   // ouvre le relais 1
    digitalWrite (R2, HIGH);   // ouvre le relais 2
  }
  else if (Ir1 == HIGH) {
    Serial.println(String(Ir1) + " est encore occupe");  
  }
  else if (Ir2 == HIGH) {
    Serial.println(String(Ir2) + " est encore occupe");  
  }
  else {
    Serial.println("Le delais n'est pas encore passe");  
  }  
}

// ============================================
// boucle
// ============================================
void loop (){

  // lecture et memorisation des occupations
  IR1 = digitalRead (Occupation1) ; // lit la valeur de l'état de l'interface IR 1 et la mémorise dans la variable
  IR2 = digitalRead (Occupation2) ; // lit la valeur de l'état de l'interface IR 2 et la mémorise dans la variable
  IR3 = digitalRead (Occupation3) ; // lit la valeur de l'état de l'interface IR 3 et la mémorise dans la variable
  IR4 = digitalRead (Occupation4) ; // lit la valeur de l'état de l'interface IR 4 et la mémorise dans la variable

  delay(antirebond);                // antirebond pour la detection
  
// Les sous programmes permettent une meilleur comprehension du code.
  Gest_inversion(IR1, IR2, Relais1, Relais2, tempoBoucle1);
  Gest_inversion(IR3, IR4, Relais3, Relais4, tempoBoucle2);

  // mise a jour de la led
  if ((IR3 == HIGH) && (IR4 == HIGH) && (IR1 == HIGH) && (IR2 == HIGH))
    digitalWrite (LED , LOW);       // éteint la led si aucune occupation
  else
    digitalWrite (LED, HIGH);       // allume la led si au moins une occupation
}