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:
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