Construire une Centrale DCC Numérique pour Modélisme Ferroviaire avec Arduino – Application Android Gratuite Incluse

// 1 Sep 2019 - Sketch pour App 'Locomotive DCC' avec LMD18200
// Lecture/écriture CV ajoutée
#include 
SoftwareSerial bluetooth(8,9); // RX, TX

int C, sensorValue;
long t=0, lastmillis=0, interval=1000;
String inString;
int a[8];
int preamable_type = 0;
int Address;
float CV_VAL, cv_val, cv_val0, cv_val1, cv_val2, cv_val3, cv_val4, cv_val5, cv_val6, cv_val7;
int test_num, cv_write_val, Cs;
boolean cv_logic, ok;
int num;

#define TIMER_SHORT 0x8D  // 58 µs
#define TIMER_LONG  0x1B  // 116 µs
unsigned char last_timer=TIMER_SHORT, flag=0, every_second_isr=0;

#define PREAMBLE 0
#define SEPERATOR 1
#define SENDBYTE 2
unsigned char state=PREAMBLE, preamble_count=16, outbyte=0, cbit=0x80;

unsigned char xdata=0, data=0, data_f=0, data_f1=0, data_f2=0;
int locoAdr = 9;

struct Message { unsigned char data[7]; unsigned char len; };
#define MAXMSG 3
struct Message msg[MAXMSG] = {
  { {0xFF,0,0xFF,0,0,0,0}, 3 },  // Idle
  { {locoAdr,0,0,0,0,0,0}, 3 }   // Loco speed 128 steps
};
int msgIndex=0, byteIndex=0;

void SetupTimer2() {
  TCCR2A = 0;
  TCCR2B = (0<=MAXMSG) msgIndex=0; byteIndex=0; }
        break;
      case SEPERATOR:
        flag=0; state=SENDBYTE; cbit=0x80; outbyte=msg[msgIndex].data[byteIndex];
        break;
      case SENDBYTE:
        flag = (outbyte & cbit) ? 1 : 0;
        cbit >>= 1;
        if (cbit==0) {
          byteIndex++;
          if (byteIndex >= msg[msgIndex].len) {
            state=PREAMBLE;
            preamble_count = (preamable_type==0)?16:24;
          } else state=SEPERATOR;
        }
        break;
    }
    latency = TCNT2;
    TCNT2 = latency + (flag ? TIMER_SHORT : TIMER_LONG);
    last_timer = flag ? TIMER_SHORT : TIMER_LONG;
  }
}

void setup() {
  Serial.begin(115200);
  analogReference(INTERNAL);
  pinMode(13,OUTPUT);
  bluetooth.begin(9600);
  delay(500);
  Serial.println("Bluetooth Started");
  bluetooth.println("Bluetooth Started");
  DDRD = B01100000;
  SetupTimer2();
  t = millis(); lastmillis = millis();
  digitalWrite(6,LOW); digitalWrite(13,HIGH); // Bridge OFF
  int get_cv_val = cv_calc(test_num);
}

void current() {
  int value=0;
  for(int i=0;i<5;i++) { value+=analogRead(A0); delay(1); }
  sensorValue = value/5;
  C = 10.8 * sensorValue; // mA
  if (C>2000) {
    Serial.println("Over Current");
    bluetooth.println("Short!");
    digitalWrite(6,LOW); digitalWrite(13,HIGH);
    bluetooth.println(C);
  }
}

void loop() {
  if (bluetooth.available()) { inString = bluetooth.readStringUntil('\n'); Serial.println(inString); }
  if (inString.substring(0,1)=="D") { string(); }
  if (inString.substring(0,1)=="C") { digitalWrite(6,HIGH); digitalWrite(13,LOW); } // Reset surintensité
  if (inString.substring(0,1)=="G") { digitalWrite(6,HIGH); digitalWrite(13,LOW); current(); bluetooth.println(C); }
  if (inString.substring(0,1)=="A") { digitalWrite(6,HIGH); digitalWrite(13,LOW); get_cv_data(); cv1_prog(); digitalWrite(6,LOW); digitalWrite(13,HIGH); }
  if (inString.substring(0,3)=="get") { cv_val=0; digitalWrite(6,HIGH); digitalWrite(13,LOW); get_cv_num(); cv_read(); digitalWrite(6,LOW); digitalWrite(13,HIGH); }
  if (inString.substring(0,3)=="add") { cv_write_val=0; digitalWrite(6,HIGH); digitalWrite(13,LOW); get_cv_new_val(); repeat_cv_write(); digitalWrite(6,LOW); digitalWrite(13,HIGH); }
  if (inString.substring(0,1)=="V") { delay(50); bluetooth.print("CV1 updated"); Serial.println(Address); }
  if (inString.substring(0,1)=="E") { digitalWrite(6,LOW); digitalWrite(13,HIGH); } // E-Stop
  inString="";
}

// Fonctions de parsing, assemblage paquets DCC, lecture/écriture CV...
// (voir code source original pour l'intégralité : string(), amend_len3/4(), assemble_3/4_byte(),
//  cv_read(), cv_write(), cv_calc(), reset_packet(), page_preset_packet(), cv1_write_packet(),
//  cv_verify0/1_packet(), valid_packet(), repeat_cv_write(), get_cv_data(), get_cv_num(), get_cv_new_val())