habe mir die Wetterstation Renkforce WH2600 zugelegt! http://www.conrad.ch/ce/de/product/1267654/
Diese Wetterstation scheint mir eine gute Alternative zum Funk-Kombi-Sensor OC3 zu sein!
Die Wetterstation hat die Möglichkeiten:
Aussen Temperatur
Aussen relative Luftfeuchtigkeit
Windgeschwindigkeit
Windrichtung
Regenmenge
UV-Sensor
Licht-Sensor
--
Innen Temperatur
Innen relative Luftfeuchtigkeit
Luftdruck
Die Sensorwerte werden an die WH2600 BassisStation übertragen.
Die WH2600 BassisStation hat einen LAN Anschluss und die Möglichkeit direkt mit wonderground.com zu verbinden!
Wie man Daten von wonderground.com in HomeMatic einbinden kann, wurde hier schon beschrieben.
Diese Lösung ist mir aber nicht sympathisch da wenn wonderground.com nicht erreichbar, somit auch keine Daten!
Habe hier ein TCL geschrieben mit dem man über das Lokale Netzwerk auf die WH2600 BassisStation
LiveDaten zugreifen und die entsprechenden Daten in die HomeMatic Systemvariable ablegen kann!
Vorgehensweise:
1) Alle Variablen in der HomeMatic definieren (Ist im wh2600.tcl beschrieben)
2) Im /www/addons Verzeichnis das Verzeichnis "wetter" anlegen
3) wh2600.tcl Skript in oben angelegtes Verzeichnis /www/addons/wetter kopieren
4) Im wh2600.tcl Skript die WH2600 BassisStation IP anpassen
5) Periodischen Aufruf des wh2600.tcl Skripts (z. B. Minütlich) in der gewohnten Art anlegen.
Bemerkung:
Zu meinem Zweck brauchte ich nicht alle Daten der WH2600, die TCL kann aber beliebig selbst ausgebaut werden
wh2600.tcl
Code: Alles auswählen
#!/bin/tclsh
load tclrega.so
# --------------------------------------------
# wh2600.tcl 10.02.2016:11.00
# --------------------------------------------
# Hole LiveDaten der WH2600 Basissstation(Weather Logger 2.1)
# und setze Werte in Homematic Systemvariablen!
# --------------------------------------------
# Anzulegende Systemvariablen in Homematic:
# -----------------------------
# Name ! Varialentyp
# --------------!--------------
# WSOutTemp ! Zahl
# WSOutFeucht ! Zahl
# WSWindRicht ! Zahl
# WSWind ! Zahl
# WSWindBoe ! Zahl
# WSSonnStrahl ! Zahl
# WSUvIndex ! Zahl
# --------------------------------------------
# --------------------------------------------
# Function
# Daten holen aus Basisstation HTM
proc getvalue {v d} {
set pos_argname [string first $v $d]
set pos_value1 [expr [string first "value=" $d $pos_argname] + [string length "value="] + 1]
set pos_value2 [expr [string first " " $d $pos_value1] - 2]
return [string range $d $pos_value1 $pos_value2]
}
# --------------------------------------------
# Aktuelle Basisstation Live Daten in Datei wh2600.dat
# --
# WH2600 Basisstation IP Anpassen <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
set url http://192.168.1.61/livedata.htm
# --
# Speicherort auf Homematic fuer wh2600.dat Anpassen <<<<<<<<<<<<
set htmfile /www/addons/wetter/wh2600.dat
# --
exec /usr/bin/wget -q -O $htmfile $url
# --------------------------------------------
# Lade aktuelle Basisstations Live Daten
set f [open $htmfile]
set data [read $f]
close $f
#+++++++++++++++++++++++++++++++++++++++++++++++++++++++
set rega_cmd ""
append rega_cmd "var s1 = '';"
# --------------------------------------------
# WH2600 LiveDaten "Outdoor Temperature"
# -------------------
set value [getvalue "outTemp" $data]
append rega_cmd "s1 = dom.GetObject('WSOutTemp');"
append rega_cmd "s1.State('$value');"
# --------------------------------------------
# WH2600 LiveDaten "Outdoor Humidity "
# -----------------
set value [getvalue "outHumi" $data]
append rega_cmd "s1 = dom.GetObject('WSOutFeucht');"
append rega_cmd "s1.State('$value');"
# --------------------------------------------
# WH2600 LiveDaten "Wind Direction"
# --------------
set value [getvalue "windir" $data]
append rega_cmd "s1 = dom.GetObject('WSWindRicht');"
append rega_cmd "s1.State('$value');"
# --------------------------------------------
# WH2600 LiveDaten "Wind Speed"
# ----------
set value [getvalue "avgwind" $data]
append rega_cmd "s1 = dom.GetObject('WSWind');"
append rega_cmd "s1.State('$value');"
# --------------------------------------------
# WH2600 LiveDaten "Wind Gust"
# ---------
set value [getvalue "gustspeed" $data]
append rega_cmd "s1 = dom.GetObject('WSWindBoe');"
append rega_cmd "s1.State('$value');"
# --------------------------------------------
# WH2600 LiveDaten "Solar Radiation"
# ---------------
set value [getvalue "solarrad" $data]
append rega_cmd "s1 = dom.GetObject('WSSonnStrahl');"
append rega_cmd "s1.State('$value');"
# --------------------------------------------
# WH2600 LiveDaten "UVI"
# ---
set value [getvalue "uvi" $data]
append rega_cmd "s1 = dom.GetObject('WSUvIndex');"
append rega_cmd "s1.State('$value');"
rega_script $rega_cmd
# ++++++++++++++++++++++++++++++++++++++++++++++++++++++
