Justere varme på multireg termostater

[GO_Nilsen]

Hei.

 

Driver og lager et oppsett på HSTouch der jeg kan justere setpoint og ESave setpoint.

Fikk til å justere den vanlige setpoint med å sette control use til heat setpoint i homeseer.

Når jeg skal prøve med ESave setpoint og setter cool setpoint i control use får jeg det ikke til.

Noen som har testet dette?

[ZoRaC]

Litt usikker på hva du mener...

Jeg bruker events som setter «nåværende setting»+1 når man trykker på en «+»-knapp i HSTouch, osv. 

[GO_Nilsen]

Ok.. Hvordan setter man +1 i et event da?

[iceball]

Ok.. Hvordan setter man +1 i et event da?

Med EasyTrigger er det i hvert fall enkelt. Bare lage event som setter device til egen verdi +1 grad.

[ZoRaC]

Akkurat nå, iceball skrev:

Med EasyTrigger er det i hvert fall enkelt. Bare lage event som setter device til egen verdi +1 grad.

 

Jepp:

 

Før jeg kjøpte EasyTrigger brukte jeg et «immediate script». 

[Christoffer]

Jeg bruker dette scriptet, synes det er lettere med et script når jeg skal ha mange eventer.

' Styrer temperaturen i kjellerstuen
Public Sub Main (ByVal parms as String)
        Dim input() As String = Split(parms.ToString, "|")
        Dim device As String = input(0)
		Dim retning as String = input(1)
		Dim steg as integer = Convert.toInt32(input(2).ToString)
		dim hentetverdi as integer
		dim nyverdi as integer 
		'hs.writelog("Testing", "Devicenummer: " & device & " i retning: " & retning & " og steget er: " & steg)

		hentetverdi = hs.DeviceValue(device)
		if retning = "opp" Then
		nyverdi = (hentetverdi + steg)
		Else if retning = "ned" Then
		nyverdi = (hentetverdi - steg)
		End If
		hs.SetDeviceValueByRef(device, nyverdi, True)
		
		'hs.writelog("Testing", "Script kjørt")


End Sub

Det tar tre parametre som "devicenummer|retning|steg"

Devicenummer = Devicenummer i HS

Retning = "opp" eller "ned"

Steg = hvor mye den skal økes eller minkes. På temperaturer bruker jeg alltid 1

 

Det er to kommentarer som kan taes bort hvis du må feilsøke litt.

 

Her er et eksempel på hvordan jeg bruker det:

[GO_Nilsen]

56 minutter siden, Christoffer skrev:

Jeg bruker dette scriptet, synes det er lettere med et script når jeg skal ha mange eventer.

' Styrer temperaturen i kjellerstuen
Public Sub Main (ByVal parms as String)
        Dim input() As String = Split(parms.ToString, "|")
        Dim device As String = input(0)
		Dim retning as String = input(1)
		Dim steg as integer = Convert.toInt32(input(2).ToString)
		dim hentetverdi as integer
		dim nyverdi as integer 
		'hs.writelog("Testing", "Devicenummer: " & device & " i retning: " & retning & " og steget er: " & steg)

		hentetverdi = hs.DeviceValue(device)
		if retning = "opp" Then
		nyverdi = (hentetverdi + steg)
		Else if retning = "ned" Then
		nyverdi = (hentetverdi - steg)
		End If
		hs.SetDeviceValueByRef(device, nyverdi, True)
		
		'hs.writelog("Testing", "Script kjørt")


End Sub

Det tar tre parametre som "devicenummer|retning|steg"

Devicenummer = Devicenummer i HS

Retning = "opp" eller "ned"

Steg = hvor mye den skal økes eller minkes. På temperaturer bruker jeg alltid 1

 

Det er to kommentarer som kan taes bort hvis du må feilsøke litt.

 

Her er et eksempel på hvordan jeg bruker det:

Takker å bukker  ???

[GO_Nilsen]

Da skal jeg snart slutte å mase (tror jeg?).

 

Finnes det noen enkel løsning på å justere tidspunkt for nattsenk

Ønsker å kunne sette et tidspunkt i HSTouch der nattsenk skal gå på og av på ver enkelt termostat?

[ZoRaC]

7 timer siden, GO_Nilsen skrev:

Finnes det noen enkel løsning på å justere tidspunkt for nattsenk

Ønsker å kunne sette et tidspunkt i HSTouch der nattsenk skal gå på og av på ver enkelt termostat?

 

Kommer ikke på noen enkel måte, men det er «løsbart»...

 

Opprett 2 devicer, «nattsenk_time» og «nattsenk_minutt». Legg dem i HSTouch med knapper for «+» og «-« på hver av dem (minutt legger til/trekker fra 15 min pr trykk). Lag et event som kjører hvert 15 min som sjekker (via script) om devicevalue(time):devicevalue(min) matcher DateTime(HH:mm), i så fall, sett device for termostaten til nattsenk.

 

Så, «løsbart», men ikke så «pent»...