Presence mit at

[schrader]

he Leute versuche schon seit stunden mir was zu recht zu basteln;-) aber leider klapt es nicht
Ich möchte wenn mein TV an(present) ist ,dass Die LED`s am tv an gehen aber erst ab 20:15, und mit absent vom TV das die LED`s wieder aus gehen.

Die anwesenheits erkennung funktioniert
Versuche es mit at und if, else oder ist es die falsche richtung

ich versuchs mal weiter aber wenn mir einer auf die sprünge helfen will sag ich schon mal danke..

[MisterEltako]

define LED-Steuerung notify TV:(present.*|absent.*){\
   my $now = ("%%d02:%%d02",$hour,$min);;\
   if ((Value("TV") eq "present) && ($now gt "20:15")) {\
      fhem("set LED on");;\
   }else{\
      fhem("set LED off");;\
   }\

MfG, MisterEltako

[justme1968]

stat

my $now = ("%%d02:%%d02",$hour,$min);;\

muss es

Code Auswählen Erweitern

my $now = sprintf("%%02d:%%02d",$hour,$min);;\heissen.

gruss
  andre

[schrader]

danke aber zumindestens kommt keine fehler meldung;-) nicht so wie bei mir

aber leider funktioniert es nicht weder mit present noch absent

habe natürlich die device angepasst
habe es erst mal auf mein handy umgeschrieben zum testen

hier noch mal wie es momentan in der cfg steht

define Film notify Sascha:(present.*|absent.*){\
my $now = sprintf("%%02d:%%02d",$hour,$min);;\
if ((Value("Sascha") eq "present) && ($now gt "20:15")) {\
fhem("set TV_LICHT on");;\
}else{\
fhem("set TV_Licht off");;\
}

define TV PRESENCE lan-ping 192.168.178.25
attr TV room Anwesend
define Sascha PRESENCE lan-ping 192.168.178.193
attr Sascha room Anwesend
define Nine PRESENCE lan-ping 192.168.178.180
attr Nine room Anwesend

[schrader]

Habe es heute noch ein paar mal versucht das vorgegebene zu ändern usw....aber es nutzt nix es exestiert noch nicht einmal was in der logfile zu den gewünschten schaltzeiten

hat einer eine Idee vielleicht nur ein Zeichen Fehler...

ich arbeite erst seit ca 2 Monaten mit FHEM ,also in der richtigen programierei bin ich noch nicht so schlau.;-) alle anfag ist schwer..
gibt es eine PDF oder Lektüre die Hilft Komplizierte Programmierungen zu verstehen/lernen....also nicht die Einsteiger PDF die hab ich schon durch...

weil hab noch nicht so verstanden für was die einzelnen zeichen sind wie $ / usw und wann die doppelt sein müssen.
mfg schrader

[MisterEltako]

Code Auswählen Erweitern

define Film notify Sascha:(present.*|absent.*){\
my $now = sprintf("%%02d:%%02d",$hour,$min);;\
Log 3, "Zeit: ".$now." Status: ".Value('Sascha');;\
if ((Value("Sascha") eq "present") && ($now gt "20:15")) {\
Loog 3, "Licht anschalten....";;\
fhem("set TV_LICHT on");;\
}else{\
Log 3, "Licht ausschalten....";;\
fhem("set TV_Licht off");;\
}

teste zunächst diesen Teil (hast eine " vergessen).
Dazu "trigger Sascha present" in die Kommandozeile und Enter drücken.

MfG,MisterEltako

[schrader]

leider nein

[MisterEltako]

Was steht im Logfile? Nix?

Dann schreibe bitte zum Test:

Code Auswählen Erweitern

define Film notify Sascha.* {\....

und dann wieder: trigger Sascha ---> in die Kommandozeile

MfG, MisterEltako

PS: Loog 3, "Licht anschalten....";;\ muss natürlich:
    Log 3, "Licht anschalten....";;\ lauten.

[schrader]

Also dies Funktioniert auch nicht mit .*
nach dem ich die cfg speichere und trigger Sascha present eingebe taucht dies im log auf..

2013.05.22 18:44:08 1: Including fhem.cfg
2013.05.22 18:44:08 3: telnetPort: port 7072 opened
2013.05.22 18:44:08 3: WEB: port 8083 opened
2013.05.22 18:44:08 3: WEBphone: port 8084 opened
2013.05.22 18:44:08 3: Opening CUL device /dev/ttyACM0
2013.05.22 18:44:08 3: Setting CUL baudrate to 9600
2013.05.22 18:44:08 3: CUL device opened
2013.05.22 18:44:09 3: CUL: Possible commands: BCFiAZEGMRTVWXefmltux
2013.05.22 18:44:09 3: Opening CUL_1 device /dev/ttyACM1
2013.05.22 18:44:09 3: Setting CUL_1 baudrate to 9600
2013.05.22 18:44:09 3: CUL_1 device opened
2013.05.22 18:44:09 3: CUL_1: Possible commands: BCFiAGMRTVWXefmltux
2013.05.22 18:44:09 3: Opening EUL device /dev/ttyACM0
2013.05.22 18:44:09 3: Setting EUL baudrate to 57600
2013.05.22 18:44:09 3: EUL device opened
2013.05.22 18:44:09 3: Opening BscBor device /dev/ttyUSB0
2013.05.22 18:44:09 3: Can't open /dev/ttyUSB0: No such file or directory
2013.05.22 18:44:09 3: Opening BscSmartConnect device /dev/ttyUSB0
2013.05.22 18:44:09 3: Can't open /dev/ttyUSB0: No such file or directory
2013.05.22 18:44:09 3: No I/O device found for TV_Licht
2013.05.22 18:44:09 3: No I/O device found for Voegel
2013.05.22 18:44:09 3: No I/O device found for Sockel
2013.05.22 18:44:09 3: No I/O device found for Kugel
2013.05.22 18:44:09 1: Including ./log/fhem.save

[MisterEltako]

Hi!

Da stimmt die Definition von TV_Licht nicht. Mit welchen Aktoren steuerst du dein LED Licht? Bitte auch posten.

MfG, MisterEltako.

[schrader]

define TV_Licht IT 0F00F0FFFF FF F0
attr TV_Licht IODev CUL_1
attr TV_Licht fp_Grundriss 140,565,1,
attr TV_Licht model itswitch
attr TV_Licht room Wohnen

mit elro funksteckdosen

wenn ich diese einzeln direkt ansteuer gehen diese auch an

hab jetzt mal statt die leds eine ander lampe ansteuern lassen funktioniert aber auch nicht

[MisterEltako]

Welchen Befehl nutzt du zum Schalten der Elrodosen?:-)


Funktioniert set TV_Licht on in der Kommandozeile?


MfG, MisterEltako

[schrader]

Ja das funktioniert in der Komandezentrale

ja ganz normal mit dem Buttons auf der Weboberfläche oder mit der FHEM App

[MisterEltako]

Ok, das ist zunächst das Wichtigste. Bitte nachfolgend ausprobieren:

Code Auswählen Erweitern

define Film notify Sascha.*){\
        my $now = sprintf("%%02d:%%02d",$hour,$min);;\
        my $Sascha = Value("Sascha");;\
        Log 3, "Zeit: $now , Status: $Sascha");;\
   if ($Sascha  eq "present") && ($now gt "20:15")) {\
        fhem("set TV_LICHT on");;\
        Log 3, "Licht anschalten....";;\
   } else {\
        fhem("set TV_Licht off");;\
        Log 3, "Licht ausschalten....";;\
   }\
}

set Sascha present    - über Kommandozeile des FHEMWEB eingeben und mit Enter bestätigen, dann in Logfile schauen.

Wenn wieder nix steht, dann:
Statt:   define Film notify Sascha.*){\  
das:     define Film at +00:00:15{\
eingeben, FHEM.cfg speichern und Logfileeinträge posten!

[schrader]

bei erster variante
ERROR:
Bad regexp: Unmatched ) in regex; marked by <-- HERE in m/^Sascha.*) <-- HERE {\ $/ at ./FHEM/91_notify.pm line 38, <$fh> line 41

bei zweiter variante
ERROR:
Wrong timespec 00:00:15{\: either HH:MM:SS or {perlcode}