FHEM Forum

FHEM => Anfängerfragen => Thema gestartet von: RaTom am 10 März 2013, 14:42:26

Titel: RAWMSG in Perl-Onliner
Beitrag von: RaTom am 10 März 2013, 14:42:26
Hallo *!

Kurzfassung:
Wie komme ich (ein notify) an die mich aufrufende (raw) Message heran?

Langfassung:
Inspiriert von Fhem-Wiki "HM-RC-12 Funkfernbedienung 12 Tasten" (//www.fhemwiki.de/wiki/HM-RC-12_Funkfernbedienung_12_Tasten), möchte ich ähnliches für eine Homematic HM-PB-4Dis-WM (//www.eq-3.de/produkt-detail-46/items/hm-pb-4dis-wm.html) versuchen.
Der im Wiki vorgestellte Code...
my $raw   = $defs{HMremote}{HMLAN_RAWMSG};
...
hat m. E. den Nachteil, dass das Internal des Homematic-Empfangs-Device (hier HMLAN_RAWMSG) explizit angegeben werden muss. Bei mir heißt es CUNO48_RAWMSG. Jedenfalls solange ich das Device nicht umbenenne.

Ich hoffe aber, dass dieses Internal auch mittels Perl-Code zu erreichen ist. Nur reichen weder meine Perl- noch meine Fhem-Kenntnisse, um mich - ausgehend von den in einem notify vorhandenen Information - durchhangeln zu können...

Bei folgendem Code wundere ich mich schon, dass ich bei den zwei letzten Log-Einträgen statt der Hash-Keys nur Zahlen sehe...define Fernbedienung_Btn.Notify notify Fernbedienung_Btn_.* {\
  my $Geraet = "Fernbedienung";;\
  Log 1, "%%EVENT=%EVENT, %%NAME=%NAME, %%TYPE=%TYPE";;\
  Log 1, "keys(%%defs)=".keys(%%defs);;\
  Log 1, "keys(\$defs{\$Geraet})=".keys($defs{$Geraet});;\
}


Kann mir jemand helfen?

MfG
RaTom
Titel: Antw:RAWMSG in Perl-Onliner
Beitrag von: Rudibarani am 28 Oktober 2019, 22:15:07
Hallo RaTom,

lang ist es her - aber ich bin gerade auf Deine Nachricht aus 2013 gestoßen. Hast Du es damals hinbekommen, für das Display die ACK-Nachrichten so zu schicken, dass der Schalter die mit "grün" quittiert?

Viele Grüße
Phillip