FUNCTION_BLOCK FB70

VAR_INPUT
in:array[0..1000]of BOOL:=false;
END_VAR

VAR_OUTPUT
up:array[0..100] of BOOL:=false;
down:array[0..100]of BOOL:=false;
END_VAR

VAR
ls:array[0..1000]of BOOL;
i:int;
END_VAR
for i :=0 to 1000 by 1 do
FC20(Current_Status := in[i] // IN: BOOL
,Positive_Edge := up[i] // OUT: BOOL
,Negative_Edge := down[i]// OUT: BOOL
,Last_Status := ls[i]// INOUT: BOOL
); // VOID
end_for;
END_FUNCTION_BLOCK