Vinnerliste

Noen spurte meg om hvordan jeg bruker LED-lenker i huset, så her kommer en kort oppsummering. Vi bruker LED-lenker som en aktiv del av belysningen både inne og ute. Den siste RGBW-stripen jeg kjøpte var denne. Soverommet har en bak rammen på sengen. Brukes primært til solskinnsvekkerklokke (det tar 30 minutter fra rødt til hvitt, og dimmer opp saktere i begynnelsen enn på slutten) Ute har vi 15 meter stripe langs gangstien opp til huset (i tillegg til noen 12V LED-spotter for buskbelysning). Montert under alu. avrundete trappeneser, ca 15-20 cm høyde. RGBW LED-stripe over (de motoriserte) lamellene i stua: Annen vinkel (dårligere fargegjengivelse): RGBW over skapet i spisestua (farge satt som den samme som den over lamellene, og forsøkt tilpasset fargen til resten av lyset i stua) Over kjøkkenbenken (kun cool white). Gir et godt arbeidslys, men ingen romantikk. Ligger dobbelt, dvs langs kanten mot veggen og listen. RGB-stripe over senga til yngste datter. Eldste datter fikk "dansespeil med lys". Før og etter oppdatering til Fibaro RGBW-controller, den gamle 433MHz controllerens fjernkontroll begynte å bli dårlig... Lektet ut 12 mm fra veggen:

Et lite script som gir deg gjennomsnittsforbruket for hvert 5. minutt. Parameter skilles med |. Første parameter er strømforbruket nå totalt strømforbruk, andre er output device. Private value_last As Double = 0 Private value_now As Double = 0 Private average As Double Private time_last As Integer Private time_now As Integer Private dev_average As Integer Private dev_usage As Integer Private devs() As String Public Sub Main(ByVal input As Object) devs = input.Split("|") dev_usage = devs(0) dev_average = devs(1) value_last = value_now value_now = hs.DeviceValueEx(dev_usage) time_last = hs.DeviceTime(dev_average) time_now = hs.DeviceTime(dev_usage) 'hs.WriteLog("Power debug", "value_last: " & value_last & ", value_now: " & value_now & ", time_last: " & time_last) If value_last > 0 Then average = Math.Round((value_now - value_last) / (time_last / 60.0), 3) 'hs.WriteLog("Power debug", "average: " & average) hs.SetDeviceValueByRef(dev_average, average, True) hs.SetDeviceString(dev_average, average.ToString("f3") & "kW", True) Else hs.SetDeviceValueByRef(dev_average, 0, True) hs.SetDeviceString(dev_average, "Waiting...", True) End If End Sub ... og et script for å "ta vare på" gårsdagens forbruk. Kjører kl. 23:59:45. Oppdater de to første og de to siste linjene med dine egne input og output devicer. Sub Main(parm As Object) Dim str As String = hs.DeviceString(155) Dim val As Double = hs.DeviceValueEx(155) hs.waitsecs(20) hs.SetDeviceValueByRef(1177, val, True) hs.SetDeviceString(1177, str, True) End Sub

Vi skulle jo lage TV også. Jeg åpnet opp.

Offtopic: gratulere med vell overstått, Ingen «hjelp» underskoa;-) Har ikke merket noe minne problemer etter min oppgradering.

M.nu har Conbee på lager, men ikke mange igjen: https://www.m.nu/philips-hue-tillbehor/conbee-usb-zigbee-controller Ser ut til å funke greit med Home Assistant: https://snillevilla.se/styr-ikea-tradfri-lampor-i-home-assistant-med-conbee/ Edit: dette ble bare tull. Poste URLer med Tapatalk var ikke lett

Hvilken VERA kontroller er det da? VERA Plus og Secure har jo betydelig større kapasitet enn Edge og de eldre.. Mye enklere å migrere til nyere Vera.

Beklager dårlig formulering. Det jeg mente var at man kan bruke Hue-bryterne til å skru av/på andre enheter som ligger i Home-appen.

Alexa, drop in on <navn på rom du har angitt den andre echo-enheten står i - altså navnet som er angitt i Alexa-panelet for den enkelte echo-enhet hos Amazon>

Blir nok en runde til. ? Må bare bestille enkelteksemplar for å finne ut hvilke jeg skal kjøpe mer av. Har enda en etasje som er helt "dom" å smartifisere.

Ja, det gir jo mening... ?