так работает, большая вам благодарность! А не подскажете, как это работает?
Вид для печати
function_block functionblock1 //имя функционального блока.
var_input
uzas : udint;
start : udint;
quant : udint;
end_var
var_output
Q : udint;
end_var
var
i: udint;
sv: udint;
end_var
for i := 0 to (quant - 1) do
sv := shr(uzas, i);
if sv.0 then
Q := start - i;
end_if
end_for
end_function_block
А как с этим вашим cd32 вот такое переделать?