妯℃嫙閲忛噺绋嬭浆鎹㈡簮鐮�

wst

澹版槑
FFUNCTION_BLOCK HS_ENGIN_HEX                  (*宸ョ▼閲�  杞�鎹㈡垚 16杩涘埗鏁版嵁*)
VAR_INPUT
        EN: BOOL;
        IN: REAL;           (*宸ョ▼閲忔暟鎹�*)               
        HIGH: REAL;       (*宸ョ▼閲忛噺绋嬩笂闄�*)       
        LOW: REAL;          (*宸ョ▼閲忛噺绋嬩笅闄�*)                                                                                                
        MODE: BYTE;       (*妯″紡杈撳叆绔�        0锛�4~20mA1锛�0~20mA        2锛�0~5V/0~10V3锛�-10~10V*)
END_VAR

VAR_OUTPUT
        ENO: BOOL;
        OUT: UINT;                 (*杈撳嚭16杩涘埗鏁版嵁 *)
        ERROR: BOOL;
END_VAR
VAR
END_VAR
绋嬪簭


IF MODE=1 THEN              (*鏈�澶ч噺绋嬭寖鍥存槸0鈥�21mA锛岀簿搴﹁寖鍥村唴閲忕▼鏄�0鈥�20mA*)
    IF IN>HIGH THEN
        OUT:=16#F3CE;
        ERROR:=TRUE;
    ELSIF IN<LOW THEN
        OUT:=0;
        ERROR:=TRUE;
    ELSE
        OUT:=REAL_TO_UINT((IN-LOW)/(HIGH-LOW)*16#F3CE);
        ERROR:=FALSE;
    END_IF
END_IF

IF MODE=2 THEN     (*鏈�澶ч噺绋嬭寖鍥存槸0鈥�10.4V / 0鈥�5.2V锛岀簿搴﹁寖鍥村唴閲忕▼鏄�0鈥�10V / 0鈥�5V*)
    IF IN>HIGH THEN
        OUT:=16#F626;
        ERROR:=TRUE;
    ELSIF IN<LOW THEN
        OUT:=0;
        ERROR:=TRUE;
    ELSE
        OUT:=REAL_TO_UINT((IN-LOW)/(HIGH-LOW)*16#F626);
        ERROR:=FALSE;
    END_IF
END_IF

IF MODE=3 THEN          (*鏈�澶ч噺绋嬭寖鍥存槸-10.4鈥�10.4V锛岀簿搴﹁寖鍥村唴閲忕▼鏄�-10鈥�10V*)
    IF IN>HIGH THEN
        OUT:=16#FB13;
        ERROR:=TRUE;
    ELSIF IN<LOW THEN
        OUT:=16#04EC;
        ERROR:=TRUE;
    ELSE
        OUT:=REAL_TO_UINT((IN-LOW)/(HIGH-LOW)*16#F627+16#04EC);
        ERROR:=FALSE;
    END_IF
END_IF

wx_6893125775

涓嶉敊锛岃阿璋㈠垎浜�