Talk2Fhem

Aus FHEMWiki
Talk2Fhem
Zweck / Funktion
Das Modul stellt eine Verbindung zwischen natürlicher Sprache und FHEM Befehlen her
Allgemein
Typ undefiniert
Details
Dokumentation ModUndef
Support (Forum) Unterstützende Dienste
Modulname 39_Talk2Fhem.pm
Ersteller Oliver Georgi
Wichtig: sofern vorhanden, gilt im Zweifel immer die (englische) Beschreibung in der commandref!



Diese Seite beschreibt die Funktionsweise und Konfiguration des Moduls 39_Talk2Fhem.pm

Voraussetzungen

ModulTalk2FhemScreenshot.png

Es ist sehr zu empfehlen, für die Konfiguration des Moduls, im Webfrontend von FHEM die Syntaxhervorhebung zu aktivieren. Die Aktivierung des erweiterten Editors ist hier beschrieben.

Kenntnisse im Bereich Regulärer Ausdrücke (RegExp) in Perl sind hilfreich, aber nicht zwingend erforderlich. Ein kurzer Einstieg kann hier eingesehen werden. Häufig_verwendete_RegExp

Allgemeines

Das Modul Talk2Fhem stellt eine Verbindung zwischen natürlicher Sprache und FHEM Befehlen her. Es ist ein überaus flexibles und relativ einfach zu konfigurierendes Script mit dem man sehr natürlich kommunizieren kann. Die Konfiguration erfolgt dabei über das FHEM Webfrontend.

Es werden diverse Zeit- und Datumsangaben erkannt. Außerdem ist es möglich Ereignisse zu formulieren, welche die Befehle mit einer Bedingung verknüpfen. Bei der weiteren Verarbeitung der Sprachbefehle wird die Sprache mit definierten regulären Ausdrücken verglichen.

Es lassen sich Antworten generieren, die Abhängig von den gesendeten Sprachbefehlen sind. Das vom Author verfolgte Konzept ist aber: Erzeuge eine Meldung wenn etwas nicht verstanden oder fehlgeschlagen ist, ansonsten führe den Befehl mit einer kurzen Erfolgsmeldung wie "OK" oder "Gerne" aus.

Die Herkunft des Sprachbefehls übernehmen andere Anwendungen. Hierzu gibt es eine Reihe von Möglichkeiten die unter Eingabemethoden aufgelistet sind. Funktionierende Lösungsansätze werden hier gerne mit aufgenommen.

Funktionsweise

Die Zerlegung des Sprachbefehls erfolgt in mehreren Schritten.

  1. Aufteilen des Sprachbefehls in einzelne Kommandos anhand des Wortes UND
  2. Suchen nach Ereignisansagen und entfernen für die weitere Verarbeitung
  3. Erkennen von Zeit- und Datumsangaben und entfernen für die weitere Verarbeitung
  4. Entfernung überflüssiger Wörter
  5. Vergleich mit den definierten regulären Ausdrücken
  6. Konvertieren in ein FHEM Kommando
  7. Antwortsatz bilden
  8. Zeit- und Eventgebundenes auslösen des FHEM Kommandos

Installation

Solange das Modul noch nicht offiziell aufgenommen wurde, muss die Datei 39_Talk2Fhem.pm manuell in das Verzeichnis FHEM/ kopiert werden. Siehe Forumsbeitrag.

Definition

define talk Talk2Fhem

Zum testen der Konfiguration ist es Ratsam vorerst das Attribut disable auf 1 zu setzen. Hierbei wird die Auslösung der FHEM Kommandos unterdrückt. 

attr talk disable 1

attr global language DE
oder
attr talk T2F_language DE

Anwendung

Der Sprachbefehl wird über das Kommando set oder set ! an das Modul übermittelt. 

set talk Guten Morgen liebes Zuhause

Wird kein Text angehängt, wird der letzte Sprachbefehl erneut ausgeführt.

Readings

  • Im Reading set steht der letzte gesendete Sprachbefehl.
  • Im Reading cmds steht das letzte ausgeführte FHEM-Kommando dessen Rückgabe, in den häufigsten Fällen ein Fehler, in das Reading response geschrieben wird.
  • Die Antworten werden im Reading answers sofort ausgegeben.
  • Die Modulinterne Fehler werden in dem Reading err ausgegben.
  • In ifs stehen die Bedingungen mit der das letzte Kommando ausgeführt werden wird.
  • notifies enthält eine Auflistung der Devices die für die aktuell wartenden bedingten Kommandos relevant sind. Auf diesen Devices liegt ein internes notify.
  • Das Reading origin enthält den erkannten Text der im Attribut T2F_origin definierten RegExp.

Das Reading status wird jedes mal gesetzt und erhält Werte nach folgender Priorität.

1. response wenn das FHEM Kommando eine Meldung ausgegeben hat
2. disabled wenn das Attribute disable auf 1 steht
3. err wenn der Sprachbefehl einen Fehler zurückgegeben hat
4. answer wenn der Sprachbefehl eine Antwort ausgegeben hat
5. done wenn keines der oberen Fälle eingetreten ist, also alles gut verlaufen ist

Beispiel

Die FHEM Befehle werden eigenständig ausgeführt, sie können aber zur Überprüfung auch weitergeleitet werden. Das Beispiel zeigt auch wie auf Fehler und Antworten von Talk2Fhem reragiert werden kann. Erstellen eines Notify 

define n_talk notify talk:.* {}

Folgendes in der Definition von n_talk einfügen 

 talk:.* {
 # Sende die Antwort per Telegram und gebe es über das GoogleHome aus
 	if ($EVENT =~ s/^answers: //) {
 		fhem("set telegram _msg \@USER $EVENT");
 		fhem("set d_googlespeak $EVENT");	
 	}
 
 # Schicke den Fehler per Telegram und sag am GoogleHome das es nicht geklappt hat.
 	if ($EVENT =~ s/^err: //) {
 		fhem("set telbot _msg \@Oliver $EVENT");
 		my @a = ("Das hat leider nicht geklappt", "Es gab leider einen Fehler", "Es tut mir leid. Das hat nicht funktioniert.", "Es ist leider zu einem Fehler gekommen","Könntest du das vielleicht nochmal anders sagen", "Mhhh, das kann ich so nicht verstehen");
 		fhem("set d_googlespeak $a[int(rand($#a))]");
 	} 
 
 # Schick mir alle ausgeführten Befehle als Telegram
 
 	if ($EVENT =~ s/^cmds: //) {
 		fhem("set telbot _msg \@USER $EVENT");
 	} 
 
 }

Eine weitere Möglichkeit Talk2Fhem mit anderen Modulen zu verbinden, ist über das Reading status möglich.

Die folgenden Lösung hat den Vorteil das eine Standardantwort definiert werden kann. !Achtung noch nicht getestet vom Author! 

talk:status {
my $text = ReadingsVal("talk", $EVENT, "Komisch, hier sollte eigentlich etwas Text stehen.");

if ("$EVENT" eq "response") {
  #FHEM gibt bei Erfolg eig. keine Rückmeldung, also ist vermutlich was schief gelaufen
  $text = "Die Haussteuerung hat folgende Meldung gebracht. $text";

} elsif ("$EVENT" eq "err") {
  $text = ["Das habe ich nicht verstanden!","Phuu das kann ich noch nicht!","Nein! Heute nicht.", "Wie bitte?"]->[rand(4)];

} elsif ("$EVENT" =~ /^answer/) {
  $text = ReadingsVal("talk", "answers", "Ich habe nichts zu sagen.");

} elsif ("$EVENT" eq "err") {
  #in $text steht schon der fehler drin

} elsif ("$EVENT" eq "done") {
  $text = ["Ok.","Ja.","Gerne.", "Mach ich!"]->[rand(4)];

} else {
  $text = "Oh, es gibt etwas neues, bitte schau mal im Forum bei Talk2Fhem vorbei.";
}

fhem('set speaker speak "$text"') if $text;
}

Modulinterne Spracherkennung

Zeitenerkennung

Die Zeit- und Datum Eingabe kann auf viele verschiedene Arten erfolgen.
Die Datumerkennung umfasst folgende Phrasen:

  • morgen, übermorgen
  • in ... Wochen, Monat, Jahr
  • nächste Woche, Monat, Jahr
  • Wochentage
  • in ... Tagen
  • am DATUM

Die Zeiterkennung umfasst folgende Phrasen:

  • in,nach ... stunden,minuten,sekunden
  • um ... (Uhr) (...)
  • heute - entspricht 12:00
  • früh - entspricht 9 Uhr
  • abend - entspricht 18 Uhr
  • nachmittag - entspricht 16 Uhr
  • vormittag - entspricht 10:30 Uhr
  • mittag - entspricht 12 Uhr
  • gleich - entspricht 5 Minuten
  • nachher - entspricht 30 Minuten
  • später - entspricht 1 Stunde
  • jetzt
  • sofort

Datum und Zeitangaben können natürlich kombiniert werden.
Wird eine Zeit erfolgreich erkannt erfolgt die Ausführung des FHEM-Kommandos über das Modul at. Es wird ein at Ereignis angelegt welches den Namen at_<modulname>_<zeitindex> erhält.

Bei mehreren Kommandos über das Schlüsselwort und wirkt sich der Zeitpunkt des ersten Kommandos auch auf das zweite und dritte ... aus. 

Schalte die Heizung um 20 Uhr aus und mache die Rollläden runter

Beide Kommandos werden um 20 Uhr ausgelöst.

Hat das zweite Kommando ebenfalls eine Zeitphrase wird diese Zeit genommen. 

schalte die Heizung heute Abend ab und mache die Rollläden jetzt runter

Wie oben gesehen wird der Zeitpunkt des ersten Kommandos vor dem "und" auch für das zweite nach dem "und" gesetzt. Vorausgesetzt er wird beim 2. Kommando nicht durch eine eigenständige Zeit (hier "jetzt") ersetzt. Wenn man die Zeit des zweiten Kommandos, relativ zum ersten setzen möchte, kann dies mit den Schlüsselwörtern dann, danach oder wieder formuliert werden. 

Fahre um 14 Uhr die Rollläden an der Terrasse runter und schalte dann in 2 Minuten die Bewässerung an

oder 

Mach am Freitag um 5 Uhr die Heizung aus und in einer Woche wieder an

Ereigniswiederholung

Werden zwei Sätze über ein und miteinander verknüpft, kann im 2. Satz mit dem Wort wieder das Ereignis wiederholt werden.

Beispiel 

schalte bitte die Klingel ab und in einer Stunde wieder ein
mach bitte die Garage auf und gleich wieder zu

Man benötigt hier nicht erneut den kompletten ersten Satz zu wiederholen.

Eventabhängige Kommandos

Es lassen sich alle definierten Befehle mit Bedingungen verknüpfen, bei der Erfüllung diese dann ausgeführt werden.

Beispiel 

Sag mir bescheid wenn es klingelt 
Mach die garage zu wenn es draußen dunkel wird
Wenn ich nach hause komme mach die Musik an

siehe hierzu Modul_Talk2Fhem#T2F_if

Eingabemethoden

Die Herkunft der Sprachbefehle für das Modul sind vielfältig. Hier werden einige Methoden beschrieben wie der Sprachbefehl in das Modul gelangen kann.

Messenger Telegram

Ist ein TelegramBot telbot definiert, reicht ein einfaches "notify" um die Nachrichten an FHEM an Talk2Fhem weiterzuleiten. 

define n_telbot notify telbot:msgText.* set talk $EVENT

Schon kann mit FHEM gechattet werden... ;) Mit Telegram lässt sich auch leicht der Sender der nachricht mitteilen. Siehe hierzu Modul_Talk2Fhem#Personalifizierung

Google Home Geräte

Momentan ist es leider noch notwendig über einen Umweg die Sprache von einem GoogleHome in FHEM zu bringen. Hierzu ist es notwendig einen funktionierenden DNS Service am laufen zu haben. Damit FHEM per Webadresse im Internet erreichbar ist.

  • Ein FHEMWEB Device anlegen
define api FHEMWEB 8087 global
attr api HTTPS 1
attr api allowfrom  1
attr api csrfToken  None
  • Ein allowed Device anlegen
define allowed_api allowed api
attr allowed_api allowedCommands set
attr allowed_api allowedDevices talk
attr allowed_api basicAuth  {"$user:$password" eq 'user:passwort'}
attr allowed_api validFor   api
  • Mit Googlekono bei IFTTT.com anmelden
  • New Applet
  • +this GoogleAssistant -> Say a phrase with a text ingredient
  • Die drei Triggertexte wählen z.b.
    • das Haus $
    • sag dem Haus $
    • frag das Haus $
      • Problem bei zu kurzen Texten hat GoogleHome keine anderen Anfragen mehr angenommen.
  • Einen Antworttext überlegen z.B. OK und in "What do you want the Assistant to say in response?" eintragen
  • Language Deutsch
  • +that Webhooks
  • URL wählen
https://user:password@dnsservice:54387/fhem?cmd.talk=set talk {{TextField}}&XHR=1
  • Fertig

Jetzt wird der gesamte Text bei dem genannten Triggerworten an FHEM weitergeleitet.


Konfiguration

Die Konfiguration des Moduls wird hauptsächlich über die Definition (DEF) vorgenommen. Eine Konfiguration beginnt immer mit der Definition der gesuchten Schlüsselwörter, gefolgt von einem Gleichheitszeichen (siehe Randnotiz). Diese werden Anhand von regulären Ausdrücken (RegExp) beschrieben. Also z.B.: 

garage auf =

Das bededutet, sobald die Wörter in der Reihenfolge "garage" und "auf" erkannt werden, wird der Kommandoteil der Konfiguration ausgeführt. Groß- und Kleinschreibung wird grundsätzlich ignoriert.

Der Kommandoteil folgt dem Gleichheitszeichen (siehe Randnotiz). Und kann auf folgende Arten vorliegen.

Übersicht

Info green.pngWichtig

Vor und nach dem Gleichheitszeichen muss mindestens ein Trennzeichen vorhanden sein

  • Vor dem "=" mindestens ein Leer- oder Tabulatorzeichen
  • Nach dem "=" können zusätzlich auch Zeilenumbrüche eingefügt werden
<regexp> = <command>

Im ganzen könnte die Konfiguration dann so aussehen: 

garage\S* auf = set dev_garage open

\S* Siehe hierzu Häufig verwendete RegExp.

Bei diesem Beispiel würde der FHEM Befehl "set garage open" bei den folgenden Sprachbefehlen ausgeführt werden. 

Mach bitte die Garage auf
Garagentür in 5 Minuten auf
Die Garagen soll in einer Stunde aufgemacht werden
Das haus soll das Garagentor wenn der Bewegungsmelder anspricht aufmachen

Durch die modulinterne Entfernung von Zeit- und Ereignisdefinitionen ist diese RegExp bei den letzten drei Beispielen ebenfalls erfolgreich.

Klammerüberführung

Info green.pngInfo $0 stellt in diesem Zusammenhang eine Besonderheit dar, indem sie den Text der erkannten T2F_origin RegExp enthält.

Es ist nicht notwendig für jeden Zustand oder jedes Gerät eine eigene Konfigurationzeile zu erzeugen. Hierfür gibt es die Möglichkeit, wie bei regulären Ausdrücken üblich, Klammern "( )" im <regex>-Teil zu erfassen. Dies erfolgt über die Standartvariablen $1, $2, ..., $n. "n" steht hier für die nte Klammer. Zusätzlich gibt es in Talk2Fhem die Möglichkeit die Klammern zu modifizieren.

Soll die Garage auf und zugemacht werden, lässt sich folgendermaßen beschreiben.

Beispiel: 

garage\S* (\S+) = set dev_garage $1

Der Satz: "Mach die Garage auf" ergibt dann als FHEM Kommando 

set dev_garage auf

Klammermodifikation

Da es in den meißten Fällen nicht gewünscht ist, nur das gefunde Wort in das FHEM Kommando zu überführen, lässt sich zusätzlich das gefundene Wort modifizieren.

Variante 1: nach Typ

Hier kann die Klammer auf ihren Typ hin modifiziert werden.

Definition
$n{ typ => modification, typ2 => mod2, ..., typn => modn }
Info green.pngInfo Die genaue Definition der Typen lässt sich mit dem Befehl get modificationtypes anzeigen

typ kann eines der folgenden Wörtern enthalten:

  • true sind alle Wörter die eine positive Richtung enthalten. Wie z.B. auf, ein, hoch, an, usw.
  • false sind alle Wörter die eine negative Richtung enthalten. Wie z.B. ab, aus, runter, zu, usw.
  • integer Wort enthält eine Zahl
  • numeral Wort enthält eine Zahl oder ein Zahlenwort
  • float Wort enthält eine Gleitkommazahl
  • /<regexp>/ Wort entspricht der <regexp>
  • word Wort enthält gleich oder mehr als 4 Buchstaben
  • empty Wort enthält eine Leere Zeichenkette
  • else Falls keines der Fälle zutrifft

modification enthält das einzufügende Wort.

Beispiel
garage\S* (\S*) = set dev_garage $1{ true => open , false => close }

Die Sätze: 

mach die Garage auf
bitte Garagentor schließen

würden hier folgende Befehle auslösen 

set dev_garage open
set dev_garage close

Variante 2: nach Liste

Hier kann die Klammer anhand einer oder zweier Listen selektiert werden.

Definition
$n[ wert1, wert2,,,,, wertn ]

oder 

$n[ @liste ]

Innerhalb der Klammern [ ] wird eine Komma separierte Liste mit Namen erwartet die als Modifikatorliste dient. Die sogenannte Modwordlist. Die Werte sind immer optional und können leer gelassen werden. Über das Attribut T2F_modwordlist können diese Listen zur Übersicht und Wiederverwendbarkeit angelegt werden. Siehe Attribute. Auf diese Listen, lässt sich über den Namen der Liste, mit einem vorangestelltes '@' zugreifen.

Beispiel nach Position

Beim ersten Beispiel wird eine Zahl im regex-Teil erwartet (\d+). Diese Zahl entscheidet welche Position aus der Modwordlist ausgewählt werden soll. 

ventilator auf (stufe )?(\d+) = set aircon $2[ off, level1, level2, level3 ]                                                                                              
                          |------------------>  0      1       2       3

(Stufe )? bedeutet: Das Wort Stufe kann, muss aber nicht.

Die Sätze: 

Ventilator in 10 Minuten auf Stufe 0
Ventilator auf 3

würden hier folgende Befehle auslösen 

set aircon off
set aircon level3
Beispiel nach Vergleichsliste

Hier kommt eine weitere Liste ins Spiel. Die sogenannte Keywordlist ist im Eigentlichen eine RegExp "Ver-oder-ung". 

( key1 | key2 | ... | keyn )

oder 

( @keywordlist )

Diese Liste mit Schlüsselwörtern wird im <regex>-Teil angegeben. Hier entscheidet nicht eine Zahl über die Position, sondern die Position die in der Keywordlist einen Treffer hat wird an selber Position in der Modwordlist ausgewählt. Im Attribut T2F_keywordlist können vordefinierte Listen angelegt werden und mit @keylist ausgewählt werden 

blendet && (Wohnzimmer|Esszimmer|Küche) = set $1[act_lvgroom, act_dinroom, act_kitchen] 70
              |__________|_______|___________________|_____________|____________|

Die Sätze: 

im Esszimmer blendet es
ich sitze geblendet im Wohnzimmer
die sonne blendet in der Küche

würden hier folgende Befehle auslösen 

set act_dinroom 70
set act_lvgroom 70
set act_kitchen 70

Auswahl des Listenelements

Soll bei der Nutzung der Variable nicht der Wert aus dem Sprachbefehl, sondern der Wert der Liste genutzt werden, so wird an die Variable ein @ angehängt. So wird bei 

blendet.* (Wohnzimmer|Esszimmer|Küche) = set act_$1@ 70

Die Sätze 

es blendet im Esszimmer
es blendet im esszimmer

immer zu 

set act_Esszimmer 70

führen, da die Liste das Esszimmer großgeschrieben enthält.

Ergänzung

Ähnlich wie in Variante 1, könne auch hier auf die Schlüsselwörte 

empty für leere Zeichenkette

und 

else für alle anderen Fälle

zugegriffen werden. Hierbei wird der Modwordlist einfach empty oder else gefolgt von dem gewünschten Wert als nächstes Element angehängt. 

$n[ wert1, wert2,,,, empty, leererwert, else, andernfallswert ]

Generell lassen sich @ Listen mit Werten erweitern. 

$n[@rooms, empty, dev_alle]

Import von Konfigurationen

Umfangreiche Konfigurationen können in Dateien ausgelagert und über $inlcude importiert werden: 

$include = FHEM/t2f.cfg

Mehrere RegExps

Wenn die Reihenfolge der Wörter Unbekannt ist, kann der <regexp>-Teil in mehrere Einzelteile aufgelöst werden: 

<regexp> && <regexp> && ...

Beispiel 

Licht && Wohnzimmer && schalte = ...

Akzeptiert werden hier 

Schalte das Licht im Wohnzimmer
Im Wohnzimmer das Licht schalten
Schalte im Wohnzimmer das licht

RegExp Optionen

Die einzelnen RegExp Teile können zusätzlich mit den Zeichen ? und ! beeinflusst werden:

  • Negierung !<regexp>
  • Optional ?<regexp>

Beipiel: 

Licht && ?Wohnzimmer && schalte && !aus = ...

akzeptiert 

Schalte das Licht im Wohnzimmer ein
Schalte das Licht ein

aber nicht 

Schalte das Licht im Wohnzimmer aus
Schalte das Licht aus

zusätzliche Variablen

Ergänzend zu den Listenvariablen stehen folgende Variablen zur Verfügung:

  • $& Enthält alle gefundenen Wörter
  • !$& Enthält den Rest der nicht von der RegExp eingeschlossen wurde
  • $0 Enthält den Text der erkannten T2F_origin RegExp
  • $DATE Enthält den Zeit und Datumstext des Sprachbefehls
  • $TIME Enthält die erkannte Zeit in Sekunden
  • $IF Enthält den Text der erkannten T2F_if Konfiguration
  • $NAME Enthält den Devicenamen
  • $AGAIN Enthält das Wort wieder wenn es sich um ein wieder Kommando handelt (siehe Beispiele)

erweiterte Befehlskonfiguration

Um Talk2Fhem in den Konfigurationszeilen weitere Parameter zu übergeben, ist eine gesonderte Syntax zu verwenden. 

<regexp> = ( option => 'value'  ,
             opt2   => 'value2' ,
             ... 
             optn   => 'valuen' )

Es stehen folgende Optionen zur Verfügung:

  • cmd => enthält das FHEM Kommando. Wie oben beschrieben. Wird bei bedarf Zeit- oder Ereignisgebunden ausgeführt.
  • answer => Ein Perl-Befehl der direkt ausgeführt wird und dessen Rückgabe ein Text sein sollte. Das Ergebnis wird in das Reading answer geschrieben. Der Befehl muss in einem der folgenden Zeichenpaaren eingeschlossen sein. ( ), { }, < >, " " oder ' '
  • offset => Ganzzahliger Wert in Sekunden der dem Zeitpunkt addiert wird. Siehe Modul_Talk2Fhem#Zeitenmodifikation

Zeitenmodifikation

Manchmal ist es notwendig etwas vor der angegebenen Zeit auszuführen. Hier lässt sich ein Offset zu dem ermittelten Zeitpunkt hinzufügen, um ihn zu ändern.
Beispiel 

dusche\S?$ = (offset=>-3600, cmd=>'set d_log bad warm')

Der Sprachbefehl 

ich will um 18:30 Uhr duschen

Legt folgendes at Ergnis an 

define at_talk_1513096200_0 at 2017-12-12T17:30:00 set d_log bad warm

Antworten

In Talk2Fhem können Antworten, die das Modul ausgeben soll, definiert werden. Hier können Fragen verarbeitet werden oder auch den Erfolg eines Kommandos bestätigt werden.

Über die Modul_Talk2Fhem#erweiterte_Befehlskonfiguration, erhält der Parameter "answer" einen Perl Befehl. Die Rückgabe muss ein Text sein, der als Antwort dient.

Beispiel Erfolgsmeldung

tu was = ( cmd => "set tue es" , answer => ("Erledigt") )

Beispiel Zustandsabfrage

wurde es getan = ( answer => ' Value("tue") eq "es" ? "Ja" : "Nein" ')

Beispiel Temperaturabfragen

Eine einfache Temperaturabfrage könnte so aussehen. 

wie.*(kalt|warm|grad|temperatur) = 
( answer => 
       { "Die Temperatur beträgt ".ReadingsVal("tempdev", "temperature", "Fehler") } 
)

Für eine Raumbezogene Temperaturabfrage, siehe Modul_Talk2Fhem#Anwendungsbeispiele_und_Vorlagen

Personalifizierung

Für eine Personenbezogene Konfiguration gibt es die Hilfestellung des Attributs T2F_origin.

Der Gedanke dahinter ist, man fügt dem Sprachbefehl einen Zusatz, wie z.B. den Namen am Anfang des Satzes, hinzu.

Ein notify auf ein Telegramdevice könnte so ausehen: 

telbot:msgText.* {
	my $p=ReadingsVal("telbot", "msgPeer","");
	fhem("set talk ".($p?$p.":":"").$EVENT=~s/^msgText: //r);
}

Jetzt wird dem Textbefehl immer der Name (msgPeer) mit ":" dem Befehl hinzugefügt und an talk gesendet. Dieser Text kann mit T2F_origin verarbeitet werden.

siehe hierzu Modul_Talk2Fhem#T2F_origin

Attribute

Folgende Attribute werden zur Zeit unterstützt

T2F_keywordlist

<Name> = <kommaseparierte Liste mit RegExp>

Beispiele 

rooms = haus|überall|wohnung , wohnzimmer , bad\S* , toilette|wc , büro , ...
names = Mama , Papa , Kevin , Jacqueline
channels = ard|das erste , zdf , rtl , sat 1 , vox , rtl2 , prosieben , kabel eins , arte

Man beachte hier die möglichkeit der RegExp
Das Schlüsselwort haus löst das selbe aus wie überall und wohnung
Genauso bad oder badezimmer oder badeirgendewas

T2F_modwordlist

<Name> = <kommaseparierte Liste mir RegExp>

Die Positionen der gewählten Geräte, ist eine Zuordnung zu den Listen inT2F_keywordlist
Wenn Wohnzimmer in der keywordliste <rooms> an Position 2 steht muss der Rolladenaktor in der modworliste <roll> auch an Position 2 stehen. 

roll = rollos_alle , d_rollo_wz , hm_roll_bad.* , hm_roll_wc , hm_roll_buero.* , ...
lights = alle_lichte , "sw_wz1,sw_wz2" , sw_bad.* , sw_wc

Sollen einem Schlüsselwort mehrere Aktoren zugeordnet werden, geht das über sogenannte "Quotes". (Anführungszeichen) Siehe <lights>. 

"a,b"  oder  'a,b'  oder  a\,b

T2F_if

Möchte man einen Befehl erst zu einem bestimmten Ereignis oder zu einer Bedingung ausführen lassen, lässt sich das über dieses Attribut konfigurieren.

Die Syntax orientiert sich hier an der der Definition. Die Syntax der Bedingung entspricht der des FHEM-Befehls IF. Sobald hier das Device dev_ring den Status ring erhält, wird das zusätzlich erkannte Kommando ausgeführt. 

wenn .*?klingel = [dev_ring] eq "ring"

Hier stehen genauso wie in der Definition Klammermodifikatoren zur Verfügung. 

wenn die temperatur (über|unter) ([\s\.,\d]+) grad = [sens:temp] $1[>,<] $2{float=>"$2"}

Beispielsätze 

wenn es klingelt
wenn die temperatur über 22 grad ist

Erweiterte Optionen in dieser Konfigurationszeile sind möglich aber noch nicht relevant.

T2F_origin

Das Attribut T2F_origin kann für eine Personalifizierung der Befehle genutzt werden. Es enthält eine RegExp die generell vom ganzen Sprachbefehl entfernt und in der Variable $0 zu Verfügung gestellt wird

Der Inhalt des Attributs könnte folgender sein. 

^\w+:

Nun wird ein am Anfang auftretendes wort: entfernt und als Origin behandelt.

Beispiel 

Spiele meine Musik = set mediaplayer play pop

Jetzt soll das Wort pop Personenbezogen umgeformt werden. 

Spiele meine Musik = set mediaplayer play $0{/kevin/=>hiphop,/jaqueline/=>gothik,else=>pop}

Folgender Satz setzt dann für das Wort pop hiphop ein. 

kevin: spiele meine Musik bitte

Das ganze lässt sich auch verschachteln und mit Keywordlisten kombinieren. Siehe hierzu Beispiele.

T2F_disableumlautescaping

Deaktiviert das Konvertieren der Umlaute innnerhalb von regulären Ausdrücken in \S\S?

T2F_language

Legt die verwendete Sprache fest. Alternativ wird das Globale Attribut language verwendet werden.

disable

Deaktiviert das Ausführen des FHEM Kommandos

verbose

Anwendungsbeispiele und Vorlagen

Hier folgen diverse Vorlagen und Beispiele die jeweils an die eigenen Bedürfnisse angepassst werden sollten/müssen. Hierzu sind die entsprechenden Stellen rot markiert.

Keywordlist

Eine typische Keywordlist wäre eine Auflistung der benötigten Räume 

rooms = haus|überall|wohnung,wohnzimmer,esszimmer,bad\S*,toilette|wc,
büro,schlafzimmer,ankleide|garderobe,kinderzimmer,spielzimmer,
flur|gang|diele,garage,garten,terrasse,balkon,
eg|erdgescho\S*,og|obergescho\S*,\S*auße\S*( haus)?|vor der tür

Einfaches schalten

1. Beispiel 

licht (\S+) = set dev_light $1{ true => on, false => off }

2. mit eigenen Wörtern

Will man neben an/aus einen weiteren Zustand selbst definieren, kann das so geschehen. 

garage (\S+) = set dev_gate $1{ /kurz/ => open-for-timer 300, true => open, false => close }

3. mit Räumen 

licht (\S+ ){0,2} (wohnzimmer|esszimmer|küche|terrasse) (\S+) =
   set $2[light_wz,light_ez,light_kitchen,light_outside] $3{ true => on, false => off }

Bei größeren Mengen an Räumen und Geräten bietet sich das anlegen von Keyword- und Modwordlisten an. 

licht (\S+ ){0,2} (@rooms) (\S+) = set $2[@lights] $3{ true => on, false => off }

Rolladen fahren

Sind die Rollläden innerhalb von FHEM über das Attribut "room" den Räumen mit Klarnamen zugeordnet, lässt sich das ganze am einfachsten konfigurieren.
1. nach Devicetyp 

rolll?(os?|\S\S?den) ?(\S+ ){0,2}(\S+) (auf )?(\S+) = 
  {fhem('set room='.ucfirst($3{/haus/=>\".*\",empty=>\".*\",else=>\"$3\"}).
         ':FILTER=a:subType=blindActuator $5{true=>on, false=>off, integer=>'set_$5')}

Erklärung
Wenn das Device vom subTyp "blindActuator" ist (HomeMatic Rolladenactor) und es im Raum $3 ist, wird dieses Device gefahren. Die Funktion ucfirst ist notwendig damit der erste Buchstabe groß geschrieben wird.


2. nach Devicenamen 

{fhem('set room='.ucfirst($3{/haus/=>\".*\",empty=>\".*\",else=>\"$3\"}).
       ':FILTER=rollo.* $5{true=>on, false=>off, integer=>'set_$5')}

Erklärung
Gleiche wie oben, nur das alle Devices die mit rollo beginnen im Raum $3 gefahren werden. (rollo.*)


3. nach Benutzerdefinierten Räumen
Ansonsten müssen wir dem Modul sagen in welchem Raum welches Device sitzt. Das hat dafür den Vorteil das die Räume als RegExp angegeben werden können.
Wir erzeugen eine Modwordlist rollos in der wir alle Rollladen "Devices" auflisten. Die Reihenfolge ist an der Keywordlist "rooms" (Modul_Talk2Fhem#Keywordlist) anzupassen. 

rollos = r_alle,r_wz,r_ez,,r_buero,...


Definition 

rolll?(os?|\S\S?den) ?(\S+ ){0,2}(@rooms)? (auf )?(\S+) = set $3[@rollos, empty, rollos_alle] $5{true=>on, false=>off, integer=>"set_$5"}

Beispielsätze 

Rollos auf
Rolllos Überall schließen 
Rollo im Wohnzimmer hoch
Rolladen im Esszimmer runter
Rollläden in der Küche auf 50


Damit wäre eigentlich schon alles abgedeckt. Folgendes Beispiel ist aber auch noch nützlich.
Definition 

 (blendet|schatte\S?) ?(\S+ ){0,2}(@rooms) = set $3[@rollos] set_70

Beispielsätze 

es blendet im Esszimmer
ich werde geblendet in der Küche
die Sonne blendet mich im Badezimmer
beschatte das Haus
mach schatten im Erdgeschoss

Erweiterte Personalifierung

Wie löst man das Problem mit dem Wort "ich" in Sätzen wie. 

Wenn ich nach hause komme

Voraussetzung siehe Modul_Talk2Fhem#T2F_origin

T2F_keywordlist @names mit den Namen: 

names = wir,ich,hans,jutta,kevin,jaqueline

T2F_modwordlist @devs mit den Geräten der Personen. 

devs = d_alleda,,handyhans,handyjutta,handykevin,handyjac

Standardmäßig würde die Konfiguration so ausehen. 

wenn (@names) (heim|nach hause) komm\S* =
  [$1[@devs]] =~ /ja|present/

Für das Device d_alleda wird angenommen das dieses ja und nein enthalten kann, und deswegen nicht mit present verglichen werden kann.

In @devs ist für ich kein Wert vorgesehen, da es sich ja um einen variablen Wert handelt. Deswegen erfassen wir erstmal ich über die /regexp/. Andernfalls wird die Liste @devs herangezogen.

wenn (@names) (heim|nach hause) komm\S* =
  [$1{/ich/=>weristich,else=>'$1[@devs]'}] =~ /ja|present/

Nun weißen wir über die origin Variabel $0 dem Platzhalter weristich die Geräte zu. 

wenn (@names) (heim|nach hause) komm\S* =
  [$1{/ich/=>$0{/hans/=>handyhans,
              /jutta/=>handyjutta,
              /kevin/=>handykevin,
              /jaque/=>handyjac},
    else=>'$1[@devs]'}] =~ /ja|present/

Das Beispiel zeigt wie eine verschachtelte Personenzuordnung aussehen könnte. Die Abbarbeitung der $n Modifikatoren erfolgt von rechts nach links.
Folgende Sätze werden konvertiert in:

Sätze Ergebnis
jutta: wenn hans nach hause kommt [handyhans] eq 'present'
hans: wenn wir heim kommen [d_alleda] eq 'ja'
kevin: wenn ich nach hause komme [handykevin] eq 'present'

GoogleCast Befehle

Etwas bessere Lautstärkebefehle als die von Google. Die Lautstärken müssten noch dem eigenen Geschmack angepasst werden 

#GoogleCast Commandos
leise$            =  set googlecastdevice volume 14
normale lautstärke =  set googlecastdevice volume 20
laut$             =  set googlecastdevice volume 30
(ein wenig|etwas|viel)? ?(lauter|leiser)  =  { fhem("set googlecastdevice volume ".(ReadingsVal("googlecastdevice","volume", 0)$2[+,-]$1[3,5,10,empty,7])) }

Beispielsätze 

Mach leise
Mach lauter
Mach etwas leiser
Mach viel lauter

Talk Timer zurücksetzen

Sollen alle von Talk2Fhem angelegten Timer gelöscht werden. 

(timer|kommandos) (löschen|zurücksetzen) = set cleartimers $NAME

Beispielsätze 

bitte alle timer zurücksetzen
zukünftige kommandos löschen

Frage Antwort

Raumbezogene Temperaturansage

Wir erzeugen wieder unsere Modwordlist sagen wir @sens gefüllt mit den Temperaturfühler "Devices". Reihenfolge wie immer die der Keywordlist @rooms. 

wie.*(kalt|warm|grad|temperatur).*(@rooms) = ( answer => '"Die Temperatur beträgt ".ReadingsVal("$2[@sens]", "temperature", "unbekannt")." grad"' )

Beispielsätze 

wie warm ist es im Wohnzimmer
wie ist die Temperatur in der Küche
wie kalt ist es draußen

Multiple Antworten

Hallo Haus = ( answer => '["Hallo auch!","Guten Tag!","Ahoi!"]->[rand(3)]' )

Wählt zufällig eine der drei Aussagen.

Ausgabe eines oder mehrerer Zustände

Angenommen man möchte wissen ob das Haus abgeschlossen ist. Und in FHEM existiert ein Dummy der diesen Zustand wiederspiegelt und im Reading text die offenen Fenster und Türen aufgelistet sind. Kann man folgendermaßen den Status erfragen 

(alles|das haus) (zu|abgeschlossen) = (
  answer => '(Value("d_schliessung") eq "zu") 
             ? "Es ist alles zu" 
             : "Nein, offen sind: ".ReadingsVal("d_schliessung","text","")'

Zustandsabfrage anhand des Aliasnamen

Möchte man alle Geräte anhand seines Attribut "alias" ansprechen, um dessen Status zu erfragen, könnte das so erfolgen.
Definition 

(zustand|status)( \S+)* (\S+) = (answer=>'my $s=Value((grep { "$2" =~ /$attr{$_}{alias}/i } (keys %attr))[0]);; "Der Status ist ".$s if $s')

Beispielsätze 

Wie ist der Zustand der Lüftung
sag mir den Status von der Haustür

Es ist auch möglich ein eigenes Attribut zu kreieren, und dieses als Klarnamenattribut zu verwenden. Hierzu einfach im Device global ein userattr hinzufügen. z.B. 

attr global userattr T2F_alias

Jetzt stehen in allen Devices das Attribut T2F_alias zur Verfügung. Vorteil ist das dann auch wieder RegExp verwendet werden können. Im oberen Beispiel müsste dann dass rot markierte "alias" durch "T2F_alias" ersetzt werden.

Ereignisbezogene Meldungen

Da answer immer sofort den Text ausgibt ist hier beschrieben wie man eine Antwort zu einem bestimmten Ereignisses erhalten kann.

Es genügt folgende Zeile anzulegen und seinen bedürfnissen anzupassen. 

bescheid = set googlecastdevice speak "Ich sollte bescheid geben $IF"

Über die T2F_if Bedingungen bekommt man jetzt immer eine Aussage sobald eine Ereignis eintritt.

Sätze wie 

gib bescheid wenn mama nach hause kommt
sag mir wenn die tür öffnet bescheid
wenn es draußen kalt ist sag mir bescheid

ergeben dann folgende Aussagen. 

Ich sollte bescheid geben wenn mama nach hause kommt
Ich sollte bescheid geben wenn die tür öffnet
Ich sollte bescheid geben wenn es draußen kalt ist

Man sollte darauf achten, dass die T2F_if Bedingungnen möglichst komplett von der RegExp erfasst werden. Dadurch können die Sätze komplett wiederholt werden.

Konfiguration innerhalb der Geräte

Neben der Identifikation der Geräte über die vorhandenen FHEM-Attribute (z.B. room, alias, ...) kann eine alternative Konfiguration auch über eigens für Talk2Fhem angelegte Attribute erfolgen. Die hierfür notwendigen Grundlagen und einige Beispiele sollen im Folgenden beschrieben werden.

Grundlagen / Voraussetzungen

1. Anlegen der notwendigen userattr am global-Device:

Erweiterung des Attributes userattr des Gerätes global um folgende Einträge: 

 T2F_places:textField-long T2F_properties:textField-long T2F_rooms:textField-long T2F_types_color:textField-long T2F_types_heating:textField-long T2F_types_info:textField-long T2F_types_switch:textField-long

2. Optional: Hilfsfunktionen für das automatische Füllen der T2F_keywordlist im talk-Device bei Änderung eines T2F-Attributes eines Gerätes

2a. erstellen einer sub in der 99_myUtils.pm: 

  sub fill_T2F_keywordlist
  {
    my ($name, $t2f_device) = @_;
    $name =~ s/T2F_//g;
    if ($name eq 'userattr')
    {
      return;
    }
    Log 0, "List: ".$name;
    my $currentAttr = AttrVal($t2f_device,"T2F_keywordlist","");
    my @currentAttrParts = split(/$name = /, $currentAttr);
    my $currentAttrBeg = @currentAttrParts[0];
    $currentAttrBeg = substr($currentAttrBeg, 0, -1);
    my @currentAttrEnd = split(/\n/, @currentAttrParts[1], 2);
    my @array = devspec2array('a:T2F_'.$name.'=.+');
    my @attributes = ();
    if (@array > 0 and defined($defs{$array[0]}))
    {
      foreach (@array){
      my @attrVals = split(/\n/,AttrVal($_, 'T2F_'.$name, ''));
      foreach (@attrVals){
          my $attrVal = $_;
          $attrVal =~ s/  / /g;
          $attrVal =~ s/ => /=>/g;
          my @attrValParts = split(/=>/,$attrVal);
          $attrVal = @attrValParts[0];
          $attrVal =~ s/!//g;
          $attrVal =~ s/, /,/g;
          my @attr = split(/,/, $attrVal);
          push(@attributes, @attr);
        }
      }
    }
    my %hash   = map { $_ => 1 } @attributes;
    my @unique = keys %hash;
    my $result = $currentAttrBeg."\n".$name." = ".join(", ", @unique)."\n".@currentAttrEnd[1];
    $result =~ s/\n\n/\n/g;
    $result =~ s/  / /g;
    fhem('attr '.$t2f_device.' T2F_keywordlist '.$result);
  }

2b. Erstellen eines DOIFs zum Aufruf der sub: 

 defmod talk.DI.fillAttr DOIF ([global:"^ATTR.*T2F_.*"]) ({my $val = ReadingsVal("$SELF", "e_global_events", ""); $val =~ m/(\S*) (\S*) (\S*) (.*)/; if ($2 ne 'talk' && $2 ne 'global') { fill_T2F_keywordlist("$3", "talk");}})
 attr talk.DI.fillAttr do always

3. Optional: Erlauben von Umlauten in den T2F-Attributen: 

 attr talk T2F_disableumlautescaping 1

Nun können die T2F-Attribute pro FHEM-Device definiert und dann in den Talk2Fhem-Befehlen benutzt werden. Wurde der Punkt 2 abgearbeitet, so werden mit dem Füllen der Attribute am Geräte auch die Keywordlisten am talk-Device gefüllt. Wie diese dann verwendet werden können, sollen die folgenden Beispiele zeigen.

Schalten von Geräten

Ausgangssituation: Es gibt drei Lampen Lampe1, Lampe2, Lampe3 und ein Nachtlicht mit einer Eule mit folgenden Attributen: 

 attr Lampe1 T2F_types_switch Lampe, !Licht
 attr Lampe1 T2F_rooms Haus, Obergeschoss, !Esszimmer
 attr Lampe1 T2F_places Decke, Tür
 attr Lampe1 T2F_properties hell,!

 attr Lampe2 T2F_types_switch Lampe, !Licht
 attr Lampe2 T2F_rooms Haus, Obergeschoss, !Esszimmer
 attr Lampe2 T2F_places Tisch, Esstisch
 attr Lampe2 T2F_properties dunkel,schwach,!

 attr Lampe3 T2F_types_switch Lampe, !Licht
 attr Lampe3 T2F_rooms Haus, Obergeschoss, !Küche
 attr Lampe3 T2F_places Besenschrank
 
 attr Nachtlicht T2F_types_switch Lampe, !Licht, Eule, Nachtlicht
 attr Nachtlicht T2F_rooms Haus, Obergeschoss, !Kinderschlafzimmer
 attr Nachtlicht T2F_places Steckdose

Durch die in Punkt 2 der Voraussetzungen genannten Funktionen wurden folgende T2F-keywordlisten automatisch angelegt: 

 attr talk T2F_keywordlist rooms = Kinderschlafzimmer, Haus, Küche, Obergeschoss, Esszimmer 
                           places = Tür, Steckdose, Tisch, Decke, Esstisch
                           properties = hell, dunkel, schwach
                           types_switch = Lampe, Licht, Eule

Die Definition für das T2F-Device lautet dann wie folgt: 

 #   1              2                 3                4            5          6          7      
 ?(bitte) && ?(@properties) && (@types_switch) && ?(@rooms) && ?(@places) && (\S+)(schalten|machen)?$ =
 (cmd=>'set T2F_types_switch=.*$3@.*:FILTER=T2F_rooms=.*$4@.*:FILTER=T2F_properties=.*$2@.*:FILTER=T2F_places=.*$5@.* $6{true=>on, false=>off}',
 answer=>'"$AGAIN" ? "dann $DATE wieder $6{true=>ein, false=>aus}" : "$1{/bitte/=>Gern, else=>Das heißt Bitte}, ich schalte $1{/bitte/=>, else=>trotzdem} folgende Geräte $6{true=>ein, false=>aus}: ".T2F_answer("T2F_types_switch=.*$3@.*:FILTER=T2F_rooms=.*$4@.*:FILTER=T2F_properties=.*$2@.*:FILTER=T2F_places=.*$5@.*","T2F_types_switch")')

Damit sind dann die folgenden Sprachbefehle möglich: 

 Schalte das Licht in der Küche ein                      => schaltet Lampe3 ein
 
 Schalte die helle Lampe im Esszimmer an                 => schaltet Lampe1 ein
 
 Schalte das Licht im Esszimmer über dem Esstisch ein    => schaltet Lampe2 ein
 
 Schalte die Eule ein                                    => schaltet Nachtlicht ein
 
 Schalte das Licht im Esszimmer aus}                     => schaltet Lampe1 und Lampe2 aus
 
 Schalte das Licht aus                                   => schaltet alle vier Lichter aus

Um in der Antwort die Liste der geschalteten Geräte genannt zu bekommen, wird die sub T2F_answer aus der 99_myUtils aufgerufen: 

sub T2F_answer
{
  my ($filter, $type) = @_;
  my $answer = '';
  my @devices = devspec2array($filter);
  if (@devices > 0 and defined($defs{$devices[0]}))
  {
    foreach (@devices){
      my $devAttr = AttrVal($_, $type, '');
      if ($answer ne '')
      {
        $answer = $answer.", ";
      }
      if (substr($devAttr,-1) ne "!")
      {
        my @entries = split(/!/, $devAttr);
        if (@entries < 2)
        {
          @entries = split(/,/, $entries[0]);
        }
        else
        {
          @entries = split(/,/, $entries[1]);
        }
        if (@entries[0] ne "")
        {
          $answer = $answer.@entries[0]." ";
        }
      }
      
      $devAttr = AttrVal($_, 'T2F_properties', '');
      if (substr($devAttr,-1) ne "!")
      {
        my @entries = split(/!/, $devAttr);
        if (@entries < 2)
        {
          @entries = split(/,/, $entries[0]);
        }
        else
        {
          @entries = split(/,/, $entries[1]);
        }
        if (@entries[0] ne "")
        {
          $answer = $answer.@entries[0]." ";
        }
      }
      
      $devAttr = AttrVal($_, 'T2F_rooms', '');
      if (substr($devAttr,-1) ne "!")
      {
        my @entries = split(/!/, $devAttr);
        if (@entries < 2)
        {
          @entries = split(/,/, $entries[0]);
        }
        else
        {
          @entries = split(/,/, $entries[1]);
        }
        if (@entries[0] ne "")
        {
          $answer = $answer.@entries[0]." ";
        }
      }
      
      $devAttr = AttrVal($_, 'T2F_places', '');
      if (substr($devAttr,-1) ne "!")
      {
        my @entries = split(/!/, $devAttr);
        if (@entries < 2)
        {
          @entries = split(/,/, $entries[0]);
        }
        else
        {
          @entries = split(/,/, $entries[1]);
        }
        if (@entries[0] ne "")
        {
          $answer = $answer.@entries[0]." ";
        }
      }
    }
  }
  return $answer."";
}

Die Benennung der Geräte erfolgt auf Basis derer T2F-Attribute: Typ, Eigenschaft, Raum, Ort. Ist das jeweilige Attribut leer, ist es auch in der Antwort leer. Enthält die jeweilige Attributliste ein Ausrufezeichen (!), so wird der Eintrag nach dem Ausrufezeichen für die Antwort verwendet (z.B. Esszimmer als Raum). Steht das Ausrufezeichen am Ende, so wird der Eintrag in der Antwort leer gelassen (z.B. die Eigenschaft bei Lampe1). Ist kein Ausrufezeichen vorhanden, so wird der erste Eintrag verwendet.

Einstellen der Heizung

Das gleiche Prinzp wie bei den Lampen kann auch für die Einstellung der Heizung verwendet werden.

Ausgangssituation: In der Küche, im Kinderschlafzimmer und im Esszimmer gibt es jeweils eine Heizung (Homematic HM-CC-RT-DN) mit folgenden Attributen: 

 attr HeizungEsszimmer T2F_places Heizung,!
 attr HeizungEsszimmer T2F_rooms Haus,Obergeschoss,Essbereich,!Esszimmer
 attr HeizungEsszimmer T2F_types_heating Heizung,Temperatur,Esszimmer,Essbereich,!

 attr HeizungKüche T2F_places Heizung,!
 attr HeizungKüche T2F_rooms Haus,Obergeschoss,Essbereich,!Küche
 attr HeizungKüche T2F_types_heating Heizung,Temperatur,Küche,Essbereich,!

 attr HeizungKiSchla T2F_places Heizung,!
 attr HeizungKiSchla T2F_rooms Haus,Obergeschoss,!Kinderschlafzimmer
 attr HeizungKiSchla T2F_types_heating Heizung,Temperatur,Kinderschlafzimmer,!


Mit der T2F-Definition 

 #   1             2                  3        4      5                  
 ?(bitte) && (@types_heating) && ?(@rooms) && (auf (\d+) grad|auto\S*)( stellen| setzen| einstellen| ein)?$ = 
 (cmd=>'set T2F_types_heating=.*$2{empty=>.+, else=>$2@}.*:FILTER=T2F_rooms=.*$3@.* $5{integer=>desired-temp $5, else=>controlMode auto}',
 answer=>'"$AGAIN" ? "dann $DATE wieder auf Automatik" : "Die Durchschnittstemperatur beträgt dort zur Zeit ".averageTemp("T2F_types_heating=.*$2{empty=>.+, else=>$2@}.*:FILTER=T2F_rooms=.*$3@.*")." Grad\n$1{/bitte/=>Gern, else=>Das heißt Bitte}, ich stelle die Heizung in folgenden Räumen auf $5{integer=>$5 Grad, else=>Automatik}: ".T2F_answer("T2F_types_heating=.*$2{empty=>.+, else=>$2@}.*:FILTER=T2F_rooms=.*$3@.*","T2F_types_heating")')

funktionieren folgende Sprachbefehle: 

 Bitte stell die Heizung im Esszimmer auf 21 Grad        => Stellt die Heizung im Esszimmer auf 21 Grad
 
 Bitte stell die Heizung im Essbereich auf 21 Grad       => Stellt die Heizungen im Esszimmer und in der Küche auf 21 Grad

 Bitte stell die Heizung im Obergeschoss auf Automatik   => Stellt die drei Heizungen auf Automatik

Dadurch, dass im Attribut T2F_types_heating auch die Räume aufgeführt sind, sind auch Befehle in folgender Form möglich: 

 Bitte stell die Küche auf 21 Grad                       => Stellt die Heizung in der Küche auf 21 Grad

Auch kann in diesem (wie auch in den oben aufgeführten Schaltbefehlen) mit "wieder" gearbeitet werden: 

 Bitte stell die Heizung im Essbereich auf 21 Grad und in 2 Stunden wieder auf Automatik

Für die Generierung der Antwort wird neben der bei den Schaltbefehlen bereits gezeigten sub T2F_answer eine weiter Funktion verwende, welche die Durchschnittstemperatur im zu schaltenden Bereich ermittelt und ausgibt: 

  sub averageTemp($)
  {
    my ($filter) = @_;
    my @tempDevices = devspec2array($filter);
    my $count = 0;
    my $measuredTemp = 0;
    if (@tempDevices > 0 and defined($defs{$tempDevices[0]})){
      foreach (@tempDevices){
        $measuredTemp = $measuredTemp + ReadingsVal($_, "measured-temp", "");
        $count = $count + 1;
      }
      return $measuredTemp / $count;
    }
    return 0;
  }

Einstellen der Farbe von Farbwechsellampen (Philips Hue, Wifilight, ...)

Für das Beispiel zum Einstellen der Lichtfarbe nehmen wir eine Farbwechsellampe LampeBunt an, welche den Befehl RGB unterstützt. Diese erhält folgende Attribute: 

 attr LampeBunt T2F_places Decke,Couch,Sofa
 attr LampeBunt T2F_rooms Haus,Dachgeschoss,!Wohnzimmer
 attr LampeBunt T2F_types_color Lampe,Licht
 attr LampeBunt T2F_types_switch Lampe,Licht

Durch das Attribut T2F_types_switch lässt sich diese über die bereits beschriebene Schaltlogik ein und ausschalten. Durch die zusätzlich T2F-Definition 

 #   1              2               3             4              5               6 
 ?(bitte) && (@types_color) && ?(@rooms) && ?(@places) && auf (@colors)( schalten| stellen)?$ = 
 (cmd=>'set T2F_types_color=.*$2@.*:FILTER=T2F_rooms=.*$3@.*:FILTER=T2F_places=.*$4@.* RGB $5[@rgb]', 
 answer=>'"Ich schalte folgende Geräte auf $5@: ".T2F_answer("T2F_types_color=.*$2@.*:FILTER=T2F_rooms=.*$3@.*:FILTER=T2F_places=.*$4@.*","T2F_types_color")')

und die entsprechenden Attribute am T2F-Device talk (HINWEIS: eigene Listen können Problemlos ergänzt werden, diese werden durch die Hilfsfunktionen NICHT überschrieben) 

 attr talk T2F_keywordlist colors = Aus, Schwarz, Dunkles Schiefergrau, Schiefergrau, Helles Schiefergrau, Helles Stahlblau, Mattes Grau, Grau, Dunkelgrau, Silber, Hellgrau, Gainsboro, Rauchiges Weiß, Geisterweiß, Weiß, Schneeweiß, Elfenbein, Blütenweiß, Muschel, Altgold, Leinenfarbe, Antikes Weiß, Mandelweiß, Cremiges Papaya, Beige, Mais, Helles Goldrutengelb, Hellgelb, Chiffongelb, Blasse Goldrutenfarbe, Khaki, Gelb, Gold, Orange, Dunkles Orange, Goldrute, dunkle Goldrutenfarbe, Peru, Schokolade, Sattelbraun, Ocker, Braun, Dunkelrot, Kastanienbraun, Ziegelfarbe, Indischrot, Karmesinrot, Rot, Orangenrot, Tomatenrot, Koralle, Lachs, Helles Korallenrot, Dunkle Lachsfarbe, Helle Lachsfarbe, Sandbraun, Rosiges Braun, Gelbbraun, Grobes Braun, Weizen, Pfirsich, Navajoweiß, Tomatencreme, Rosige Lavenderfarbe, Altrosa, Rosa, Hellrosa, Leuchtendes Rosa, Fuchsie, Magentarot, Tiefrosa, Mittleres Violettrot, Blasses Violettrot, Pflaume, Distel, Lavendelfarbe, Violett, Orchidee, Dunkles Magentarot, Violett, Indigo, Blauviolett, Dunkles Violett, Dunkle Orchideenfarbe, Mittleres Violett, Mittlere Orchideenfarbe, Mittleres Schieferblau, Schieferblau, Dunkles Schieferblau, Mitternachtsblau, Marineblau, Dunkelblau, Mittelblau, Blau, Königsblau, Stahlblau, Kornblumenblau, Dodger-Blau, Tiefes Himmelblau, Helles Himmelblau, Himmelblau, Hellblau, Zyanblau, Blaugrün, Taubenblau, Helles Cyanblau, Aliceblau, Himmelblau, Cremig Pfefferminz, Honigmelone, Aquamarinblau, Türkis, Blasses Türkis, Mittleres Türkis, Dunkles Türkis, Mittleres Aquamarinblau, Helles Seegrün, Dunkles Zyanblau, Entenbraun, Kadettblau, Mittleres Seegrün, Dunkles Seegrün, Hellgrün, Blassgrün, Mittleres Frühlingsgrün, Frühlingsgrün, Zitronengrün, Gelbgrün, Seegrün, Waldgrün, Grün, Dunkelgrün, Olivfarbiges Graubraun, Dunkles Olivgrün, Olivgrün, Dunkles Khaki, Gelbgrün, Hellgrün, Grüngelb

 attr talk T2F_modwordlist rgb = 000000, 000000, 8FBC8F, 708090, 778899, B0C4DE, 696969, 808080, A9A9A9, C0C0C0, D3D3D3, DCDCDC, F5F5F5, F8F8FF, FFFFFF, FFFAFA, FFFFF0, FFFAF0, FFF5EE, FDF5E6, FAF0E6, FAEBD7, FFEBCD, FFEFD5, F5F5DC, FFF8DC, FAFAD2, FFFFE0, FFFACD, EEE8AA, F0E68C, FFFF00, FFD700, FFA500, FF8C00, DAA520, B8860B, CD853F, D2691E, 8B4513, A0522D, A52A2A, 8B0000, 800000, B22222, CD5C5C, DC143C, FF0000, FF4500, FF6347, FF7F50, FA8072, F08080, E9967A, FFA07A, F4A460, BC8F8F, D2B48C, DEB887, F5DEB3, FFDAB9, FFDEAD, FFE4C4, FFF0F5, FFE4E1, FFC0CB, FFB6C1, FF69B4, FF00FF, FF00FF, FF1493, C71585, DB7093, DDA0DD, D8BFD8, E6E6FA, EE82EE, DA70D6, 8B008B, 800080, 4B0082, 8A2BE2, 9400D3, 9932CC, 9370DB, BA55D3, 7B68EE, 6A5ACD, 483D8B, 191970, 000080, 00008B, 0000CD, 0000FF, 4169E1, 4682B4, 6495ED, 1E90FF, 00BFFF, 87CEFA, 87CEEB, ADD8E6, 00FFFF, 00FFFF, B0E0E6, E0FFFF, A0CE00, F0FFFF, F5FFFA, F0FFF0, 7FFFD4, 40E0D0, AFEEEE, 48D1CC, 00CED1, 66CDAA, 20B2AA, 008B8B, 008080, 5F9EA0, 3CB371, 8FBC8F, 90EE90, 98FB98, 00FA9A, 00FF7F, 00FF00, 32CD32, 2E8B57, 228B22, 008000, 006400, 6B8E23, 556B2F, 808000, BDB76B, 9ACD32, 7FFF00, ADFF2F

kann die Farbe nun auch über folgenden Sprachbefehle eingestellt werden: 

 Bitte schalte die Lampe im Wohnzimmer an der Couch auf Olivfarbiges Graubraun

Dadurch, das die Liste colors den Wert "Aus" mit dem entsprechenden Wert "000000" in der Liste rgb enthält, kann die Lampe über die gleiche Logik auch ausgeschaltet werden: 

 Bitte schalte das Licht im Wohnzimmer auf Pflaume und in einer Stunde wieder aus

Abfragen beliebiger Geräteinformationen

Das folgende Beispiel zeigt die Möglichkeit auf, die Antworten für Statusabfragen direkt am abgefragten Gerät zu definieren. Hierfür werden zunächst eine Definition am T2F-Device 

 #              1             2                3            4
 Wie && ?(@properties)&& (@types_info) && ?(@rooms) && ?(@places) = 
 (answer=>'T2F_getInfo("T2F_types_info=.*$2@.*:FILTER=T2F_rooms=.*$3@.*:FILTER=T2F_properties=.*$1@.*:FILTER=T2F_places=.*$4@.*","$2@")')

und eine Funktion in der 99_myUtils 

sub T2F_getInfo
{
  my ($filter,$info) = @_;
  my @devices = devspec2array($filter);
  if (@devices > 0 and defined($defs{$devices[0]}))
  {
    my $answer = '';

    foreach (@devices){
      if ($answer ne '')
      {
        $answer = $answer.", ";
      }
      my $device = $_;
      my @attrVals = split(/\n/,AttrVal($device, 'T2F_types_info', ''));
      foreach (@attrVals){
        my $attrVal = $_;
        $attrVal =~ s/  / /g;
        $attrVal =~ s/ => /=>/g;
        my @attrValParts = split(/=>/,$attrVal);
        if (@attrValParts[0] =~ /$info/)
        {
          my $cmd = "' ".@attrValParts[1]."'";
          $cmd =~ s/=/\//g;
          $cmd =~ s/\)\(/\/r=~s\//g;
          $cmd =~ s/\)/\/r.'/g;
          $cmd =~ s/#\(/', '')=~s\//g;
          $cmd =~ s/ #/ '.ReadingsVal('$device', '/g;
          $cmd =~ s/#/', '').'/g;
          $cmd =~ s/T2F_answer/'.T2F_answer('$device', 'T2F_types_switch').'/g;
          $answer = $answer.' '.eval($cmd);
        }
      }
    }
    return $answer;
  }
}

Die Konfiguration und Funktionsweise sind nun wie folgt: Das Gerät, dessen Status abgefragt werden sollen erhält neben den Oben bereits beschriebenen Attributen für Eigenschaft, Raum und Ort noch das Attribut T2F_types_info, welches Zeilenweise die abzufragenen Status in der folgenden Form enthält: 

 abfragewert => Das ist die Antwort von Gerät T2F_answer mit den Wert #reading#(suchen1=ersetzen1)...(suchenn=ersetzenn)

Mit der Form #reading#(suchen1=ersetzen1)...(suchenn=ersetzenn) können die Werte von Readings des abgefragten Device zum Zeitpunkt der Abfrage ermittelt werden und im Ergebnis Ersetzungen vorgenommen werden (z.B. (on=an)(off=aus)). T2F_answer wird mit der T2F-Konfiguration (siehe oben) ersetzt. Für das Beispiel einer Heizung im Esszimmer wäre das zum Beispiel wie folgt möglich: 

 attr HeizungEsszimmer T2F_places Heizung,!
 attr HeizungEsszimmer T2F_rooms Haus,Obergeschoss,Essbereich,!Esszimmer
 attr HeizungEsszimmer T2F_types_info warm,Temperatur => Die Temperatur T2F_answer beträgt #measured-temp# Grad und soll #desired-temp# Grad erreichen\
                                      modus,Betriebsart => Die Betriebsart T2F_answer ist #controlMode#(auto=Automatik)(manu=Hand)\
                                      Ventilstellung => Das Ventil T2F_answer ist #ValvePosition# Prozent geöffnet

Damit sind dann folgende Abfragen möglich: 

 Wie warm ist die Heizung im Esszimmer?
 
 Wie ist die Temperatur der Heizung im Esszimmer?
 
 Wie ist die Ventilstellung der Heizung im Esszimmer?
 
 Wie warm sind die Heizungen?

Häufig verwendete RegExp

Perl Regular Expression, also ein regulärer Ausdruck der Programmiersprache Perl, ist eine Werkzeug um Zeichenketten zu beschreiben. Hier wird ein kurzer Einblick auf die im Artikel häufig genutzten RegExp zu geben.

Eine Auflistung der Syntax kann hier eingesehen werden. [1]

RegExp Beschreibung
\S* Beliebig viele (*) nicht Leerzeichen (\S). Für unbekannten und unwichtigen Wortendungen
z.b. garage\S* ist bei Garage, Garagentor oder Garagentür erfolgreich
\S+ Mehr als ein Zeichen (+) welches kein Leerzeichen ist (\S)
\S\S? Ein oder zwei Zeichen die keine Leerzeichen sind. Das "?" wirkt hier nur auf das angrenzende "\S".
Sollte für Umlaute verwendet werden, da bei manchen Eingabemethoden Probleme mit Umlauten auftreten können.
(wort )? Ein bestimmtes Wort oder nicht.
(wort1|wort2) Entweder wort1 oder Wort2
wort$ Nur wenn das Wort am ende der Zeichenkette steht.
(\S+){0,2} Keins, eins oder zwei Wörter. Kann für Artikel wie z.B. "(in der|in dem|im|auf der|...)?" eingesetzt werden

Ausgabemethoden

Siehe hierzu Anwendungsbeispiel

Abgerufen von „http://wiki.fhem.de/w/index.php?title=Talk2Fhem&oldid=25309“