Moskus Skrevet 26. august 2020 Skrevet 26. august 2020 Dette er en "dirty hack" som tar endringer i setpoint-devicen og sender dem til termostaten som en parameter. Ideelt skulle termostaten selvfølgelig gjort dette selv, men inntil HeatIt får fikset det (for dette er et problem på veldig mange systemer) så får vi gjøre det på denne måten. Du må lage et event som trigger på alle endringer på termostatens SetPoint device. Og da kjører du dette scriptet med parameter "NodeNummerTilTermostaten,DeviceRefTilSetPointDevice" Sub Main(ByVal Parms As Object) 'Moskus 2020 Dim homeID As String = "HOMEID" Dim nodeNumber As Byte = Parms.ToString.Split(","c)(0) Dim deviceRef As Integer = Parms.ToString.Split(","c)(1) Dim parameter As Byte = 9 Dim value As Integer = hs.DeviceValue(deviceRef) 'Options: {homeid, nodeID, Parameter, ParamSize, Convert.ToInt32(value)} Dim reply As String = hs.PluginFunction("Z-Wave", "", "Configuration_Set", New Object() {homeID, nodeNumber, parameter, Convert.ToByte(2), Convert.ToInt32(value * 10)}) If False Then 'Change "False" to "True" To debug Select Case reply Case 0, "" reply = "UNKNOWN" Case 1 reply = "Successful" Case 2 reply = "Queued" Case 3 reply = "Failed" End Select hs.WriteLog("SetParameter", "Set node " & nodeNumber & "s parameter " & parameter & " to " & value & ": " & reply) End If End Sub 3 Siter
Anbefalte innlegg
Bli med i samtalen
Du kan publisere innhold nå og registrere deg senere. Hvis du har en konto, logg inn nå for å poste med kontoen din.