Hintergrund: Ich benötigte einen Zähler, der periodisch eine Integer-Zahl in einem bestimmten Wertebereich ausgibt, damit ich aus einem Array von RGB-Farben im vorgebenen Intervall einen Farbe ausgeben kann. Die eigentliche Ansteuerung der RGB-Kanäle und der RGB-Array liegt in einer anderen Logik (viewtopic.php?f=65&t=2187 ).
Die vorliegende Logik
- zählt in einem vorgegebenen Wertebereich (Startwert bis Endwert),
- nach Ablauf einer bestimmten Zeit (Intervalldauer),
jeweils eine Integerzahl (Ausgang "Zähler") hoch.
Wird der Endwert erreicht, beginnt der Zähler wieder beim Startwert (ausser der Eingang "Schlaufe" wird auf FALSE gesetzt).
Über den Eingang "Reset" kann festgelegt werden, ob bei einem Neustart beim Anfangswert (Reset = TRUE) oder beim letzten Wert, der beim Stoppen der Logik erreicht worden ist, fortgesetzt werden soll.
Ein- und ausgeschaltet wird die Logik über den Eingang "Freigabe".
Code: Alles auswählen
/**
* Universalzähler (integer)
* Die Eingänge können entweder als Parameter mit konstanten Werten belegt werden oder als "echte" Eingänge von Objekten des TWS-Objektsystems gesteuert werden.
*
*/
{
"_Meta": { // Optional
"Description": "",
"Version": "1.00",
"Icon": "" // format: "data:image/svg+xml;base64,ENCODED_FILE"
},
"Input": [
["Startwert","Wert (integer), der als erstes ausgegeben wird ","$Start","a" ],
["Endwert","Wert (integer), der als letztes ausgegeben wird ","$Ende","a" ],
["Intervalldauer","in Sekunden","$Period","a"],
["Schlaufe","TRUE, sofern Endlosschlaufe gewünscht wird, ansonsten wird nach einem Durchgang gestoppt", "$Schlaufe","a"],
["Reset", "Falls TRUE, startet der Zähler nach Freigabe immber beim Startwert, sonst Fortsetzung beim letzten Wert", "$Reset", "a"],
["Freigabe", "Logik läuft nur, wenn dieser Eingang auf TRUE gesetzt ist", "$Freigabe", "a"]
],
"Output": [
// ["Startwert","Z","$Startwert","a"],
["Zähler","Z","$Zaehler","a"]
],
"Module": [
["Clocksignal","$true",0,"$Period"], // Intervalltakter
["Break",["-$Freigabe"]], // Abbrechen, wenn Freigabe nicht auf TRUE
// Prüfen, ob Freigabe geändert hat und Zählerreset erforderlich wird
["And",["$false"],"$FreigabeWechsel"], //Freigabewechsel auf FALSE setzen
["Latch","$true","$FreigabeWechsel","$Freigabe",3], // Prüfen, ob sich Freigabe geändert hat
["And",["$true", "$FreigabeWechsel", "$Reset"],"$ResetWert"], // Wenn Freigabewechsel und Reset TRUE, dann Reset gewünscht
["Latch","$Startwert","$Zaehler","$ResetWert",0], // wenn Reset gewünscht, dann Zaehler zurücksetzen
// Prüfen, ob Ende der Schlaufe erreicht ist
["Limiter","$Zaehler",0,"$Test",["$Ende", "$Ende"]], // Prüfen, ob Zaehler dem Endwert entspricht
//Prüfen, ob Abbruch, weil keine Dauerschlaufe
["And",["$Test","-$Schlaufe", "$true"],"$Schlaufestop"], //wenn Schlaufe durchlaufen (Test) und keine Dauerschlaufe gewünscht, dann TRUE
["Break",["$Schlaufestop"]], // Abbrechen, wenn Schlaufestop TRUE
["Latch","$Startwert","$Zaehler","$Test",0], // wenn Durchlauf erfolgt, Zaehler auf Startwert setzen
//Initialisierung des Startwerts
["Polynomial","$Z1","$Startwert",["$Start","-$Z1"]], // Startwert setzen, muss um 1 kleiner als Start sein, weil am Schluss Zaehler noch um 1 erhöht wird
//Zaehler erhöhen, wenn nötig
["Comparator", "$Zaehler","$Test", "$Startwert"], // Prüfen, ob Zaehler über Startwert liegt
["Latch","$Startwert","$Zaehler","-$Test",0], // wenn Bedingung nicht erfüllt, Zaehler auf Startwert setzen
["Polynomial","$Z1","$Zaehler",["$Zaehler","$Z1"]] // Zaehler um 1 erhöhen und ausgeben
],
"Level": [
["$true","bool",true],
["$false","bool",false],
["$Test","bool", false],
["$Schlaufe","bool", false],
["$Schlaufewert","bool", false],
["$Schlaufestop","bool", false],
["$Durchgelaufen","bool", false],
["$Freigabe","bool", false],
["$FreigabeWechsel","bool", false],
["$Reset","bool", false],
["$ResetWert","bool", false],
["$Stop","bool",false],
["$Start","integer",0],
["$Ende","integer",0],
["$Startwert","integer",0],
["$Endwert","integer",0],
["$Zaehler","integer",0],
["$Period","integer",0],
["$Out","integer",0],
["$Z0", "integer",0],
["$Z1", "integer",1],
["$Z2", "integer",2],
["$Z3", "integer",3],
["$Z4", "integer",4],
["$Z5", "integer",5],
["$Z6", "integer",6],
["$Z7", "integer",7],
["$Z8", "integer",8],
["$Z9", "integer",9]
]
}Diego