濡備綍鐢⊿T璇�瑷�鍐欎竴涓�澶氬姛鑳藉紑鍏虫帶鍒剁▼搴忥紙闄勮禒妗堜緥绋嬪簭锛�

admin

鍦ㄩ」鐩�寮�鍙戣繃绋嬩腑锛岄毦鍏嶄細閬囧埌闂ㄨ�燂紙瀹夊叏闂�锛夋帶鍒躲�佹満鍣ㄧ姸鎬佸垏鎹�銆佸畾鏃朵换鍔°�佺敤鎴风晫闈�浜や簰绛夌瓑鎯呭喌锛岄偅涔堢紪鍐欎竴涓�鎺у埗鍔熻兘鍧楀氨鑳芥柟渚垮湴瑙ｅ喅闂�棰樸��

鎺у埗瑕佹眰锛�

• 杈圭紭瑙﹀彂涓庣姸鎬佸垏鎹�锛氬綋Mode鍙橀噺涓篎ALSE鏃讹紝濡傛灉IN杈撳叆寮曡剼妫�娴嬪埌涓�涓�涓婂崌娌匡紙鍗充粠FALSE鍙樹负TRUE锛夛紝杈撳嚭Q灏嗙洿鎺ヨ��璁剧疆涓篢RUE銆傝�屽綋Mode涓篢RUE鏃讹紝鍚屾牱鐨勪笂鍗囨部灏嗗�艰嚧Q杈撳嚭鐨勭姸鎬佸彂鐢熷垏鎹�锛屽嵆浠嶵RUE鍙樹负FALSE鎴栧弽涔嬨��

• 璁剧疆淇″彿锛氫竴鏃�SET杈撳叆鍙橀噺琚�缃�涓篢RUE锛岃緭鍑篞灏嗙珛鍗宠��璁剧疆涓篢RUE銆�

• 瓒呮椂鑷�鍔ㄥ�嶄綅锛氬�傛灉Timeout鍙橀噺琚�璧嬩簣浜嗕竴涓�闈為浂鐨勬椂闂村�硷紝閭ｄ箞鍦ㄨ�ユ椂闂村�煎埌鏈熷悗锛岃緭鍑篞灏嗚嚜鍔ㄨ��澶嶄綅涓篎ALSE銆�

• 澶嶄綅淇″彿锛歊ST杈撳叆鍙橀噺涓�鏃﹁��缃�涓篢RUE锛岃緭鍑篞灏嗙珛鍗宠��缃�涓篎ALSE銆�

  
  

鍔熻兘鍧楃▼搴忥細

[AppleScript] 绾�鏂囨湰鏌ョ湅 澶嶅埗浠ｇ爜

//鍙橀噺澹版槑
VAR_INPUT CONSTANT
  Mode : BOOL;
  Timeout : TIME;
END_VAR
VAR_INPUT
  IN,SET,RST : BOOL;
END_VAR
VAR_OUTPUT
  Q : BOOL;
END_VAR
VAR
  Ton1 : TON;
  Edge: BOOL;
END_VAR


// 濡傛灉Ton1.Q锛屽垯灏哘璁剧疆涓篎ALSE  
IF Ton1.Q THEN 
  Q := FALSE; 
END_IF;

// 濡傛灉RST锛堝�嶄綅锛変俊鍙蜂负1锛屽垯灏哘璁剧疆涓篎ALSE
IF RST THEN
  Q := FALSE;
ELSIF SET THEN// 濡傛灉SET淇″彿涓�1锛屽垯灏哘璁剧疆涓篢RUE    
  Q := TRUE;
  
//濡傛灉IN涓�1涓擡dge涓�0锛屽垯鏍规嵁Mode鐨勫�兼潵鍒囨崲鎴栬�剧疆Q鐨勫�� 
ELSIF IN AND NOT Edge THEN  
  IF Mode THEN 
    q := NOT Q; 
  ELSE 
    q := TRUE; 
  END_IF;
END_IF;

// 鏇存柊Edge鍙橀噺鐨勫�间负IN鐨勫綋鍓嶅�硷紝鐢ㄤ簬涓嬩竴娆℃��娴婭N鐨勫彉鍖�
Edge := IN;
// 濡傛灉timeout鐨勫�煎ぇ浜�0绉掞紙鍗筹紝濡傛灉璁剧疆浜嗚秴鏃舵椂闂达級锛屽垯璋冪敤Ton1鍑芥暟锛屽皢Q鐨勫�间綔涓鸿緭鍏ワ紝骞惰�剧疆瓒呮椂鏃堕棿  
IF Timeout > T#0S THEN 
  Ton1(in := Q, PT := Timeout); 
END_IF;

涓婅堪鍔熻兘鍧楅�傜敤浜庨渶瑕佹牴鎹�澶栭儴淇″彿鍙樺寲鏉ユ帶鍒惰緭鍑虹姸鎬佺殑鍦烘櫙锛岀壒鍒�鏄�鍦ㄩ渶瑕佽竟缂樿Е鍙戙�佺姸鎬佸垏鎹�銆佽秴鏃惰嚜鍔ㄥ�嶄綅鍜屽揩閫熷搷搴斿�嶄綅淇″彿鐨勬帶鍒堕�昏緫涓�銆�