https://forge.codesys.com/forge/talk/Deutsch/thread/4f96520272/2023-06-27T17:09:41.963000ZRecent posts to Frage zu einfachem Programm2023-06-27T17:09:41.963000Z2023-06-27T17:09:41.963000Zfurkhttps://forge.codesys.com/u/furk/https://forge.codesys.comc2b6959c39d084718bb1e38cea8e79307f8480dc

<div class="markdown_content"><p>Hallo Leute, <br/> ich bin neu in diesem Forum und ein Anfänger in Codesys. Ich arbeite an einem kleinen Projekt, bei dem es zwei Lampen (rote L1, grüne L2) und einen Taster (T1) gibt.</p> <p>Die rote Lampe sollte mindestens 5 Sekunden und maximal 10 Sekunden lang eingeschaltet sein. </p> <p>Wenn der Taster gedrückt wird, sollte nach 3s die rote Lampe ausgeschaltet und die grüne Lampe eingeschaltet werden. Die grüne Phase sollte 5 Sekunden dauern und dann sollte die rote Phase wieder beginnen. Ich habe das folgende Programm geschrieben und es werden keine Fehler angezeigt, aber leider funktioniert es nicht. </p> <p>Ich wäre wirklich dankbar für jede Art von Hilfe.</p> <p>PROGRAM Aufgabe2<br/> VAR<br/> zustand:UINT:=1;<br/> R_Trig_Taster:R_TRIG;<br/> timer3s:TON;<br/> timer5s:TON;<br/> timer10s:TON;<br/> END_VAR</p> <p>R_Trig_Taster(CLK:=GVL.T1);</p> <p>CASE zustand OF<br/> 1://Rotphase<br/> GVL.L1:=1;<br/> GVL.L2:=0;</p> <div class="codehilite"><pre><span></span><span class="err">timer5s(IN:=TRUE,PT:=T#5S);</span> </pre></div> <p>timer10s(IN:=TRUE,PT:=T#10S);</p> <p>IF timer5s.Q=TRUE THEN<br/> WHILE timer10s.Q=FALSE DO</p> <div class="codehilite"><pre><span></span> <span class="nt">IF</span> <span class="nt">R_Trig_Taster</span><span class="p">.</span><span class="nc">Q</span><span class="o">=</span><span class="nt">TRUE</span> <span class="nt">THEN</span> <span class="nt">timer3s</span><span class="o">(</span><span class="nt">IN</span><span class="o">:=</span><span class="nt">TRUE</span><span class="o">,</span><span class="nt">PT</span><span class="o">:=</span><span class="nt">T</span><span class="p">#</span><span class="nn">3S</span><span class="o">);</span> <span class="nt">IF</span> <span class="nt">timer3s</span><span class="p">.</span><span class="nc">Q</span><span class="o">=</span><span class="nt">TRUE</span> <span class="nt">THEN</span> <span class="nt">zustand</span><span class="o">:=</span><span class="nt">2</span><span class="o">;</span> <span class="nt">timer3s</span><span class="o">(</span><span class="nt">IN</span><span class="o">:=</span><span class="nt">FALSE</span><span class="o">,</span><span class="nt">PT</span><span class="o">:=</span><span class="nt">T</span><span class="p">#</span><span class="nn">3S</span><span class="o">);</span> <span class="nt">timer5s</span><span class="o">(</span><span class="nt">IN</span><span class="o">:=</span><span class="nt">FALSE</span><span class="o">,</span><span class="nt">PT</span><span class="o">:=</span><span class="nt">T</span><span class="p">#</span><span class="nn">5S</span><span class="o">);</span> <span class="nt">timer10s</span><span class="o">(</span><span class="nt">IN</span><span class="o">:=</span><span class="nt">FALSE</span><span class="o">,</span><span class="nt">PT</span><span class="o">:=</span><span class="nt">T</span><span class="p">#</span><span class="nn">10S</span><span class="o">);</span> <span class="nt">END_IF</span> <span class="nt">END_IF</span> <span class="nt">END_WHILE</span> </pre></div> <p>END_IF<br/> IF timer10s.Q=TRUE THEN<br/> zustand:=2;<br/> timer5s(IN:=FALSE,PT:=T#5S);<br/> timer10s(IN:=FALSE,PT:=T#10S);</p> <p>END_IF</p> <p>2://Grünphase<br/> GVL.L1:=0;<br/> GVL.L2:=1;</p> <p>timer5s(IN:=TRUE,PT:=T#5S);</p> <p>IF timer5s.Q=TRUE THEN<br/> zustand:=1;<br/> timer5s(IN:=FALSE,PT:=T#5S);<br/> END_IF</p> <p>END_CASE</p></div>