Как сделать карту входов выходов в массиве.

[pt200]

Ну раз на булевскуя нельзя, то можно указатель на байт/слово + № бита

TYPE SR_ZONE :
STRUCT
    xStart_WORD: POINTER TO WORD;
    xStart_Nbit: WORD;
    ...
END_STRUCT
END_TYPE

glbZones[1].xStart_WORD := ADR( INPUT_WORD1);
glbZones[1].xStart_Nbit := 5;


#Set bit
glbZones[1].xStart_WORD^ := glbZones[1].xStart_WORD^ OR SHL( 1, glbZones[1].xStart_Nbit);

#Clear bit
glbZones[1].xStart_WORD^ := glbZones[1].xStart_WORD^ AND ( NOT SHL( 1, glbZones[1].xStart_Nbit));