Page 1 of 1

Scripting Proliphix thermostaat

Posted: Mon Aug 08, 2011 12:05 pm
by RdP
Hoi,

Ik ben geen scripting expert en heb al wat rondgezocht, maar kom er toch niet uit.

Omdat HStouch niet goed kan omgaan met thermostaten die op graden Celcius ingesteld staan, ben ik aangewezen op scripting. (Weet niet zeker of dit aan de Proliphix plug-in ligt, want die ondersteund wel celcius, of aan HStouch)

Heeft iemand een voorbeeld script, of kan me helpen met het scripten van de Proliphix thermostaat in Homeseer.

Alvast bedankt,

Rien

Re: Scripting Proliphix thermostaat

Posted: Tue Aug 09, 2011 7:18 pm
by RdP
Ik heb het inmiddels zelf voor elkaar, als iemand er ook iets aan heeft dan hoor ik het wel.

Re: Scripting Proliphix thermostaat

Posted: Sun Oct 28, 2012 9:09 pm
by Phaeton
Hi Rien,

ik zou graag wat meer info hebben over deze scripts. Heb sinds kort een proliphix en wil deze graag gebruiken icm hstouch.

dank alvast!

Re: Scripting Proliphix thermostaat

Posted: Sat Nov 03, 2012 6:14 pm
by RdP
Phaeton wrote:Hi Rien,

ik zou graag wat meer info hebben over deze scripts. Heb sinds kort een proliphix en wil deze graag gebruiken icm hstouch.

dank alvast!
Hi,

Het al een jaar geleden en ik weet niet meer precies wat er aan de hand was.....

Wat is precies je probleem/wat wil je graag doen ?

Gr,
Rien

Posted: Sat Nov 03, 2012 6:33 pm
by Phaeton
De thermostaat op bv 21 gr celcius zetten. Hstouch ondersteunt wel celcius maar niet in de designer, dus daar kan ik alleen een knop maken vanaf 40gr (ivm fahrenheit).

Re: Scripting Proliphix thermostaat

Posted: Sun Nov 04, 2012 11:27 am
by RdP
Ah nu weet ik het weer....

Ik gebruik HStouch op de manier als in de screenshot hieronder (Dus op de knoppen drukken om 1 graad omhoog of omlaag te zetten)
Dat werkt goed......

Om de meteen naar een bepaalde temperatuur te zetten zal je een script moeten maken en die aanroepen vanuit HStouch
Zoals dieze:

Sub Main(ByVal Parms As Object)

Dim pi

Dim mode
Dim cmode
Dim fan
Dim CSP
Dim HSP
Dim Temp

Dim newheat

pi = hs.Plugin("Proliphix Thermostats")

mode = pi.GetModeSet(1)
cmode = pi.GetCurrentMode(1)
fan = pi.GetFanMode(1)
CSP = pi.GetCoolSet(1)
HSP = pi.GetHeatSet(1)
Temp = pi.GetTemp(1)

hs.WriteLog("Proliphix Plug-In", HSP & " - " & Temp)

newheat = HSP+1
hs.Plugin("Proliphix Thermostats").CmdSetHeat(1, newheat)

hs.WriteLog("Proliphix Plug-In", HSP & " - " & Temp)

End Sub

Re: Scripting Proliphix thermostaat

Posted: Sun Nov 04, 2012 11:34 am
by Phaeton
Thank you. I'll look into it this week. I think I should be able manage. Thanks for the kickstart!