Gå til innhold
  • Bli medlem
Støtt hjemmeautomasjon.no!

Justere varme på multireg termostater


GO_Nilsen

Anbefalte innlegg

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?

Lenke til kommentar
Del på andre sider

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:

image.png.3fe55f1f25b51f2b6abe224f0a2e1073.png

  • Like 1
  • Thanks 1
Lenke til kommentar
Del på andre sider

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:

image.png.3fe55f1f25b51f2b6abe224f0a2e1073.png

Takker å bukker  ???

Lenke til kommentar
Del på andre sider

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»... :P 

Lenke til kommentar
Del på andre sider

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.

Gjest
Skriv svar til emnet...

×   Du har limt inn tekst med formatering.   Lim inn uten formatering i stedet

  Du kan kun bruke opp til 75 smilefjes.

×   Lenken din har blitt bygget inn på siden automatisk.   Vis som en ordinær lenke i stedet

×   Tidligere tekst har blitt gjenopprettet.   Tøm tekstverktøy

×   Du kan ikke lime inn bilder direkte. Last opp eller legg inn bilder fra URL.

×
×
  • Opprett ny...

Viktig informasjon

Vi har plassert informasjonskapsler/cookies på din enhet for å gjøre denne siden bedre. Du kan justere dine innstillinger for informasjonskapsler, ellers vil vi anta at dette er ok for deg.