#bBool[1]:= #InWord.%X0;
#bBool[2] := #InWord.%X1;
#bBool[3] := #InWord.%X2;
#bBool[4] := #InWord.%X3;
#bBool[5] := #InWord.%X4;
#bBool[6] := #InWord.%X5;
#bBool[7] := #InWord.%X6;
#bBool[8] := #InWord.%X7;
#bBool[9] := #InWord.%X8;
#bBool[10] := #InWord.%X9;
#bBool[11] := #InWord.%X10;
#bBool[12] := #InWord.%X11;
#bBool[13] := #InWord.%X12;
#bBool[14] := #InWord.%X13;
#bBool[15] := #InWord.%X14;
#bBool[16] := #InWord.%X15;
FOR #i := 1 TO 16 DO
IF NOT #bBool[#i] THEN
#CIN[#i] := 1;
ELSE
#CIN[#i] := 0;
END_IF;
END_FOR;
#NO := #CIN[1] + #CIN[2] + #CIN[3] + #CIN[4] + #CIN[5] + #CIN[6] + #CIN[7] + #CIN[8]
+ #CIN[9] + #CIN[10] + #CIN[11] + #CIN[12] + #CIN[13] + #CIN[14] + #CIN[15] + #CIN[16];
要的是不是这玩意,照着做个功能块调用吧!