/*
***********************************************************************
** Mesure et calcule la vitesse des trains dans leur sens de marche, **
** pour double voie avec deux KY033.
**                                                                   **
** AVANT DE COMMENCER, définir les deux points suivant:              **
** - Choisir = "N" ou "HO" par la variable "Echelle" en ligne 36.    **
** - Mentionner la distance entre les deux capteurs en ligne 37.     **
**                                                                   **
**                  Créé le 19 décembre 2024.                        **
**                 Modifié le 06 juillet 2026.                       **
***********************************************************************
*/

#include <LiquidCrystal.h>// Import de la librairie pour l'afficheur LCD

// Initialise la librairie avec les pins à connecter
LiquidCrystal lcd(12, 11, 10, 9, 8, 7);

// Initialisation des variables
int Voie; // Voie de mesure
int VoieDebut = 2; // Barrière optique Début
int VoieFin = 0; // Barrière optique Fin
int lect; // Valeur lue sur les barrières optiques
int Tdebut; // Temps sur la barrière début
int debut; // Détection début
int Tfin; // Temps sur la barrière fin
int fin; // Détection fin
int Temps; // Temps de passage ( = Tfin - Tdebut )
float Vitesse; // Vitesse calculée
double Coef; // Coefficient d'échelle
int Sens;
unsigned long timer; // Base du compteur
byte Compteur = 0; // Compteur après détection capteur début
// -=-  Variable à personnaliser  -=-
const int Echelle = "N"; // Défini l'échelle employée (N ou HO)
long Distance = 100; // Distance entre les barrières infrarouge en mm
byte Delais = 30; // Délais (en secondes) avant raz détection

/* Initialisation du caractères personnalisés (e en exposant) */
byte expo[8] = {
  B01110,
  B10001,
  B11110,
  B10000,
  B01110,
  B00000,
  B00000,
  B00000,
};
/* Initialisation du caractères personnalisés (é) */
byte e_aigu[8] = {
  B00010,
  B00100,
  B01110,
  B10001,
  B11110,
  B10000,
  B01110,
  B00000,
};

void setup() {
  // Défini les colonnes et lignes, affiche la première ligne et la fin de la seconde 
  lcd.createChar(0, expo); // Mémorise le caractère spécial
  lcd.begin(16, 2); // Déclaraton du type d'afficheur 16 cracteres sur 2 lignes
  lcd.clear();
  lcd.setCursor (1, 0); // Positionne le curseur ligne 1 colonne 2
  lcd.print("Vitesse"); // Ecrit "Vitesse"
  lcd.setCursor(9, 0); // Positionne le curseur ligne 1 colonne 10
  if ( Echelle == "N" ){ // Echelle "N"
    Coef = 576,00;
    lcd.print ("au 160"); // Ecrit "au 160" à la suite de "vitesse"
    lcd.setCursor(15, 0); //Positionne le curseur ligne 1 colonne 16
    lcd.write(byte(0)); // Ecrit le caractère spécial
  } 
  if ( Echelle == "HO" ){ // Echelle "HO"
    Coef = 313,20;
    lcd.print ("au 87"); // Ecrit "au 87" à la suite de "vitesse"
    lcd.setCursor(14, 0); //Positionne le curseur ligne 1 colonne 15
    lcd.write(byte(0)); // Ecrit le caractère spécial
  }
  lcd.setCursor(0, 1); // Positionne le curseur ligne 2 colonne 1
  lcd.print(" < En attente > "); // Efface la deuxième ligne
}

void loop() {
  debut = 0;
  fin = 0;
  // Boucle capteur Début
  while (debut == 0 ) {
    lect = analogRead (VoieDebut); // Lis la tension de la broche
    if ( lect < 200 ) { // Si la tension est supérieur à 1 Volt
      Sens=1; // Sens Avant
      debut = 1; // Consigne pour sortir du While
    }
    lect = analogRead (VoieFin); // Lis la tension de la broche
    if ( lect < 200 ) { // Si la tension est supérieur à 1 Volt
      Sens=2; // Sens Arrière
      debut = 1; // Consigne pour sortir du While
    }
    if ( debut == 1) { // Exécution du script d'affichage "Détection train"
      Tdebut = millis ();
      if (Sens==1){
        lcd.createChar(1, e_aigu); // Mémorise le caractère spécial (e exposant)
        lcd.setCursor(0, 1); // Positionne le curseur ligne 2 colonne 1
        lcd.print("D"); // Efface la deuxième ligne
        lcd.setCursor(1, 1); // Positionne le curseur ligne 2 colonne 2
        lcd.write(byte(1)); // Ecrit le caractère spécial (é)
        lcd.setCursor(2, 1); // Positionne le curseur ligne 2 colonne 3
        lcd.print("tection train"); // Ecrit la suite du texte
      }
      else{
        lcd.setCursor(0, 1); // Positionne le curseur ligne 2 colonne 1
        lcd.print("Train contresens"); // Efface la deuxième ligne
      }
      Compteur = 0; // initiation du compteur
    }
  }
  // Boucle capteur Fin
  while (fin == 0 ) {
    if (millis() - timer > 995) {// si 995 ms se sont écoulées - ajouter une seconde à la variable Compteur
      timer = millis();
      Compteur++;
    }
    if (Compteur >= Delais){ // attente xx secondes (voir ligne 34) selon délais paramètré pour sortir de l'attente
      goto FinAttente; // Sortie de la boucle
    }
    if (Sens==1){ // Sens Avant
      lect = analogRead (VoieFin); // Lis la tension de la broche
      if ( lect < 200 ) { // Si la tension est supérieur à 1 Volt
        Tfin = millis ();
        fin = 1;
      }
    }
    if (Sens==2){ // Sens Arrière
      lect = analogRead (VoieDebut); // Lis la tension de la broche
      if ( lect < 200 ) { // Si la tension est supérieur à 1 Volt
        Tfin = millis ();
        fin = 1;
      }
    }
  } 
  Temps = Tfin - Tdebut; // Calcule le temps entre Fin et Début
  Vitesse = Coef * Distance / Temps; // Calcule la vitesse avec le coefficient d'échelle
  lcd.setCursor(0, 1); // Positionne le curseur ligne 2 colonne 1
  lcd.print("                "); // Efface la 2ème ligne (16 espaces)
  lcd.setCursor(1, 1); // Repositionne le curseur ligne 2 colonne 2
  lcd.print(Vitesse); // Ecrit la vitesse calculée
  lcd.setCursor(8, 1); // Repositionne le curseur ligne 2 colonne 9
  lcd.print("Km/h"); // Ecrit
  delay (5000); // Affichage pendant 5 secondes
  FinAttente: // Sortie de la boucle ligne 117
  lcd.setCursor(0, 1); // Positionne le curseur ligne 2 colonne 1
  lcd.print(" < En attente > "); // Efface la deuxième ligne
}