Howto - zentrales Beschattungssteuerungsprogramm zBSP (per zPNP)

[dtp]

Danke für die Rückmeldung.

Dann wundert mich etwas, dass die Version 1.3beta bei dir nicht funktioniert.

Hab übrigens die 2.0beta bei mir laufen, mit der man die Parameter in einer Systemvariablen abspeichern und innerhalb eines definierbaren Zeitfensters wieder laden kann. Das funktioniert auch soweit. Weiß aber noch nicht wirkich, ob das einen praktischen Nutzen hat.

Sieht recht unscheinbar aus, oder?

Hier die zugehörige Systemvariablen.

Mehr dazu, wenn die 2.0 online geht. Jetzt lass uns erst mal die 1.3 in trockene Tücher bringen.

[MartinBr]

Okay,
dann warte ich die Version 1.3 ab.

Viel Erfolg.

Gruß
Martin

[dtp]

dann warte ich die Version 1.3 ab.

Das ist im Moment die Beta.

Und mit der sollte es eigentlich schon funktionieren.

Lösche doch mal bitte die von dem zBSS angelegten Systemvariablen, führe dann das zBSP mit der Version 1.3beta des zBSS noch mal manuell aus und teste das zBSP dann über das aufrufende Skript in "Skript testen".

[MartinBr]

Hallo Thorsten,

ich habe die 1.3Beta eingespielt, alle Variablen gelöscht und das Script gestartet.

Als Testscript habe ich folgendes Script

Code: Alles auswählen

! Beschattungsgeräte steuern durch Aufruf des zBSP

! +++++ Liste der Beschattungsgeräte, Behanghöhen bzw. Ausfahrwerte und Korrekturwert für geöffnete bzw. gekippte Fenster und Türen +++++
! Stets nach dem Muster "Beschattungsgerät|Behanghöhe|Korrekturwert(tilt_open_) Bediensperre(lock/unlock)|Auslösebedingung(ne/gt/ge/lt/le)\t
!                       "Beschattungsgerät|Behanghöhe|Korrekturwert(tilt_open_) Bediensperre(lock/unlock)|Auslösebedingung(ne/gt/ge/lt/le)" 
! ausfüllen (trennen mit "\t"). 
! Auslösebedingung für den Vergleich von Soll- und Ist-Wert
! -> ne: Soll <> Ist | gt: Soll > Ist | ge: Soll >= Ist | lt: Soll < Ist | le: Soll <= Ist
! Für gesamtes Beschattungsgewerk Aufruf per blindsList = (dom.GetObject(ID_FUNCTIONS).Get("Beschattung")).EnumUsedNames();
! -> dann muss aber blindsGlobalValues gesetzt sein.
!  -> dann muss aber blindsGlobalValues gesetzt sein.
string blindsList = "HWR Fenster Rollladen|50|open100|ne\t
                     Ankleidezimmer Fenster Rollladen|50|open100|ne";

! +++++ Globale Werte für Behanghöhen bzw. Ausfahrwerte und Korrekturwert für geöffnete bzw. gekippte Fenster und Türen +++++
! Wenn gesetzt, sind keine lokalen Werte in blindsList notwendig bzw. werden ignoriert 
! Stets nach dem Muster "Behanghöhe|Korrekturwert(tilt_open_)|Auslösebedingung(ne/gt/ge/lt/le)\t
!                        Behanghöhe|Korrekturwert(tilt_open_)|Auslösebedingung(ne/gt/ge/lt/le)" 
! ausfüllen (trennen mit "\t").
! Für TESTLAUF in Parameter Behanghöhe "test" einfügen.
string blindsGlobalValues = ""; !"" zur Berücksichtigung der lokalen Werte in "blindsList"

! +++++ Zusatzinformation, die als Push-Nachricht versendet werden soll +++++  
string blindsMessage = "Rolle HWR auf 50% - TEST"; ! "--" zur Unterdrückung von Push-Nachrichten

! +++++ Namen der für die Beschattung benötigten Systemvariablen gem. zeBeS +++++
string svBlindsList = "CCU SV Beschattung Liste"; ! Liste der Beschattungsgeräte, obligatorisch
string svBlindsGlobalValues = "CCU SV Beschattung Globalwerte"; ! Globale Werte für Behanghöhen, Ausfahrwerte und Offsets, optional
string svBlindsMessage = "CCU SV Beschattung Nachricht"; ! Beschattung Nachricht, optional

! +++++ Name des zentralen Programms zur Beschattungssteuerung zBSP +++++
string zBSP = "CCU PRG Beschattung";

! #####################################################################
! ##### ab hier bitte keine weiteren Einstellungen mehr vornehmen #####
! #####################################################################

(dom.GetObject(ID_SYSTEM_VARIABLES).Get(svBlindsList)).State(blindsList);
(dom.GetObject(ID_SYSTEM_VARIABLES).Get(svBlindsGlobalValues)).State(blindsGlobalValues);
(dom.GetObject(ID_SYSTEM_VARIABLES).Get(svBlindsMessage)).State(blindsMessage);

! +++++ zBSP ausführen +++++
(dom.GetObject(ID_PROGRAMS).Get(zBSP)).ProgramExecute();

Es müssten beide Rollladen auf 50% runterfahren.
Ergebnis: Keine Reaktion!

Was mache ich falsch? Die Tests mit den Testscriptes waren ja erfolgreich

Gruß
Martin

[dtp]

Hallo Martin,

kannst du mir noch einen Screenshot der Systemvariablen senden, oder werden die gar nicht erst beschrieben?

Bekommst du eine Push-Nachricht?

[MartinBr]

Hallo Thorsten,

anbei die Variablen. In der Pushnachricht (habe ich gerade erst gelesen) steht immer Testlauf. Ich weiß nicht mehr, wo ich das eingeben habe???
Ich schaue mit das noch einmal an.

Edit:
Hier der Code des Testprogramms:

Code: Alles auswählen

! Beschattungsgeräte steuern durch Aufruf des zBSP

! +++++ Liste der Beschattungsgeräte, Behanghöhen bzw. Ausfahrwerte und Korrekturwert für geöffnete bzw. gekippte Fenster und Türen +++++
! Stets nach dem Muster "Beschattungsgerät|Behanghöhe|Korrekturwert(tilt_open_) Bediensperre(lock/unlock)|Auslösebedingung(ne/gt/ge/lt/le)\t
!                       "Beschattungsgerät|Behanghöhe|Korrekturwert(tilt_open_) Bediensperre(lock/unlock)|Auslösebedingung(ne/gt/ge/lt/le)" 
! ausfüllen (trennen mit "\t"). 
! Auslösebedingung für den Vergleich von Soll- und Ist-Wert
! -> ne: Soll <> Ist | gt: Soll > Ist | ge: Soll >= Ist | lt: Soll < Ist | le: Soll <= Ist
! Für gesamtes Beschattungsgewerk Aufruf per blindsList = (dom.GetObject(ID_FUNCTIONS).Get("Beschattung")).EnumUsedNames();
! -> dann muss aber blindsGlobalValues gesetzt sein.
!  -> dann muss aber blindsGlobalValues gesetzt sein.
string blindsList = "HWR Fenster Rollladen|50|open100|ne\t
                     Ankleidezimmer Fenster Rollladen|50|open100|ne";

! +++++ Globale Werte für Behanghöhen bzw. Ausfahrwerte und Korrekturwert für geöffnete bzw. gekippte Fenster und Türen +++++
! Wenn gesetzt, sind keine lokalen Werte in blindsList notwendig bzw. werden ignoriert 
! Stets nach dem Muster "Behanghöhe|Korrekturwert(tilt_open_)|Auslösebedingung(ne/gt/ge/lt/le)\t
!                        Behanghöhe|Korrekturwert(tilt_open_)|Auslösebedingung(ne/gt/ge/lt/le)" 
! ausfüllen (trennen mit "\t").
! Für TESTLAUF in Parameter Behanghöhe "test" einfügen.
string blindsGlobalValues = ""; !"" zur Berücksichtigung der lokalen Werte in "blindsList"

! +++++ Zusatzinformation, die als Push-Nachricht versendet werden soll +++++  
string blindsMessage = "Rolle HWR auf 50% - TEST"; ! "--" zur Unterdrückung von Push-Nachrichten

! +++++ Namen der für die Beschattung benötigten Systemvariablen gem. zeBeS +++++
string svBlindsList = "CCU SV Beschattung Liste"; ! Liste der Beschattungsgeräte, obligatorisch
string svBlindsGlobalValues = "CCU SV Beschattung Globalwerte"; ! Globale Werte für Behanghöhen, Ausfahrwerte und Offsets, optional
string svBlindsMessage = "CCU SV Beschattung Nachricht"; ! Beschattung Nachricht, optional

! +++++ Name des zentralen Programms zur Beschattungssteuerung zBSP +++++
string zBSP = "CCU PRG Beschattung";

! #####################################################################
! ##### ab hier bitte keine weiteren Einstellungen mehr vornehmen #####
! #####################################################################

(dom.GetObject(ID_SYSTEM_VARIABLES).Get(svBlindsList)).State(blindsList);
(dom.GetObject(ID_SYSTEM_VARIABLES).Get(svBlindsGlobalValues)).State(blindsGlobalValues);
(dom.GetObject(ID_SYSTEM_VARIABLES).Get(svBlindsMessage)).State(blindsMessage);

! +++++ zBSP ausführen +++++
(dom.GetObject(ID_PROGRAMS).Get(zBSP)).ProgramExecute();

Dort steht nur in der Message das Wort Test. Das kann es doch nicht gewesen sein, oder?

Gruß

Martin

[MartinBr]

Hallo Thorsten,
ich habe mal die Version 2.0Beta installiert und auch die neue Systemvariable angelegt.
Beim ersten Start wurde eine Pushnachricht verschickt, diesmal ohne "Testlauf".

Den nächsten Test mit den Rollos starte ich dann Morgen.

Gruß und Dank
Martin

[MartinBr]

Guten Morgen Thorsten,

ich habe den Test nun mit der 2.0 Beta gemacht. Kurze Rückmeldung: Hier hat sich kein Rollo gemeldet. Da die vorhergehenden Tests erfolgreich waren, muss ich einen grundlegenden Fehler machen.

Ich stelle hier noch einmal das Testscript ein und die Systemvariablen. Die Pushnachricht funktioniert, meldet aber immer "keine Auslösung".

Hier das Testscript:

Code: Alles auswählen

! Beschattungsgeräte steuern durch Aufruf des zBSP

! +++++ Liste der Beschattungsgeräte, Behanghöhen bzw. Ausfahrwerte und Korrekturwert für geöffnete bzw. gekippte Fenster und Türen +++++
! Stets nach dem Muster "Beschattungsgerät|Behanghöhe|Korrekturwert(tilt_open_) Bediensperre(lock/unlock)|Auslösebedingung(ne/gt/ge/lt/le)\t
!                       "Beschattungsgerät|Behanghöhe|Korrekturwert(tilt_open_) Bediensperre(lock/unlock)|Auslösebedingung(ne/gt/ge/lt/le)" 
! ausfüllen (trennen mit "\t"). 
! Auslösebedingung für den Vergleich von Soll- und Ist-Wert
! -> ne: Soll <> Ist | gt: Soll > Ist | ge: Soll >= Ist | lt: Soll < Ist | le: Soll <= Ist
! Für gesamtes Beschattungsgewerk Aufruf per blindsList = (dom.GetObject(ID_FUNCTIONS).Get("Beschattung")).EnumUsedNames();
! -> dann muss aber blindsGlobalValues gesetzt sein.
!  -> dann muss aber blindsGlobalValues gesetzt sein.
string blindsList = "Ankleidezimmer Fenster Rollladen|100|open100|ne\t
                    Badezimmer Fenster Rollladen|100|open100|ne\t
                    Gaestebad Fenster Rollladen|100|open100|ne\t
                    Gaestezimmer Fenster Rollladen|100|open100|ne\t
                    HWR Fenster Rollladen|100|open100|ne\t
                    Kueche Fenster Rollladen|100|open100|ne\t
                    Schlafzimmer Fenster Rollladen|100|open100|ne\t
                    Wohnzimmer Ost1 Fenster Rollladen|100|open100|ne\t
                    Wohnzimmer Ost2 Fenster Rollladen|100|open100|ne\t
                    Wohnzimmer Sued Fenster Rollladen|100|open100|ne";

! +++++ Globale Werte für Behanghöhen bzw. Ausfahrwerte und Korrekturwert für geöffnete bzw. gekippte Fenster und Türen +++++
! Wenn gesetzt, sind keine lokalen Werte in blindsList notwendig bzw. werden ignoriert 
! Stets nach dem Muster "Behanghöhe|Korrekturwert(tilt_open_)|Auslösebedingung(ne/gt/ge/lt/le)\t
!                        Behanghöhe|Korrekturwert(tilt_open_)|Auslösebedingung(ne/gt/ge/lt/le)" 
! ausfüllen (trennen mit "\t").
! Für TESTLAUF in Parameter Behanghöhe "test" einfügen.
string blindsGlobalValues = ""; !"" zur Berücksichtigung der lokalen Werte in "blindsList"

! +++++ Zusatzinformation, die als Push-Nachricht versendet werden soll +++++  
string blindsMessage = "Rolle HWR auf 50% "; ! "--" zur Unterdrückung von Push-Nachrichten

! +++++ Namen der für die Beschattung benötigten Systemvariablen gem. zeBeS +++++
string svBlindsList = "CCU SV Beschattung Liste"; ! Liste der Beschattungsgeräte, obligatorisch
string svBlindsGlobalValues = "CCU SV Beschattung Globalwerte"; ! Globale Werte für Behanghöhen, Ausfahrwerte und Offsets, optional
string svBlindsMessage = "CCU SV Beschattung Nachricht"; ! Beschattung Nachricht, optional

! +++++ Name des zentralen Programms zur Beschattungssteuerung zBSP +++++
string zBSP = "CCU PRG Beschattung";

! #####################################################################
! ##### ab hier bitte keine weiteren Einstellungen mehr vornehmen #####
! #####################################################################

(dom.GetObject(ID_SYSTEM_VARIABLES).Get(svBlindsList)).State(blindsList);
(dom.GetObject(ID_SYSTEM_VARIABLES).Get(svBlindsGlobalValues)).State(blindsGlobalValues);
(dom.GetObject(ID_SYSTEM_VARIABLES).Get(svBlindsMessage)).State(blindsMessage);

! +++++ zBSP ausführen +++++
(dom.GetObject(ID_PROGRAMS).Get(zBSP)).ProgramExecute();

Hier die Systemvariablen:

Gruß
Martin

[dtp]

Hm,

jetzt wird's leider ein bisschen komplizierter.

Kannst du mal das gesamte zBSS2.0beta unter "Skript testen" einfügen und dann hinter der Zeile

Code: Alles auswählen

else(trigger = false;)

ein

Code: Alles auswählen

WriteLine(trigger);

einfügen, das Skript anschließend testen und den Inhalt der Ausgabe hier posten. Da müsste dann ein "true" stehen.

Lasse dazu die Systemvariable "CCU SV Beschattung Liste" unverändert aber fahre am besten einige der Rollläden vor dem Test auf einen Wert < 100 %.

"Keine Auslösung" als Ausgabe heißt, dass die lokale Variable "trigger" auf false steht. Das könnte damit zu tun haben, dass die Auslösebedingung nicht erfüllt ist, oder dass es da im Skript noch ein Problem mit string und real der lokalen Variablen "blindValueActual" gibt.

Mich irritiert zudem, dass du überall "ne" als Auslösebedingung eingestellt hast, aber "gt" im Screenshot der Systemvariablen steht.

[MartinBr]

Interessant!
Vorbereitung: Ich HWR auf 50% gefahren, Testscript mit WriteLine(trigger); ergänzt.
Alle Rollos waren oben.

Ergebnis:
Alle Rollos bis auf das Ankleidezimmer (= BROLL) sind runtergefahren (=== 0%).

Hier die Ausgaben:

Das zBSP ist unverändert (Version 2.0Beta).
Zu deiner Frage: Ich hatte im Testscript zuerst gt stehen, habe es dann durch ne ersetzt und einen neuen Versuch gestartet.

Gruß
Martin