Wunderground Wetter mit einfachem HM-Skript holen

[funkleuchtturm]

Auf meiner Homepage gibt´s hierzu evtl. weitere Informationen: http://www.stall.biz/?project=wundergro ... ript-holen

In einem anderen Thread wurde sehr ausführlich und gut beschrieben, wie man die Wetterdaten von wunderground.com in die Homematic bekommt.
http://homematic-forum.de/forum/viewtop ... nderground
Allerdings verwendet diese Lösung ein TCL-Skript, was insbesondere für den Anfänger nur mit Aufwand implementierbar ist und dementsprechend Fehlermöglichkeiten hat.

Hier wird ein "Kochrezept" für die Implementierung eines wunderground.com-Wetterdatenabrufes beschrieben, der nur mit einem HM-Skript arbeitet:
1. API-Key von Wunderground besorgen wie unter o.a. Link beschrieben
2. Insgesamt 13 Systemvariable entsprechend der Vorgaben im nachfolgenden Skript sorgfältig ohne Schreibfehler (!) anlegen
(schon bei einem kleinsten Schreibfehler oder fehlender Systemvariable läuft das Skript nicht durch!)
3. Im nachfolgenden Skript den API-Key in die URL-Zeile eintragen und vorher die Funktion der URL ausprobieren
(im Browser aufrufen und dann erhält man den aktuellen XML-Wetterfile im Browser angezeigt!).
4. Ein einfaches WebUI-Programm erstellen, das auf Tastendruck oder alle 30min das nachfolgende Skript aufruft.

Fertig!

Code: Alles auswählen

        !Stand 03.04.2014  http://homematic-forum.de/forum/viewtopic.php?f=31&t=17209
        !zuerst folgende Systemvariablen anlegen
        !Achtung: keine vergessen und exakte Schreibweise mit Drag&Drop
        !Wetter_Station                        Zeichenkette
        !Wetter_Aktualisierung             Zeichenkette
        !Wetter_Bedingungen               Zeichenkette
        !Wetter_Temperatur                  Zahl                     °C
        !Wetter_Luftfeuchte                  Zahl                      %
        !Wetter_Windbedingungen       Zeichenkette
        !Wetter_Windrichtung               Zeichenkette
        !Wetter_Windrichtg                   Zahl                       °
        !Wetter_Windgeschwindigkeit   Zahl                     km/h
        !Wetter_Windboeen                  Zahl                     km/h
        !Wetter_Luftdruck                      Zahl                      mb
        !Wetter_Luftdrucktrend             Zeichenkette
        !Wetter_Taupunkt                      Zahl                     °C
        !Wetter_UV                                Zeichenkette

        var url = "http://api.wunderground.com/api/<hier api-key>/conditions/lang:DL/q/Germany/Hierorthin.xml";

        !hier ist die Abfrage mit CUxD
        dom.GetObject("CUxD.CUX2801001:1.CMD_SETS").State("wget -q -O - '"#url#"'");
        dom.GetObject("CUxD.CUX2801001:1.CMD_QUERY_RET").State(1);
        string wetter_xml = dom.GetObject("CUxD.CUX2801001:1.CMD_RETS").State();

        !hier ist die Abfrage mit system.Exec
        !string stdout;
        !string stderr;
        !system.Exec("wget -q -O - '"#url#"'", &stdout, &stderr);
        !WriteLine(stdout);
        !string wetter_xml = stdout;
        !WriteLine(wetter_xml);

        !Beim XML-File den ueberfluessigen Header entfernen
        integer laenge = wetter_xml.Length();
        integer wort_position = wetter_xml.Find("display_location");
        wetter_xml = wetter_xml.Substr(wort_position, (laenge - wort_position));
        !WriteLine(wetter_xml);

        !Daten mit Suchworten aus XML-File ausfiltern:

        !string word = "full";
        string word = "city";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        daten = daten.Substr(0, (word_position -2));
        dom.GetObject("Wetter_Station").State(daten);

        !string word = "observation_time";
        string word = "observation_time_rfc822";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        !daten = daten.Substr(0, (word_position -2));
        daten = daten.Substr(0, (word_position -11));
        dom.GetObject("Wetter_Aktualisierung").State(daten);

        string word = "weather";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        daten = daten.Substr(0, (word_position -2));
        dom.GetObject("Wetter_Bedingungen").State(daten);

        string word = "temp_c";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        daten = daten.Substr(0, (word_position -2));
        real zahl = daten.ToFloat();
        dom.GetObject("Wetter_Temperatur").State(zahl);

        string word = "relative_humidity";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        daten = daten.Substr(0, (word_position -2));
        integer zahl = daten.ToFloat();
        dom.GetObject("Wetter_Luftfeuchte").State(zahl);

        string word = "wind_string";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        daten = daten.Substr(0, (word_position -2));
        dom.GetObject("Wetter_Windbedingungen").State(daten);

        string word = "wind_dir";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        daten = daten.Substr(0, (word_position -2));
        word_laenge =daten.Length();
        string anfangsbuchstabe = daten.Substr(0,1);
        ! Umlaute korrigieren
        ! N # Nord ***
        if (anfangsbuchstabe == "N")
                 { if (daten == "Nordwest") {daten = "Nord-West" ;} }
        ! S # Süd ***
        if (anfangsbuchstabe == "S") {
           ! 4 # Süd
           if (word_laenge == 4)  {daten = "Süd";}
           ! 8 # Südwest
           if (word_laenge == 8)  {daten = "Süd-West";}
           ! 12 # Süd-Südost
           if (word_laenge == 12) {daten = "Süd-Süd-Ost" ;}
             ! 13
           if (word_laenge == 13) {daten = "Süd-Süd-West" ;}   }

        ! W # Westen
        if (anfangsbuchstabe == "W") {
           ! 13 # West-Südwest
            if (word_laenge == 13) {daten = "West-Süd-West" ;} }

        ! O # Osten
        if (anfangsbuchstabe == "O") {
           ! 11 # Ost-Südost
           if (word_laenge == 11) {daten = "Ost-Süd-Ost" ;} }

        dom.GetObject("Wetter_Windrichtung").State(daten);
        !WriteLine(daten);

        string word = "wind_degrees";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        daten = daten.Substr(0, (word_position -2));
        integer zahl = daten.ToFloat();
        dom.GetObject("Wetter_Windrichtg").State(zahl);

        string word = "wind_kph";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        daten = daten.Substr(0, (word_position -2));
        integer zahl = daten.ToFloat();
        dom.GetObject("Wetter_Windgeschwindigkeit").State(zahl);

        string word = "wind_gust_kph";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        daten = daten.Substr(0, (word_position -2));
        integer zahl = daten.ToFloat();
        dom.GetObject("Wetter_Windboeen").State(zahl);

        string word = "pressure_mb";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        daten = daten.Substr(0, (word_position -2));
        integer zahl = daten.ToFloat();
        dom.GetObject("Wetter_Luftdruck").State(zahl);

        string word = "pressure_trend";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        daten = daten.Substr(0, (word_position -2));
        dom.GetObject("Wetter_Luftdrucktrend").State(daten);

        string word = "dewpoint_c";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        daten = daten.Substr(0, (word_position -2));
        real zahl = daten.ToFloat();
        dom.GetObject("Wetter_Taupunkt").State(zahl);

        string word = "UV";
        integer word_laenge = word.Length();
        integer word_position = wetter_xml.Find(word);
        string daten = wetter_xml.Substr((word_position + word_laenge +1), 100);
        integer word_position = daten.Find(word);
        daten = daten.Substr(0, (word_position -2));
        real zahl = daten.ToFloat();
        dom.GetObject("Wetter_UV").State(zahl);

Changelog: 03.04.2014 Umlaute Himmelsrichtungen korrigiert, UV-Kennwert zugefügt. Danke für die entsprechenden Anregungen hier im Blog!

[smike]

Danke! Das funktioniert sehr schön und ist auch sehr einfach!
Eine kurze Frage hätte ich: Warum müssen alle Systemvariablen angelegt sein, damit das Script funktioniert?
(Für mich wäre rein theoretisch Temperatur und Luftfeuchte ausreichend.)

[funkleuchtturm]

Du musst nicht unbedingt alle Wetterwerte bei Wunderground abholen. Wenn Du geeignete Änderungen im Skript machst, dann musst Du auch nur die zugehörigen Systemvariablen anlegen.
Wichtig ist nur, dass alle im Skript aufgerufenen Systemvariablen auch im WebUI angelegt sind und jeder den vorgegebenen Variablentyp hat. Wenn das Skript eine Systemvariable nicht findet, läuft das Skript nicht durch und funktioniert nicht!

Ich würde empfehlen, das Programm ohne Änderung zu übernehmen. Du wirst insbesondere mit den Winddaten sicher zukünftig was anfangen können: Beispielsweise bei einer bestimmten Windstärke aus einer bestimmten Windrichtung die Rolläden oder Markisen einfahren usw.

[mike9677]

Hi,

lässt sich hier an der Darstellung auch noch was machen ?

[SHC]

Hallo,

die URL gibt ja Neuwied als Ort vor

http://api.wunderground.com/api/****API ... euwied.xml

Ich finde bei Wunderground leider nicht die richtigen Daten, um die Stadt bzw. den Standort zu ändern? Wo kann ich das nachsehen?

Vielen Dank,
SHC

[mike9677]

ändere mal in der URL Niewied auf Köln oder Hamburg ab. Sollte gehen.

[SHC]

Stimmt das funktioniert! Danke!

Jetzt gibt es in Hamburg allerdings mehrere Stationen, kann man die auch direkt anwählen?

SHC

[looxer01]

Hi,

du gehst in Wunderground. Gibst in der Suche deine Stadt ein.
Dann, ganz unten auf der Seite gibt es eine Liste mit Stationen.
Du suchst dir die nächste Station, möglichst nah an deinem Standort. Am besten eine, die mit Echtzeit gekennzeichnet ist und klickst darauf.
Dann werden weiter unten einige Graphen angezeigt. Über den ersten steht der Stationsname:

Beispiel hier INORDRHE...
"http://api.wunderground.com/api/ID##### ... RHE###.xml"

vG L...

[SHC]

1000 Dank!!

[derAuge]

Hallo

Danke für die Anleitung.

Leider läuft der script bei mir nicht.
Die ersten Schritte konnte ich erfolgreich abschließen (Key - Ort)

Dann den Script erstellt und folgendes aktiviert (da ich CUxD installiert habe)

Code: Alles auswählen

!hier ist die Abfrage mit CUxD
dom.GetObject("CUxD.CUX2801001:1.CMD_SETS").State("wget -q -O - '"#url#"'");
dom.GetObject("CUxD.CUX2801001:1.CMD_QUERY_RET").State(1);
string wetter_xml = dom.GetObject("CUxD.CUX2801001:1.CMD_RETS").State();

Fehlermeldung: "ExecError: Execution failed"

muss ich bei diesee variante noch Geröte in CUxD anlegen?

Gruß

derAuge