Bits eines Byte invertieren

**Salomon**

Hallo,
ich möchte für meine Relaiskarte eine Function schreiben, die alle Relais umkehrt. Dazu hole ich mir ein Byte von der Relaiskarte, indem die Momentanen Schaltzustände gespeichert sind.
Nun muss ich die einzelnen Bits des Bytes umkehren. Also aus

10101010 wird
01010101

wie mache ich das? Mit XOR?

kennt jemand ein Tutorial für die anderen Boolean Operatoren not, and, or?

Bislang habe ich es so probiert:

markieren

Code:

			Procedure InvertAllRelais(CardNr: Byte);

Var n, new : byte;

begin

  rel.GetPorts(CardNr,n);

  new := n xor n;

  rel.SetPorts(CardNr,new);

end;

Mfg
Salomon

Bits eines Byte invertieren

Bits eines Byte invertieren

Forumregeln