Moskus

Sannsynligvis ikke, det har vel ikke rent ned med poster i denne tråden i det siste...

Ja. Og ja.

Akkurat nå hadde jeg gått for C#, men det spiller egentlig ingen rolle.

Oi! Wow, ja det burde jeg. Hvorfor har jeg ikke det?

Det er jo vel og bra for deg og oss andre som ikke bruker IFTTT til dette. Derimot er det (og dessverre mer og mer) utstyr hvis integrerbarhet skjer kun via IFTTT, eller iallfall "blir betydelig bedre med IFTTT enn uten". Men det er vel dette de skal tjene penger på, dvs. holde de som har brukt tid og krefter på en IFTTT-integrasjon (og da både produsenter og brukere) som gissel.

Ja. I verste fall.

Vi er vel bang smack on topic. Jeg hadde delt det opp i forskjellige klasser for å håndtere det, men det er SetIOMulti() som håndterer alle knappetrykker på devicer som tilhører plugin'en. Du får sendt en deviceRef og en kommando, og bruker da dette videre. Hvordan du håndterer det er opp til deg. Her er SetIOMulti() fra TibberSeer: Mye av teksten ligger i MoskusSample... Public Sub SetIOMulti(ByVal colSend As List(Of HomeSeerAPI.CAPI.CAPIControl)) 'Multiple CAPIcontrols might be sent at the same time, so we need to check each one For Each CC In colSend Log("SetIOMulti triggered, checking CAPI '" & CC.Label & "' on device " & CC.Ref, LogType.Debug) 'CAPI doesn't magically store the new devicevalue, and I believe there's good reason for that: ' The status of the device migth depend on some hardware giving the response that it has received the command, ' and perhaps with an other value (indicating a status equal to "Error" or whatever). In that case; send the command, ' wait for the answer (in a new thread) and THEN update the device value 'But here, we just update the value for the device hs.SetDeviceValueByRef(CC.Ref, CC.ControlValue, False) 'Get the device sending the CAPIcontrol Dim device As Scheduler.Classes.DeviceClass = hs.GetDeviceByRef(CC.Ref) Select Case device.DeviceType_Get(hs).Device_SubType_Description.ToLower Case "root_price" Log("Pressing update on price root...", LogType.Debug) Dim ref As Integer = CC.Ref Dim t As New Thread(AddressOf UpdateTibberData) t.Start(ref) Case "root_consumption" Log("Pressing update on consumption root...", LogType.Debug) Dim ref As Integer = CC.Ref Dim t As New Thread(AddressOf UpdateTibberData) t.Start(ref) Case "root_realtime" Log("Pressing restart on realtime root...", LogType.Debug) Dim ref As Integer = CC.Ref RestartRealtime(ref) End Select Next End Sub Her fra TrådfriSeer: Public Sub SetIOMulti(ByVal colSend As List(Of HomeSeerAPI.CAPI.CAPIControl)) 'Multiple CAPIcontrols might be sent at the same time, so we need to check each one For Each CC In colSend Log("SetIOMulti triggered, checking CAPI '" & CC.Label & "' on device " & CC.Ref, LogType.Debug) 'Get the device sending the CAPIcontrol Dim device As Scheduler.Classes.DeviceClass = hs.GetDeviceByRef(CC.Ref) Select Case GetTypeFromDevice(device) Case "Hub" 'There's nothing here Case "Bulb" Dim b As TrådfriBulb = (From bs In Trådfri.Bulbs Where bs.MainDeviceRef = CC.Ref).FirstOrDefault If b IsNot Nothing Then b.SetDimLevelAsync(CC.ControlValue) End If Case "Group" Dim g As TrådfriGroup = (From bs In Trådfri.Groups Where bs.MainDeviceRef = CC.Ref).FirstOrDefault If g IsNot Nothing Then g.SetDimLevelAsync(CC.ControlValue) End If Case "Scene" Dim g As TrådfriGroup = (From bs In Trådfri.Groups Where bs.SceneDeviceRef = CC.Ref).FirstOrDefault If g IsNot Nothing Then g.SetSceneAsync(CC.ControlValue) End If Case "ColorTemperature" Dim b As TrådfriBulb = (From bs In Trådfri.Bulbs Where bs.TemperatureDeviceRef = CC.Ref).FirstOrDefault If b IsNot Nothing Then b.SetColorAsync(CC.ControlValue) End If Case "TransitionTime" hs.SetDeviceValueByRef(CC.Ref, Math.Round(CC.ControlValue, 1), True) End Select Next End Sub

Det kan være en fordel på sikt. Problemet er at vi plutselig snakker lang sikt. Samt at det nok ikke behøver å bli en fordel: Alternativet er nok fort at de ikke tilbyr styring.

HeatIt Z-DIM er også et godt alternativ. Jeg er usikkker på om denne kan brukes til det.

Det måtte jo skje. Det siste argumentet for skytjenester har vært at "vel, i det minste støtter den IFTTT, så vi får leve med det", men nå ser det ut til at det også kan falle bort. IFTTT er en tjeneste kobler mange andre skytjenester sammen, og den har så langt vært gratis. Det har vært et nødvendig onde for mange av oss for å knytte sammen alle disse skytjenestene vi må bruke fordi vi ikke får lokale APIer til vårt eget utstyr. Nå ser det ut til at gratis-modellen ikke var levelig. Ikke at det var en overraskelse, men billig blir det ikke i fremtiden. Ca. en hundrelapp i måneden ser det ut til å måtte koste å for å benytte tjenesten videre. Gratis-alternativet skal fortsette, men kun med 3 egen-lagde rutiner. Foreløpig "skal man sette prisen selv". Stem med lommeboka. Sett prisen lavt. Vis full oppføring

Hmmm! Godt tips.

Gjør det allerede.

Har lekt litt med WLED etter inspirasjon fra @kimstoroy i det siste, og det gir jo nye muligheter. Fancy blir det, om ikke akkurat behagelig hverdagslys jeg vil ha i stua. Nedrefaktoren er godt over 9000, dog. Så jeg oppgraderte logoen til jobben.

Jeg vet ikke om det teknisk mulig å nedgradere, men hvis det går, så tror jeg det er eneste mulighet...

Ja, så med tanke på funksjonaliteten så er vel det. Men noen ble tilbakekaldt, mens andre ble ikke i en større test for noen år siden, hvis jeg ikke husker feil.

Jeg har en laser-avstandsmåler som rapporterer via Wifi/MQTT, men så var det dette med strømforbruket igjen...

Man skrur opp, det er jo ikke så mange alternativer. Trenger ikke koble noe til eller fra (for det har du ikke lov til å gjøre). Men man kan fjerne deksler, etc. Tenk hvis man skal male?

I sin enkleste form: Sub Main(Byval params as Object) Dim url as String = "http://kamera-URL/bilde.jpg" Dim filename as String = "C:\Program Files (x86)\HomeSeer HS3\html\kamera.jpg" Dim _username as String = "" Dim _password as String = "" My.Computer.Network.DownloadFile(url, savename, _username, _password, False, 4000, True) End Sub

SetIOMulti()

Jeg hadde ikke kjøpt Eltako/EnCoean i dag med mindre jeg måtte... Da heller Z-wave eller Zigbee.

Tja... det er det jo som alltid delte meninger om. Man skal for all del ha et toppsystem (som Home Asstant eller HomeSeer, eller whatever) som kan styre alt, men utenom det er jeg i aller høyeste grad for "divide and conquer". Det er jo bl.a. derfor virtualisering av servere og docker finnes. Men i begynnelsen fungerer det sikkert helt fint. Man kan alltids flytte HA over på en annen RPi senere, det er jo ikke akkurat noen kostnad.

Er det bare meg som får diverse feilmeldinger for tiden? Verisure skal pinges hvert 10 sekund, så hva som skjer hvert minutt vet jeg ikke.

Nei, ikke helt. Går du for mikromodul-løsningen kan du kun ha vanlige brytere på utsiden. Ønsker du skru-dimmer, så må det kjøpes separat. Det er dessverre ikke flust med trådløse skrudimmere å velge mellom... MEN: Et signal sendt til en dimmer kan enkelt sendes videre til en annen dimmer, og mottaker-dimmeren(e) trenger ikke å utstyres med dimmehjul.

Hvis du mener (som det er) at HA = HjemmeAutomasjon, så ja. Kjør på med ethernet, bruk kun wifi der det absolutt er nødvendig. Men hva er det egentlig du spør om? Man behøver ikke Home Assistant for Sonos eller Spotify Connect. La et system gjøre det det skal, og ikke bland kortene.