Gå til innhold

Synking av dimmere i HS3


Anbefalte innlegg

Skulle synke to av mine aeotec dimmere der jeg bruker den ene som master og bruker dette scriptet som trigges når device 16 endres.

public object Main(object[] Parms)

{
	if(hs.DeviceValue(16) != hs.DeviceValue(22)) 
		{	
			hs.SetDeviceValueByRef(22, hs.DeviceValue(16), true);
		}		
	return 0;
}

Tanken her er at device 22 skal endres når device 16 blir endret. Problemet er at lampen ikke dimmes men statusen til dimmeren oppdateres og blir lik device 16.

Det er en rar feil jeg ikke skjønner helt hvordan skal gå ann?

 

Et annent problem med disse dimmerne fra aeotec er at jeg ikke får noe tilbakemdling til HS når jeg dimmer de fra ekstern z-wave bryter.

Endret av stein111
Lenke til kommentar
Videoannonse
Annonse

Du kan ikke burke SetDeviceValue for å styre et lys. Du må bruka CAPI.

 

Her er CloneDevice.vb:

Sub Main(ByVal parms As String)
        Dim input() As String = Split(parms.ToString, "|")
        Dim control As String = input(0).ToString
        Dim devs() As String = Split(input(1).ToString, "+")
        Dim devicevalue As Double = hs.DeviceValueEx(control)

        Dim CAPIcontrol As HomeSeerAPI.CAPIControl = Nothing
        For Each cc As HomeSeerAPI.CAPIControl In hs.CAPIGetControl(control)
            If devicevalue = cc.ControlValue Then
                CAPIcontrol = cc
                Exit For
            End If
        Next

        For Each d as String In devs
            Dim dev As Scheduler.Classes.DeviceClass = hs.GetDeviceByRef(d)
            If CAPIcontrol.Label.ToLower.Contains("dim") Then
                If dev.Can_Dim(Nothing) Then
                    Dim capi As HomeSeerAPI.CAPIControl = Nothing
                    For Each cc As HomeSeerAPI.CAPIControl In hs.CAPIGetControl(d)
                        If cc.Label = CAPIcontrol.Label Then
                            capi = cc
                            Exit For
                        End If
                    Next
                    hs.CAPIControlHandler(capi)
                Else
                    Dim off As HomeSeerAPI.CAPIControl = Nothing
                    For Each cc As HomeSeerAPI.CAPIControl In hs.CAPIGetControl(d)
                        If cc.Label.ToLower = "off" Then
                            off = cc
                            Exit For
                        End If
                    Next
                    hs.CAPIControlHandler(off)
                End If
            Else
                Dim capi As HomeSeerAPI.CAPIControl = Nothing
                For Each cc As HomeSeerAPI.CAPIControl In hs.CAPIGetControl(d)
                    If cc.Label = CAPIcontrol.Label Then
                        capi = cc
                        Exit For
                    End If
                Next
                hs.CAPIControlHandler(capi)
            End If

        Next
    End Sub

Brukes slik:

 

V2paZT8.png

 

... der 337 er deviceref til "1. etg. Stue Taklys" og 418, 419, 420 og 412 er de andre lysene.

Lenke til kommentar

Så du kan ikke styre z-wave enheter uten å bruke CAPI.

Nei. Du kan oppdatere devicevalues (f.eks. til dine egne virtuelle devicer), men kontroll går alltid via CAPI.

 

 

 

Et annent problem med disse dimmerne fra aeotec er at jeg ikke får noe tilbakemdling til HS når jeg dimmer de fra ekstern z-wave bryter.

De burde vel støtte Instant Status de også, siden de er Z-wave Plus. Har du assosiert Gruppe 1 (er det vel?) til HS?

Lenke til kommentar

 

Så du kan ikke styre z-wave enheter uten å bruke CAPI.

Nei. Du kan oppdatere devicevalues (f.eks. til dine egne virtuelle devicer), men kontroll går alltid via CAPI.

 

 

 

Et annent problem med disse dimmerne fra aeotec er at jeg ikke får noe tilbakemdling til HS når jeg dimmer de fra ekstern z-wave bryter.

De burde vel støtte Instant Status de også, siden de er Z-wave Plus. Har du assosiert Gruppe 1 (er det vel?) til HS?

 

 

De er nok ikke z-wave pluss men Gruppe 1 er assosiert HS. Skjønner meg ikke helt på de. Står at de skal ha en gruppe 2 også men den får jeg ikke opp i HS.

 

Her er link til de: https://www.tronika.no/en/lighting-control/65-dimmer-dsc-19.html?search_query=aeotec&results=21

Lenke til kommentar

Opprett en konto eller logg inn for å kommentere

Du må være et medlem for å kunne skrive en kommentar

Opprett konto

Det er enkelt å melde seg inn for å starte en ny konto!

Start en konto

Logg inn

Har du allerede en konto? Logg inn her.

Logg inn nå
×
×
  • Opprett ny...