Formule berekening via Script

Forum over Homeseer scripts (DUTCH forum)

Moderators: TANE, Ruud

Herbus
Member
Member
Posts: 363
Joined: Mon Mar 27, 2006 12:28 pm
Location: Netherlands

Re: Formule berekening via Script

Post by Herbus »

Moet: hs.setdevicedevice niet iets zijn van hs.setdevicevalue of hs.setdevicestring? Ik heb m'n homeseerhelp zo niet bij de hand maar het commando dat jij gebruikt komt me niet bekend voor.
Herbus (Jos)
phoenixb
Advanced Member
Advanced Member
Posts: 512
Joined: Thu Jul 23, 2009 1:00 pm
Location: Netherlands

Re: Formule berekening via Script

Post by phoenixb »

Daar zat inderdaad de issue.
Heb nu de volgende code kunnen maken

Code: Select all

Sub Main(ByVal parm As Object)

hs.setdevicevalue("V11",hs.devicevalue("]6") - hs.devicevalue("]7"))
 
end sub 
Hiermee krijg ik het nu voor elkaar dat de waarde 50 (laatste waarde die ik met de hand heb mee gegeven) wordt, al is dit niet de uitkomst van ]6 - ]7 want dit zou moeten zijn 45,0°C- 40,0°C=5

Zodra ik ("V11",5) invul dan pakt hij die wel maar de som lijkt nog niet lekker te werken (heb hierbij de value al veranderd voor string om te testen)
__________________
Herbus
Member
Member
Posts: 363
Joined: Mon Mar 27, 2006 12:28 pm
Location: Netherlands

Re: Formule berekening via Script

Post by Herbus »

Ik zou het eerst uit elkaar trekken voordat je er één formule van maakt.

Dim waarde1
Dim waarde2
Dim waardetot

waarde1 = hs.devicevalue("]6")
waarde2 = hs.devicevalue("]7")
waardetot = waarde1-waarde2

hs.setdevicevalue(""V11",waardetot)

Werkt dat niet in één keer dan eerst waarde1 in V11 zetten, indien ok dan waarde2 in V11 zetten.
Zo weet je stap voor stap wat je waarde is en waar het probleem ontstaat.
Nog beter is het om in Visual Studio te programmeren zodat je kan debuggen. (ik gok dat dat nog even een stap te ver is)
Succes.
Herbus (Jos)
Merdeka
Member
Member
Posts: 65
Joined: Sun May 10, 2009 11:16 pm
Location: Netherlands
Contact:

Re: Formule berekening via Script

Post by Merdeka »

djdive wrote: De berekening die ik wil maken is Q=m*c*Delta T
Waarbij de m en de c 2 vaste waarde zijn die ik weet
Ben hier ook heel geinteresseerd in.

Ik neem aan dat je voor c 4186J/kg.K gebruikt? (soortelijke warmte van water).
Maar hoe kom je aan m? Gebruik je daarvoor circulatiecapaciteit van de pomp? (omgerekend naar kg/s)
phoenixb
Advanced Member
Advanced Member
Posts: 512
Joined: Thu Jul 23, 2009 1:00 pm
Location: Netherlands

Re: Formule berekening via Script

Post by phoenixb »

@Merdeka, Het klopt dat je soortelijke warmte van water 4186J/kg.K is, maar meestal word er in de praktijk gebruik gemaakt van 4,2kJ/kg.
(kJ omdat je over het algemeen na de berekening gebruik maakt van de aantal kJ/s = kW)

Er zijn Solar systemen waarbij je een som maakt van de totaal geleverde aantal Joule dan moet je gebruik maken van de 4168J

De m is in dit geval de massastroom van een vloeistof (in dit geval water) dat klopt, hiervoor me je hem omrekenen naar de aantal kg/s het voordeel van water is dat 1kg = 1l dus als je weet hoeveel l/s een pomp doet weet je ook hoeveel kg hij verpompt.

Letop, ga je de meting doen aan een solar druk systeem waarbij gebruik wordt gemaakt van toevoeging aan het water (Antivries,clycol, etc) dan moet je hiervan de soortelijkewartme en de massastroom weten.


Update voor de script, ik ben inmiddels zover dat ik de Delta T. kan uitrekenen (helaas nog maar hele graden K en nog niet achter de komma) zodra dit helemaal goed is kan de som verder afmaken en hem hier voor de geintresserde posten.
__________________
mo046
Member
Member
Posts: 186
Joined: Thu Nov 08, 2007 4:12 pm
Location: Netherlands

Re: Formule berekening via Script

Post by mo046 »

helaas nog maar hele graden K en nog niet achter de komma
Device values kunnen in Homeseer alleen gehele getallen zijn. Wil je ook decimalen, dan moet je met een factor werken (bijv. een factor 10, zodat 273.3 graden als 2733 in de device value geschreven wordt). Je kunt eventueel in je device string de juiste waarde schrijven ("273.3 °C")
** Maurice **
phoenixb
Advanced Member
Advanced Member
Posts: 512
Joined: Thu Jul 23, 2009 1:00 pm
Location: Netherlands

Re: Formule berekening via Script

Post by phoenixb »

@ merdeka

Ik heb momenteel het script werkend gekregen wellicht nog niet op de meest mooie mannier maar hij werkt ;-)
Na berekening leverd mijn cv ketel op dit moment 5,73kW.

Letop, de waarde 0,195 is de aantal kg/s die de transportpomp doet dus deze moet je zelf even controlleren hoeveel hij doet.

Code: Select all

Sub Main(ByVal parm As Object)

Dim temp1
Dim temp2
Dim deltaT

temp1 = hs.devicevalue("]6")
temp2 = hs.devicevalue("]7")
deltaT = temp1-temp2

hs.setdevicestring("V11",deltaT/10*4.2*0.195)


end sub 
De volgende stap wordt het loggen van deze waarde zodat ik een grafiek kan maken met de actuele vermogens.
__________________
Merdeka
Member
Member
Posts: 65
Joined: Sun May 10, 2009 11:16 pm
Location: Netherlands
Contact:

Re: Formule berekening via Script

Post by Merdeka »

@djdive

Ik gebruik DomotiGa en heb een testje geschreven. Ziet er goed uit, maar heb geen idee of het ook echt klopt :lol:
In ieder geval wel leuk om nu die sensoren op de leidingen echt nuttig te gebruiken.

Image
phoenixb
Advanced Member
Advanced Member
Posts: 512
Joined: Thu Jul 23, 2009 1:00 pm
Location: Netherlands

Re: Formule berekening via Script

Post by phoenixb »

als je delta T 4,37 is dan is de formule goed.
Ik merk nog wel dat ik een extra event trigger moet maken op bijvoorbeeld via het pomp contact.
Dit omdat de vermogen meting nu door blijft gaan ondanks dat de ketel uitstaat.

Maar dit is denk ik wel simpel op te lossen met een simpele io contact.

Maar de screenshot ziet er al mooi uit moet ik zeggen.
__________________
Post Reply

Return to “Homeseer Scripts Forum”