Exponat aus der EibPC Schulung, einige Bugs noch behoben, scheint jetzt zu funktionieren. Wer testet mal mit?
// Steuerung Rollo bei Frost
Runter=("Außentemperatur-1/0/14"<1.0) and ("Helligkeit.Süd-1/0/22"<20.0)
if Runter then write("%Pos.anfahren Rollo Essen Ost OG-3/2/105",65%); \\
write("%Pos.anfahren Rollo Essen Süd OG-3/2/115",65%); \\
write("%Pos.anfahren Rollo Essen West OG-3/2/125",65%) \\
endif
Zeit=AUS
if wtime(08,30,00,WOCHENENDE) then Zeit=EIN endif
if wtime(05,30,00,WERKTAGS) then Zeit=EIN endif
Hoch=("Helligkeit.Süd-1/0/22">200.0) and Zeit
if Hoch then write("%Pos.anfahren Rollo Essen Ost OG-3/2/105",0%); \\
write("%Pos.anfahren Rollo Essen Süd OG-3/2/115",0%); \\
write("%Pos.anfahren Rollo Essen West OG-3/2/125",0%) \\
Zeit=AUS endif
// Steuerung Rollo bei Frost
Runter=("Außentemperatur-1/0/14"<1.0) and ("Helligkeit.Süd-1/0/22"<20.0)
if Runter then write("%Pos.anfahren Rollo Essen Ost OG-3/2/105",65%); \\
write("%Pos.anfahren Rollo Essen Süd OG-3/2/115",65%); \\
write("%Pos.anfahren Rollo Essen West OG-3/2/125",65%) \\
endif
Zeit=AUS
if wtime(08,30,00,WOCHENENDE) then Zeit=EIN endif
if wtime(05,30,00,WERKTAGS) then Zeit=EIN endif
Hoch=("Helligkeit.Süd-1/0/22">200.0) and Zeit
if Hoch then write("%Pos.anfahren Rollo Essen Ost OG-3/2/105",0%); \\
write("%Pos.anfahren Rollo Essen Süd OG-3/2/115",0%); \\
write("%Pos.anfahren Rollo Essen West OG-3/2/125",0%) \\
Zeit=AUS endif
Kommentar