ich habe in meiner Visualisierung unter Homeputer Studio einen Schalter mit dem ich die komplette Beleuchtung der Etage Ein und Ausschalten kann. Es handelt sich hierbei um das Objekt SchalterLampenZentralOG (Typ Schalter, Senden auch bei Zuweisung ohne Änderung aktiviert) mit folgendem MAkro:
Code: Alles auswählen
Wenn SchalterZentralLampenOG eingeschaltet dann
HutschienenschalterTreppenhausOG einschalten
HutschienenschalterDieleNeubau einschalten
HutschienendimmerDieleAltbau:=16
Fernbedienung_WohnungOG2.Dimmwert:=16
HutschienenschalterEsszimmer einschalten
LampeDeckenfluterWohnzimmer:=16
Fernbedienung_WohnungOG4.Dimmwert:=16
HutschienendimmerMalte:=16
SchalterMalte2.Dimmwert:=16
LampeBadOG einschalten
WandlampeLenaBett einschalten
LampeLena:=16
FernbedienungLena2.Dimmwert:=16
SchalterLena2.Dimmwert:=16
WandlampeLena:=16
FernbedienungLena1.Dimmwert:=16
SchalterLena4.Dimmwert:=16
LampeBalkon:=16
Fernbedienung_WohnungOG8.Dimmwert:=16
sonst
HutschienenschalterTreppenhausOG ausschalten
HutschienenschalterDieleNeubau ausschalten
HutschienendimmerDieleAltbau:=0
Fernbedienung_WohnungOG2.Dimmwert:=0
HutschienenschalterEsszimmer ausschalten
LampeDeckenfluterWohnzimmer:=0
Fernbedienung_WohnungOG4.Dimmwert:=0
HutschienendimmerMalte:=0
SchalterMalte1.Dimmwert:=0
LampeBadOG ausschalten
WandlampeLenaBett ausschalten
LampeLena:=0
FernbedienungLena2.Dimmwert:=0
SchalterLena1.Dimmwert:=0
WandlampeLena:=0
FernbedienungLena1.Dimmwert:=0
SchalterLena3.Dimmwert:=0
LampeBalkon:=0
Fernbedienung_WohnungOG8.Dimmwert:=0
endewenn
Mein Frau hatte nun den Wunsch, dass beim Verlassen des Hauses und dem Verriegeln der Aussentüren das Licht komplett ausgeht. Und ich sag noch, kein Problem...... Ich habe an meiner Haustür einen Taster, der die Aussentüren verriegelt. In dieses Makro habe ich dann das Ausschalten der Lampen realisiert (ObjekteSchalterLampen Zentral KG /EG und OG ausschalten). Anbei das Makro des Tasters an der Aussentür mit Namen SenderEG13 (Ausführung bei Empfang und Senden auch bei Zuweisung ohne Änderung aktiviert):
Code: Alles auswählen
HutschienenschalterTuerverschlus einschalten für "00:00:03"
LOGFile := "Aussentüren über Aussentaste verriegelt"
starte(LOGFile)
SchalterZentralLampenKG ausschalten
SchalterZentralLampenEG ausschalten
SchalterZentralLampenOG ausschalten
Wenn Uhrzeit zwischen "19:00:00" und "21:45:00" dann
RollladenKellergeschoss := "unten"
LOGFile := "Rolladen Kellergeschoss wurden automatisch über Aussentaste geschlossen"
starte(LOGFile)
endewenn
Wie stehe ich den nun bei meiner Frau da....
Danke
Funkmaus