Skip to content

feat: Ajoute le mode Séquenceur de relais et sa documentation #8

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Open
tsabran wants to merge 1 commit into
base: main
Choose a base branch
from
Open

feat: Ajoute le mode Séquenceur de relais et sa documentation #8

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
1 commit
Select commit
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
13 changes: 13 additions & 0 deletions Actions.cpp
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -32,6 +32,8 @@ Action::Action(int aIdx) {
ExtValide = 0; //Condition Action externe
ExtHequiv = 0; //Duree heure *100 action externe
ExtOuvert = 0; //Pourcent ouverture
IdxSequenceur = -1; // Action autonome par defaut (pas de sequenceur parent)
PuissanceCharge = 0; // 0 => 1000 W par defaut lors de la distribution
for (int i = 0; i < 8; i++) {
Type[i] = 0; //0=NO(pas utilisé),1=OFF,2=ON,3=PW,4=Triac
Hdeb[i] = 0;
Expand All @@ -54,6 +56,10 @@ Action::Action(int aIdx) {


void Action::Arreter() {
if (Actif == 6) {
On = false;
return;
}
int Tseconde = int(millis() / 1000);
if ((Tseconde - T_LastAction) >= Tempo || Idx == 0 || Actif != 1) {
if (Gpio > 0) {
Expand All @@ -73,6 +79,10 @@ void Action::Arreter() {
}
}
void Action::RelaisOn() {
if (Actif == 6) {
On = true;
return;
}
int Tseconde = int(millis() / 1000);
if ((Tseconde - T_LastAction) >= Tempo) {
if (Gpio > 0) {
Expand All @@ -95,6 +105,7 @@ void Action::RelaisOn() {
}
}
void Action::Prioritaire() {
if (Actif == 6) return;
int tempo_ = Tempo;
if (tOnOff != 0) {
Tempo = 0;
Expand Down Expand Up @@ -226,6 +237,7 @@ void Action::InitGpio(int FreqPWM) { //Initialise les sorties GPIO pour des rel
if (Idx > 0) {
T_LastAction = 0;
Gpio = -1;
if (Actif == 6) return; // Séquenceur: neutralise explicitement la pin puis quitte
p = OrdreOn.indexOf(IS);
if (p >= 0) {
Gpio = OrdreOn.substring(0, p).toInt();
Expand All @@ -243,6 +255,7 @@ void Action::InitGpio(int FreqPWM) { //Initialise les sorties GPIO pour des rel
}
}
void Action::CallExterne(String host, String url, int port) {
if (Actif == 6) return;
if (url != "") {
// Use WiFiClient class to create TCP connections
WiFiClient clientExt;
Expand Down
3 changes: 3 additions & 0 deletions Actions.h
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -56,6 +56,9 @@ class Action {

bool On, PID;
float H_Ouvre;
// Séquenceur de relais (MODE_SEQUENCEUR=6)
int IdxSequenceur; // -1: action autonome, >=0: index du séquenceur parent
int PuissanceCharge; // Puissance nominale (W), 0 => valeur par défaut 1000 W
byte Type[8]; //0=NO(pas utilisé),1=OFF,2=ON,3=PW,4=Triac
int16_t Hdeb[8];
int16_t Hfin[8];
Expand Down
174 changes: 121 additions & 53 deletions JS_Actions.h
View file
Open in desktop

Large diffs are not rendered by default.

148 changes: 109 additions & 39 deletions Solar_Router_V17_16.ino
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -49,7 +49,7 @@
Relance découverte MQTT toutes les 5mn
Re-écriture de la surveillance par watchdog suite au changement de bibliothèque 3.0.x carte ESP32
Estimation temps equivalent d'ouverture max du Triac et relais cumulée depuis 6h du matin. Prise en compte de la puissance en sin² du mode découpe
Correction d'un bug de syntaxe non détecté par le compilateur depuis la version V9 affectant les communications d'un ESP esclave vers le maître
Correction d'un bug de syntaxe non détecté par le compilateur depuis la version V9 affectant les communications d'un ESP secondaire vers l'ESP principal
Affichage de l'occupation RAM
- V11.10
Nouvelle source de mesure Shelly Pro Em
Expand Down Expand Up @@ -202,7 +202,7 @@
- V16.00
Introduction du filtrage PID
- V16.01
Possibilité de choisir un routeur maître en Horloge
Possibilité de choisir un routeur principal en Horloge
Correction bug affichage Action
Blocage integrateur I du PID à 50 si non utilisé
- V16.02
Expand Down Expand Up @@ -289,7 +289,12 @@
- Version 17.16
Introduction écran 3.2 pouces ESP32-2432S032C capacitif
Correction bug sur curseurs avec Firefox

- Version 17.17
Nouveau mode Séquenceur de relais (MODE_SEQUENCEUR=6) : distribution séquentielle de la puissance sur
un groupe de charges résistives pilotées par des SSR séparés pour réduire les harmoniques.
Un séquenceur virtuel (PID sans GPIO) distribue son ouverture vers N relais gérés selon une
formule staircase pondérée par la puissance nominale de chaque charge.

Les détails sont disponibles sur / Details are available here:
https://f1atb.fr Section Domotique / Home Automation

Expand Down Expand Up @@ -365,6 +370,7 @@
#define MODE_TRAINSINUS 3
#define MODE_PWM 4
#define MODE_DEMISINUS 5
#define MODE_SEQUENCEUR 6 // Séquenceur de relais : PID virtuel sans GPIO, distribue l'ouverture sur ses relais gérés



Expand Down Expand Up @@ -801,7 +807,7 @@ void IRAM_ATTR GestionIT_10ms() {
for (int i = 0; i < NbActions; i++) {
switch (Actif[i]) { //valeur en RAM
case MODE_INACTIF: //Inactif

case MODE_SEQUENCEUR: //Inactif
break;
case MODE_DECOUPE_ONOFF: //Decoupe Sinus uniquement pour Triac
if (i == 0) {
Expand Down Expand Up @@ -1673,6 +1679,46 @@ void loop() {
// ************
// * ACTIONS *
// ************

// Applique Retard[idx] aux variables ISR (PulseOn, PulseTotal, RelaisOn/Arreter)
// selon le mode de régulation de l'action. Appelé après tout calcul de Retard[],
// aussi bien dans la boucle principale que dans la passe de distribution du séquenceur.
void AppliquerRetard(int idx) {
if (Retard[idx] == 100) { // Force en cas d'arret des IT
LesActions[idx].Arreter();
PulseOn[idx] = 0; //Stop Triac ou relais
} else {
switch (Actif[idx]) { //valeur en RAM du Mode de regulation
case MODE_DECOUPE_ONOFF: // Découpe Sinus (Triac) ou On/Off (relais)
if (idx > 0) LesActions[idx].RelaisOn(); // idx==0 est le Triac, piloté par l'ISR ZC
break;
case MODE_MULTISINUS: // Multi Sinus
PulseOn[idx] = tabPulseSinusOn[100 - Retard[idx]];
PulseTotal[idx] = tabPulseSinusTotal[100 - Retard[idx]];
if (PulseComptage[idx] >= PulseTotal[idx]) PulseComptage[idx] = 0;
break;
case MODE_TRAINSINUS: // Train de Sinus
PulseOn[idx] = 100 - Retard[idx];
PulseTotal[idx] = 99; // Nombre impair pour éviter courant continu
if (testTrame > 0) { // Mode test de mesure de puissance
PulseOn[idx] = testPulse;
PulseTotal[idx] = testTrame;
}
break;
case MODE_PWM: { //PWM
int Vout_pwm = int(RetardF[idx] * 2.55f);
if (OutOn[idx] == 1) Vout_pwm = 255 - Vout_pwm;
ledcWrite(Gpio[idx], Vout_pwm);
break;
}
case MODE_DEMISINUS: // Demi-Sinus
PulseOn[idx] = 100 - Retard[idx]; // Avance de phase
if (PulseTotal[idx] > 1) PulseTotal[idx] = 0; // 0/1 = mémorise le signe du dernier demi-sinus (phase230V dernier pulse)
break;
}
}
}

void GestionOverproduction() { // chaque 200ms (adaptation 5 fois par seconde)
float SeuilPw, ErrorPw = 0, Derive = 0;
float MaxTriacPw;
Expand All @@ -1681,8 +1727,6 @@ void GestionOverproduction() { // chaque 200ms (adaptation 5 fois par seconde)
int LeCanalTemp;
bool forceOff;
bool lissage = false;
int Vout;
int pos = 0;
//Puissance est la puissance en entrée de maison. >0 si soutire. <0 si injecte
//Cas du Triac. Action 0

Expand All @@ -1692,6 +1736,7 @@ void GestionOverproduction() { // chaque 200ms (adaptation 5 fois par seconde)
for (int i = 0; i < NbActions; i++) {
Actif[i] = LesActions[i].Actif; //0=Inactif,1=Decoupe ou On/Off, 2=Multi, 3= Train , 4=PWM, 5=Demi-Sinus
if (Actif[i] == MODE_MULTISINUS || Actif[i] == MODE_TRAINSINUS || Actif[i] == MODE_DEMISINUS) lissage = true; //En RAM
if (LesActions[i].IdxSequenceur >= 0) continue; // Relais séquencé : skip PID, géré par la passe de distribution
forceOff = false;

LeCanalTemp = LesActions[i].CanalTempEnCours(HeureCouranteDeci);
Expand Down Expand Up @@ -1757,43 +1802,67 @@ void GestionOverproduction() { // chaque 200ms (adaptation 5 fois par seconde)
snprintf(buffer, sizeof(buffer), "Ecart= %4.0fW Retard= %3u P= %4.1f I= %4.1f D= %4.1f", ErrorPw, Retard[i], Propor[i], IntegrErrorPw[i], DeriveF[i]);
TelnetPrintln(String(buffer));
}
if (Retard[i] == 100) { // Force en cas d'arret des IT
LesActions[i].Arreter();
PulseOn[i] = 0; //Stop Triac ou relais
} else {
AppliquerRetard(i);
}
// --- Distribution séquenceur : calcul des Retard[] des relais gérés depuis leur séquenceur ---
// Note : idxRelaisGeres, puissRelais et puissTotale sont recalculés à chaque appel (200 ms)
// plutôt que mis en cache. Le coût estimé est ~1-2 µs par cycle soit < 0,001 % du
// temps CPU, négligeable face au PID float (~5 µs/action) et au stack WiFi (>> 100 µs).
// Un cache nécessiterait +400 octets de RAM et un mécanisme d'invalidation sur
// chaque sauvegarde de paramètres — complexité disproportionnée au gain.
for (int iSeq = 0; iSeq < NbActions; iSeq++) {
if (LesActions[iSeq].Actif != MODE_SEQUENCEUR) continue;
// Collecter les relais gérés et la puissance totale du groupe
int idxRelaisGeres[LES_ACTIONS_LENGTH];
int puissRelais[LES_ACTIONS_LENGTH];
int nbRelaisGeres = 0;
int puissTotale = 0;
for (int j = 0; j < NbActions; j++) {
if (LesActions[j].IdxSequenceur == iSeq) {
idxRelaisGeres[nbRelaisGeres] = j;
int p = (LesActions[j].PuissanceCharge > 0) ? LesActions[j].PuissanceCharge : 1000;
puissRelais[nbRelaisGeres] = p;
puissTotale += p;
nbRelaisGeres++;
}
}
if (nbRelaisGeres == 0 || puissTotale == 0) continue;
// ouvertureGroupe = fraction de la puissance totale du groupe demandée [0.0 .. 1.0]
float t = 1.0f - (RetardF[iSeq] / 100.0f);
// Distribution pondérée en staircase
float puissCumul = 0.0f;
for (int r = 0; r < nbRelaisGeres; r++) {
int j = idxRelaisGeres[r];
float fracPuiss = float(puissRelais[r]) / float(puissTotale);
float seuil = puissCumul / float(puissTotale);
float ouverture = constrain((t - seuil) / fracPuiss, 0.0f, 1.0f);
puissCumul += puissRelais[r];
RetardF[j] = (1.0f - ouverture) * 100.0f;

// Forçage local d'un relais séquencé : prioritaire sur la distribution du séquenceur parent.
if (LesActions[j].tOnOff > 0) {
RetardF[j] = 100.0f - float(LesActions[j].ForceOuvre); // Force On avec ouverture limitée
} else if (LesActions[j].tOnOff < 0) {
RetardF[j] = 100.0f; // Force Off
}

switch (Actif[i]) { //valeur en RAM du Mode de regulation
case MODE_DECOUPE_ONOFF: //Decoupe Sinus pour Triac ou On/Off pour relais
if (i > 0) LesActions[i].RelaisOn();
break;
case MODE_MULTISINUS: // Multi Sinus
PulseOn[i] = tabPulseSinusOn[100 - Retard[i]];
PulseTotal[i] = tabPulseSinusTotal[100 - Retard[i]];
pos = PulseComptage[i];
if (pos >= PulseTotal[i]) {
PulseComptage[i] = 0;
}
break;
case MODE_TRAINSINUS: // Train de Sinus
PulseOn[i] = 100 - Retard[i];
PulseTotal[i] = 99; //Nombre impair pour éviter courant continu
if (testTrame > 0) {
PulseOn[i] = testPulse; //mode Test mesure de Puissance
PulseTotal[i] = testTrame; //
}
break;
case MODE_PWM: //PWM
Vout = int(RetardF[i] * 2.55);
if (OutOn[i] == 1) Vout = 255 - Vout;
ledcWrite(Gpio[i], Vout);
break;
case MODE_DEMISINUS: // Demi-Sinus
PulseOn[i] = 100 - Retard[i]; //Avance de phase
if (PulseTotal[i] > 1) PulseTotal[i] = 0; //0 ou 1 pour mémoriser phase230V dernier pulse
break;
Retard[j] = round(RetardF[j]);
if (RetardVx == j) { //Affiche calcul distribution des retards port série ou Telnet
char buffer[80];
snprintf(buffer, sizeof(buffer),
"[relais %d <- seq %d] GroupeOuv= %.2f%% SeuilDemarrage= %.2f%% FractionGroupe= %.2f%% RelaisOuv= %.2f%% Retard= %d",
j, iSeq,
t * 100.0f,
seuil * 100.0f,
fracPuiss* 100.0f,
ouverture* 100.0f,
Retard[j]);
TelnetPrintln(String(buffer));
}
AppliquerRetard(j);
}
}

LissageLong = lissage;
//Sortie vers port Série ou Telnet
if (dispPw || dispAct) {
Expand All @@ -1815,6 +1884,7 @@ void InitGPIOs() {
if (ESP32_Type > 0) {
//En premier pour affecter le GPIO au constructeur OneWire
for (int i = 1; i < NbActions; i++) {
if (LesActions[i].Actif == MODE_SEQUENCEUR) continue;
LesActions[i].InitGpio(Fpwm);
Gpio[i] = LesActions[i].Gpio;
OutOn[i] = LesActions[i].OutOn;
Expand Down
4 changes: 4 additions & 0 deletions Stockage.ino
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -303,6 +303,8 @@ void DeserializeConfiguration(String json) {
LesActions[iAct].PID = obj["PID"];
}
LesActions[iAct].ForceOuvre = !obj["ForceOuvre"].isNull() ? obj["ForceOuvre"] : 100;
LesActions[iAct].IdxSequenceur = !obj["IdxSequenceur"].isNull() ? (int)obj["IdxSequenceur"] : -1;
LesActions[iAct].PuissanceCharge = !obj["PuissanceCharge"].isNull() ? (int)obj["PuissanceCharge"] : 0;
LesActions[iAct].NbPeriode = obj["NbPeriode"];

Hdeb = 0;
Expand Down Expand Up @@ -432,6 +434,8 @@ String SerializeConfiguration() {
obj["OrdreOn"] = LesActions[iAct].OrdreOn;
obj["OrdreOff"] = LesActions[iAct].OrdreOff;
obj["ForceOuvre"] = LesActions[iAct].ForceOuvre;
obj["IdxSequenceur"] = LesActions[iAct].IdxSequenceur;
obj["PuissanceCharge"] = LesActions[iAct].PuissanceCharge;
obj["Repet"] = LesActions[iAct].Repet;
obj["Tempo"] = LesActions[iAct].Tempo;
obj["Kp"] = LesActions[iAct].Kp;
Expand Down
Loading