Bewegungsmelder und dimmen

[2P4u]

Hallo Leute.
Ich versuche gerade meine Lichtschaltung im Flur mit einem Bewegungsmelder und einem Dimmer zu optimieren.
Nun habe ich den Code weitestgehend fertig, jedoch habe ich noch 2 Fragen, hier mal der Code:

Code Auswählen Erweitern

define Flurdimmen notify fl_Bewegungsmelder:on.* {\
my $hm = sprintf("%%02d:%%02d", $hour, $min);;\
if($hm >= "00:00" && $hm < "06:20") {\
fhem ("set fl_Licht1 dim30%%") }\
if($hm >= "06:20" && $hm < "10:00") {\
fhem ("set fl_Licht1 dim100%%") }\
if($hm >= "17:00" && $hm <= "23:59") {\
fhem ("set fl_Licht1 dim50%%") }\
}

1. Frage: Wie bekomme ich es hin das Licht wieder auszuschalten nach einer bestimmten Zeit?
2. Frage: Wie kann ich mit einem Taster im Flur (Flur_WT1) das Licht für 10min auf 100% einschalten (on for timer 640?)?

Für einen Denkanstoss wäre ich euch sehr dankbar.
Gruss Daniel

[free]

Hi,

hast du hier schon was ausgefunden?

Haette gerne auch die Funktion das wenn 10min keinr Bewegung ist das das Licht ausgemacht wird,
komm aber nicht dahin wie ich das Realisiere bekomm.

Gruß Free

[2P4u]

Ja ich hab das so gelösst. Ist aber noch nicht 100% wie ich es haben möchte:

Code Auswählen Erweitern

fl_Bewegungsmelder:on.* {
my $hm = sprintf("%%02d:%%02d", $hour, $min);;
if($hm > "00:00" && $hm < "06:20") {
fhem ("set fl_Licht1 dim31%%") }
if($hm > "06:20" && $hm < "10:00") {
fhem ("set fl_Licht1 dim100%%") }
if($hm > "16:00" && $hm <= "23:59") {
fhem ("set fl_Licht1 dim68%%") }
fhem("define LichtFlur_aus at +00:02:30 set fl_Licht1 off");
fhem("define BewegungsmelderFlur_Aus at +00:01:00 set fl_Beweungsmelder off");
}