"SmartHome" - Rasos taško apskaičiavimas

Skaitymo laikas < 1 Minutė

Rasos taškas apibūdina temperatūrą, kuri turi būti žemesnė, kad esant pastoviam oro slėgiui ir drėgmei susidarytų rasa, rūkas ar kondensatas.

Reikalinga techninė įranga:

• "Homematic" temperatūros drėgmės jutiklis lauke HM-WDS10-TH-O
• "Homematic" sieninis termostatas HM-TC-IT-WM-W-E

Programa:

Kodas:

real T = dom.GetObject("T_actual_FH").Value();WriteLine("T_FH");WriteLine(T);
real rF = dom.GetObject("F_actual_FH").Value();WriteLine("rF_FH");WriteLine(rF);

if (T = 0
tikrasis R = 8314,3; !J / (kmol * K) (universalioji dujų konstanta)
tikroji mw = 18,016; !kg / kmol (vandens garų molekulinė masė)
realus pp = (a * T) / (b + T); !Apskaičiuokite šios formulės galią
realus SDD = 6.1078 * (10.0).Pow(pp); !Sočiųjų garų slėgis hPa
realus DD = ((SDD * rF) / 100,0); !Garų slėgis hPa
realus v = (DD / 6.1078).Log10();
real TP_null = (b * v / (a - v));WriteLine("TP_null");WriteLine(TP_null); !Dew point
real TP = (TP_null).ToString(1); !Temperatūros perjungimo riba vėdinimui

dom.GetObject("Dewpoint_FH").State(TP);WriteLine("Dewpoint");WriteLine(TP);
tikrasis AF = (10,0).Pow(5,0) * (mw / R) * DD / TK;

Du kintamieji T ir rF iš atitinkamų temperatūros ir drėgmės jutiklių nuskaitomi išorinėje programoje ir taip įtraukiami į visas kitas programas be naujos jutiklio užklausos (siekiant sumažinti Darbo ciklai).