Vinnerliste

Ringeklokke fra netatmo, kanskje en "ring"-killer , ser ut til at denne ikke krever noen cloud eller månedlig betaling. https://www.netatmo.com/no-no/security/doorbell?force_locale=no-no "Velg å lagre videoene automatisk i din Dropbox-sky eller personlige FTP-server".

Da har jeg anskaffet og montert denne. Det vil si, jeg har kjøpt Sunricher modellen som selges av Tronika: https://www.tronika.no/no/zwave-kontrollere/1152-veggkontroller-zv9001k8-dim-g4.html Antar at dette er den samme som Heatit selger. Samme kvalitetsfølelse som på den gamle modellen fra Tronika som kun håndterte assosiasjoner. Den nye passer i Elko rammer og kan styre scener, kan assosieres via gateway, og den kan ha direkte assosiasjon (manual hos Tronika). Jeg foreløpig kun testet med scener. Gled fint inn i Homeseer. Hver knapp kan ha statusene: 1 trykk, hold og release. Slik som dette:

Hvis det er IKEA pærer så kan du prøve:

Du skal ha deCONZ med ConBee, uten tvil. TrådfriSeer er kun et nødvendig onde hvis du ikke har andre alternativer.

Etter å ha kjørt en natt uten ett tilfelle av feil så legger jeg ut link til versjon 0.0.0.7 i første post.

Vi har HSTouch på mobilene våre og jeg har lenge tenkt jeg skulle legge inn noen av de grafene jeg har tilgang på fra Device History. Startet med det i dag og da innså jeg at det var veldig begrenset hvor mye man kunne tilpasse grafene via vanlig event, mens man kunne gjøre mye mer tilpassninger via script. Med script ble det også en fordel at man bare trenger å endre ett sted om jeg vil endre noe på designet på grafene, i stedet for å måtte endre mange events. Sub Main(ByVal params as Object) ' @Author: ZoRaC ' @Version: 1.1 (2019-01-09) ' @Syntax: dvRef|time in hours|Y1-label ' SETTINGS Dim parameters() as String = params.ToString.Split("|") Dim dvRef As String = parameters(0) Dim hours As Integer = parameters(1) Dim y1Lbl As String = parameters(2) Dim dv As Scheduler.Classes.DeviceClass = hs.GetDeviceByRef(dvRef) Dim dvName As String = dv.Name(Nothing) Dim filename As String = Nothing Dim seconds As Integer = hours*60*60 Dim timeString As String = parameters(1) & " timer" If hours > 24 Then timeString = "1 dag" End If If hours > 48 Then timeString = TimeSpan.FromSeconds(seconds).Days & " dager" End If ' CREATE GRAPH filename = hs.PluginFunction("Device History", "", "CreateChartEx",New Object(){dvRef,"{'Title': '" & dvName & " (" & timeString & ")', 'Y1Label': '" & y1Lbl & "','Y2Label': '','XLabel': 'Dato/Tid', 'ShowLegend': false, 'DurationType': 2, 'PeriodType': 1, 'Periods': " & hours & ", 'Style': 2, 'UseMarkers': false, 'Width': 460, 'Height': 310, 'RotateDegrees': 270}", "", ""}) End Sub I manualen til Device History finnes det mange flere parametere man kan putte inn for å tilpasse utseendet på grafen. Scriptet gir f.eks dette (med parametere: "789|24|% RH"): I HSTouch har jeg laget egne screens: Jeg har laget 3 events pr rom: På de 3 tekst-knappene over grafen har jeg satt "IgnorePresses=false" og lagt inn dette i "ActionWhenPressed": Vent i 1000ms, slik at den rekker å generere bildet. Deretter tvinger den den til å laste bildet på nytt - setter bare URL til det samme som den opprinnelig er (PNG-URLen): Slik ble resultatet:

Tar den.

.... høyt tall = bedre. 0 dB er jo perfekt signal. https://www.metageek.com/training/resources/wifi-signal-strength-basics.html

Uetisk og truende, ja. Og det er vel heller ikke lovlig...?

Ok, da er det jo bare å ignorere null-verdier. Det er jo ikke særlig vanskelig.

Jeg fant løsningen på nettet etter litt mer leting. I tilfelle noen andre trenger dette ligger scripted vedlagt. Som nevnt har jeg noen temperatur-sensore/ givere og tenkte teste stabilitet og levetid batteri etc og så evt bruke det sammen med "virtuelle termostater" i HS3 for å styre vannbåren varme. Jeg har litt sansen for disse fra Xiaomi, dels gir de både temperatur og luftfuktighet, dels er de små og kan plasseres litt mer skjult og dels ser de ut til å jevnt oppdatere temperatur flere ganger i timen. Jeg trenger derfor et script for å måle stabilitet over en lengre periode og deretter fortelle meg (via email) når en sensor faller ifra, f.eks grunnet lavt batteri. Følgende script ser ut til å gjøre jobben for meg. Sub Main(ByVal Parm As Object) Try Dim ListOfDevices() As Integer = {768, 769, 770, 771, 772, 773, 774, 775, 776, 777, 778, 779, 780, 782, 784} For Each Device As Integer In ListOfDevices If hs.DeviceTime(Device) > 60 Then hs.writelog("TempSensor ", " *** Alarm: " & hs.DeviceName(Device) & " ikke oppdatert siste 60min") hs.SendEmail("<fromAddr>", "<toAddr>", "", "", "HS3 Alarm(TempSensor)", " *** Alarm: " & hs.DeviceName(Device) & " ikke oppdatert siste 60min", "") End If Next Catch ex As Exception : hs.writelog("DeviceLastChange", "Error: " & ex.message) End Try End Sub

Dette er min personlige erfaring med å investere i solpaneler, og siden det er snakk om så mye penger synes jeg at jeg burde informere litt åpent om ting som har skjedd her. Begynte å planlegge solpaneler i fjor vår, og Otovo var svært raske ut for å selge solpaneler, som virket til å være en grei pris, og virket som å være en større seriøs bedrift som har tingene på stell, og gikk derfor for tilbudet de ga meg. Planleggingen gikk veldig fort, for fort, og ingen kommentarer, eller problemer ble påpekt. Lovet gull og grønne skoger med så og så mye produksjon. I midten av monteringen begynte tingene å komme, og ble opplyst om at solforholdene var oppdaget å ikke være optimale, og pipene ga mye skygge - da skulle de selge meg optimizere og ble satt litt ut av at jeg måtte legge ut mer for å få produksjonen - de monterte også 4 ekstra paneler, og prisen ble rundt 50.000 høyere, en totalregning på underkant av 200.000 I etterkant har jeg aldri hatt nær produksjon til hva som var originalt lovet, selv om jeg kjøpte flere paneler, inverterne som var levert er 2x 6kw, noe som ikke kan teoretisk ta full solpanelstyrke, men bare bygget for praktisk verdi (selger solpaneler som skal kunne gi 13-14kw, men montere 12kw invertere virker litt rart) - har vært mye tull med AP-punktene, bruk av kinesiske merker som spytter ut grid info til kinesiske nettsider mv. Fikk heldigvis nye wifi sticks, men enda synes jeg ikke disse inverterne skriker kvalitet (Solis) Så kom en regning på ca 160.000 og ble betalt med en gang, all informasjon hos Otovo viste alt var betalt, og jeg regnet med de hadde tatt til vettet og trukket fra noe grunnet feil i planlegging. Flere måneder etterpå klaget de på jeg ikke hadde betalt, og ga beskjed joda, regning var fullbetalt, og notert på sidene deres som fullbetalt, men Otovo hadde rotet det til slik regning ikke ble komplett, og midt i klaging og prøve å få et svar på mangel på planlegging etc så sendte de regningen til inkasso, et svært uetisk og truende steg når en er midt i en klagerunde med firmaet. Betalte regningen da jeg var midt i kreftoperasjon og ikke orket å krangle mer med dem. Det jeg reagerte på nå er de reklamerer på offentlig media, og når spørsmålet om snø kommer opp, sier Otovo offentlig problemer som takvinkling, ikkeoptimale forhold etc vil alt bli opplyst om - jeg har ikke optimal takvinkling for snø som kan skli av etc, og ble aldri informert om dette. Derfor står jeg nå med et solanlegg som kostet 200.000, er totalt ubrukelig hvis NOE snø kommer fra takvinkling er alt for lav til at snø faller av, har skyggeproblemer rundt alle pipene og må ettermontere optimzere til en etterkostnad, og har to invertere som ikke kan ta av en optimal produksjon. Ønsker ikke henge ut et firma, men mener et stort firma burde være seriøse og ikke først selge inn noe som en pakkepris, begynne midt i jobben og å legge på penger og ikke dimensjonere inverterne for opimal produksjon - jeg mener hvis jeg betaler for teoretisk sum burde de levere invertere til å ta den summen. Grunnen til jeg skriver her er jeg har klaget i flere måneder til Otovo, og ingen av punktene over er svart på fra Otovo eller ønske å rette opp i - de har fått pengene sine nå og da er det 100% tyst fra dem.