hallo ProgDom,
wenn ich dich richtig verstehe willst du einfach nur den Wert der vier Bits in einem Byte abspeichern.

Dann mach es doch einfach so

Byte=Portd AND &B11110000

Wenn jetzt unbedingt die Bits an Position 0-3 sein sollen dann nocht

Rotate Byte, Right(4)

Hoffe das hilft dir

Gruß
Baui