anlyl2014
大吉大利
級別: 網絡英雄
|
我也湊熱鬧,步進寫的,很傳統,一定不是最簡的,但是容易讀懂。 [ 此帖被anlyl2014在2021-07-14 07:15重新編輯 ] |
|
---|---|---|
|
yzdz66
級別: 探索解密
|
IF bButton AND NOT ButtonOld THEN wStep:=10; END_IF; CASE wStep OF 10: qLight1:=TRUE; IF TON1.Q THEN qLight1:=FALSE; wStep:=20; END_IF; 20: IF TON2.Q THEN wStep:=30; END_IF; 30: qLight2:=TRUE; IF TON3.Q THEN qLight2:=FALSE; wStep:=40; END_IF; 40: IF TON4.Q THEN wStep:=50; END_IF; 50: wCount:=wCount+1; IF wCount>=3 THEN wStep:=0; ELSE wStep:=10; END_IF; END_CASE; TON1(IN:= qLight1 ,PT:= T#3S); TON2(IN:= NOT qLight1 ,PT:= T#2S); TON3(IN:= qLight2 ,PT:= T#3S); TON4(IN:= NOT qLight2 ,PT:= T#2S); ButtonOld:=bButton; |
---|---|
|
meipingboy
級別: 家園常客
|
|
|
---|---|---|
|