Hallo,
hast Du noch ein herkömmliches Thermometer? Messe mit diesem die kälteste Stelle der Aussenwand (meist knapp oberhalb des Fussbodens) im Innenraum (entspricht tw). Dann nimmst du dein Script und kopierst es in Programme..->Script testen, vervollständigst es mit dem folgenden Scriptschnitzel "Ausgabe" (die Ausgaben Writeline entsprechend setzen; ! entfernen) testet es (Fehler!) und führst es aus.
Ausgabe
Code: Alles auswählen
!
!WriteLine(" ");
!WriteLine(" xxx Wohnzimmer xxxxx ");
!WriteLine("Temperatur innen: " + tin);
!WriteLine("abs.Feuchte innen; " + afMin);
!WriteLine("abs.Feuchte innen alt: " + afMin_alt);
!WriteLine("Temperatur innen Fenster: " + tw);
!WriteLine("Tendenz: " + tendenz);
!WriteLine("Anzeige: " + awerte);
!
!WriteLine(" ");
!WriteLine("abs.Feuchte außen < innen -1.0, lüften : " +afMau -afMin-1.0);
!WriteLine("abs.Feuchte außen >= innen -0.5, nicht lüften : " +afMau -afMin-0.5);
!
!WriteLine(" ");
!WriteLine(" xxx Außen xxxxx ");
!WriteLine("Temperatur außen: " + tau);
!WriteLine("abs.Feuchte außen: " + afMau);
!
!WriteLine(" ");
!WriteLine(" xxx Lüftungsempfehlung & Schimmelwarnung xxxx ");
!WriteLine("Warn: " + afw);
!WriteLine("Alarm: " + afa);
!WriteLine("Lüftungsempfehlung: " + oLueften.Variable());
!WriteLine("Schimmelwarnung: " + oSchimmel.Variable());
!
Der Wert tw (den Du gemessen hast) sollte dadurch erreicht werden, daß Du den Wert Rges (deinen Verhältnissen entsprechend) iterativ anpasst.
Bei mir ist die kalte Aussenwand eine deckenhohe Fensterfront, an der sich am unteren Übergang vom Fensterrahmen zum Isolierglas Kondenswasser bilden (Algenbildung) kann. Ich verwende mit Erfolg Rges = 0.300.
Würde mich freuen wenn ich Dir helfen konnte.
Bleib gesund!
Gruß
schlichi