浣嶈浆瀛楀姛鑳藉潡鈥斺�攂it_as_word

wst

鍙橀噺澹版槑
FUNCTION_BLOCK bit_as_word
VAR_INPUT
        bit0        :BOOL;
bit1        :bool;
bit2        :bool;
bit3        :bool;
bit4        :bool;
bit5        :bool;
bit6        :bool;
bit7        :bool;
bit8        :bool;
bit9        :bool;
bit10        :bool;
bit11        :bool;
bit12        :bool;
bit13        :bool;
bit14        :bool;
bit15        :bool;
END_VAR
VAR_OUTPUT
w:WORD;
END_VAR
VAR
        x0,x1,x2,x3,x4,x5,x6,x7,x8,x9,x10,x11,x12,x13,x14,x15:WORD;
END_VAR

绋嬪簭
IF bit0 THEN x0:=1;ELSE x0:=0; END_IF
IF bit1 THEN x1:=1;ELSE x1:=0; END_IF
IF bit2 THEN x2:=1;ELSE x2:=0; END_IF
IF bit3 THEN x3:=1;ELSE x3:=0; END_IF       
IF bit4 THEN x4:=1;ELSE x4:=0; END_IF       
IF bit5 THEN x5:=1;ELSE x5:=0; END_IF       
IF bit6 THEN x6:=1;ELSE x6:=0; END_IF       
IF bit7 THEN x7:=1;ELSE x7:=0; END_IF       
IF bit8 THEN x8:=1;ELSE x8:=0; END_IF       
IF bit9 THEN x9:=1;ELSE x9:=0; END_IF       
IF bit10 THEN x10:=1;ELSE x10:=0; END_IF       
IF bit11 THEN x11:=1;ELSE x11:=0; END_IF       
IF bit12 THEN x12:=1;ELSE x12:=0; END_IF       
IF bit13 THEN x13:=1;ELSE x13:=0; END_IF       
IF bit14 THEN x14:=1;ELSE x14:=0; END_IF
IF bit15 THEN x15:=1;ELSE x15:=0; END_IF
w:=LREAL_TO_WORD(EXPT(2,0)*x0+EXPT(2,1)*x1+EXPT(2,2)*x2+EXPT(2,3)*x3+EXPT(2,4)*x4+EXPT(2,5)*x5+EXPT(2,6)*x6+EXPT(2,7)*x7
+EXPT(2,8)*x8+EXPT(2,9)*x9+EXPT(2,10)*x10+EXPT(2,11)*x11+EXPT(2,12)*x12+EXPT(2,13)*x13+EXPT(2,14)*x14+EXPT(2,15)*x15);

tanzf

杩欐槸鎴戣�佽繃鏈�绗ㄧ殑鍐欐硶浜�