Bad programmers worry about the code. Good programmers worry about data structures and their relationships
среди успешных людей я не встречала нытиков
Барбара Коркоран
Ну раз на булевскуя нельзя, то можно указатель на байт/слово + № бита
Код: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));