Sirene/Hupe ST Programmieren

[Tethys]

Zuviel Werbung?
-> Hier kostenlos registrieren

Hallo Zusammen,

Ich habe eine Sirene "bS: Bool" , die 5 Minuten nach dem Einschalten einer roten Ampel "bRA:Bool" aktiviert wird. Diese Sirene wird nur deaktiviert, wenn die Taste "TX:Bool" gedrückt wird. Die Sirene dient nur dazu, auf eine Störung hinzuweisen. Ich würde gerne wissen, ob jemand einen einfachen ST Programm-code vorschlagen kann.
Danke

 

[oliver.tonn]

Was hast Du denn schon so schon selber versucht?
Du könntest über einen TON die Sirene nach 5 Minuten einschalten und wenn sie tatsächlich nach Aktivierung nur ausgehen soll, wenn die Taste gedrückt wurde eine Selbsthaltung hinzufügen die beim Drücken des Tasters zurückgesetzt wird.
Die Frage wäre jetzt, was ist, wenn die Ampel immer noch leuchtet, soll dann die Hupe sofort wieder loslegen oder auch erst wieder nach 5 Minuten?
Übrigens wäre es hilfreich zu wissen für welche Steuerung das Programm sein soll.

 

[Tethys]

Zuviel Werbung?
-> Hier kostenlos registrieren

Hallo Oliver,
Also, der Tasters dient nur der Sirene ausschalten, auch wenn die Rote-Lampe immer angeschaltet ist. dann soll die Störung beheben und die Rote-Lampe wird ausgeschaltet. Das Programm wird für die Steurung Beckhoff Twincat3 sein.
VAR

bS : Bool; // Sirene
bRA : Bool; // Rote_Lampe
bT : Bool; // Taste
tTime : TON; // Time

END_VAR

tTime (IN: bRA, PT:=t#5m);


if tTime.Q
then
bS := TRUE;
End_If

if bT
Then
bS := False;
End_If

 

[Heinileini]

VAR
bS         : Bool; // Sirene
bRA        : Bool; // Rote_Lampe
bT         : Bool; // Taste
bTimeQPrev : Bool; // tTime.Q zuvor
tTime      : TON;  // Time
END_VAR

tTime (IN: bRA, PT:=t#5m);
bS := NOT bT AND (bS OR bTimeQPrev AND NOT bTime.Q ) ;
bTimeQPrev := bTime.Q ;