[Heiss] Temperaturen

[hoika]

Hallo,
und wo ist die Frage mit dem entsprechenden Delphi-Code?

Heiko

[Daniel]

Nun, aufgrund des schlechten Wetters der vergangenen Wochen gab es wohl sehr viele Versuche mit THeat.Create(), die allem Anschein nach nur mit einer gewissen Verzögerung ausgeführt wurden und jetzt alle gleichzeitig aktiv werden. Nun haben wir den Salat.

[jaenicke]

Hier in der Wohnung haben wir aktuell 26°C, das geht noch. Draußen waren allerdings heute Nacht nicht unter 23°C und aktuell sind es schon wieder 25°C. Aber solange es in der Wohnung nicht so viel wärmer wird...

[hathor]

Zitat von hoika:

Hallo,
und wo ist die Frage mit dem entsprechenden Delphi-Code?

Heiko

Wie müsste folgender Code in FUZZY aussehen?

Delphi-Quellcode:

Procedure Fan(temperatur:INTEGER);
begin
case temperatur of
0..39: rotation:= 2000;
40..49: rotation:= 3000;
50..59: rotation:= 4000;
60..110: rotation:= 5000;
end;
Cooler(rotation);
end;