Битовая маска

[Валенок]

или так

VAR
	b AT %MB0 : ARRAY[0..3] OF BYTE;
	mask AT %MD0 : DWORD;
END_VAR
;