Ventilpos, Alarm, Fenster etc.
eine Hilfs-Variable deklariert
Fenster_1, Typ: TürFenster, Startwert: geschlosssen
Immer wenn das Fenster geöffnet wird, soll einmalig eine Sprachmeldung ausgegeben werden.
Code: Alles auswählen
wenn Fenster_1 geschlossen und Fenster geoeffnet dann
Sprachausgabe("Fenster wurde geöffnet!")
wenn-Block-Ende
Fenster_1:= Fenster
//Würg-around
wenn Fenster_1 <> Fenster dann
Sprachausgabe("Zuweisung an Fenster_1 wurde ignoriert! Ganz übler Fehler!")
wenn Fenster geoeffnet dann
Fenster_1:= "offen"
sonst
Fenster_1:= "geschlossen"
wenn-Block-Ende
wenn-Block-Ende
//Würg-around-Ende
Btw: Kann man eigentlich keine Kommentare im Programm eingeben? Die //Würg-around Zeilen habe ich lediglich zur Verdeutlichung hier eingefügt. Beim Programmstart würden diese Zeilen als Syntaxfehler moniert.
Und noch eine ganz üble Macke des Homeputer Studios: Der Debugger zeigt den Fensterzustand invertiert an, also
Code: Alles auswählen
Fenster GEOEFFNET (Fensterzustand), wenn das Fenster geschlossen ist und
Fenster GESCHLOSSEN (Fensterzustand), wenn das Fenster geöffnet ist!