CODESYS 瀹炴垬锛氬崟寮�鍏抽噺浼犳劅鍣ㄥ疄鐜版棆杞�閫熷害璁＄畻

FUNCTION_BLOCK PM_RotationSpeedCalculator
VAR_INPUT
    Sensor : BOOL;       // 鎰熷簲浼犳劅鍣ㄤ俊鍙�
    RunLength : REAL := 10;   // 杩愯�岄暱搴︼紙鍗曚綅锛氱背锛�
END_VAR
VAR_OUTPUT
    Speed : REAL;        // 閫熷害锛堝崟浣嶏細绫�/绉掞級
END_VAR
VAR
    LastTime : TIME;     // 涓婁竴娆℃��娴嬪埌浼犳劅鍣ㄧ殑鏃堕棿
    CurrentTime : TIME;  // 褰撳墠妫�娴嬪埌浼犳劅鍣ㄧ殑鏃堕棿
    TimeElapsed : REAL;  // 涓ゆ�℃��娴嬬殑鏃堕棿宸�锛堝崟浣嶏細绉掞級
    SensorTriggered : BOOL; // 浼犳劅鍣ㄨЕ鍙戠姸鎬�
END_VAR

(*
鐗堟湰璁板綍锛�
鐗堟湰          鏃ユ湡          浣滆��
 V1         2024-1-13     宸ユ帶鑰佺帇
*)

IF Sensor AND NOT SensorTriggered THEN
    CurrentTime := TIME(); // 璁板綍褰撳墠鏃堕棿
    IF LastTime <> T#0s THEN
        TimeElapsed := TIME_TO_REAL(CurrentTime - LastTime) / 1000.0; // 璁＄畻鏃堕棿宸�骞惰浆鎹�涓虹��
        IF TimeElapsed > 0 THEN
            Speed := RunLength / TimeElapsed; // 璁＄畻閫熷害
        END_IF
    END_IF
    LastTime := CurrentTime; // 鏇存柊涓婁竴娆℃椂闂�
    SensorTriggered := TRUE;
ELSIF NOT Sensor THEN
    SensorTriggered := FALSE;
END_IF