Von dezimal zu dual Umrechnung

[Sauerbruch]

Du kannst aber doch ganz einfach alle 8 Bits Deines Bytes einzeln als Byte.0 bis Byte.7 ansprechen bzw. abfragen.

Wenn ich die Variable "Zahl" in ihre 8 Bits zerlegen müsste, würde ich das vielleicht so machen:

Dim Zahl as Byte

Dim Dual0 as Bit
Dim Dual1 as Bit
Dim Dual2 as Bit
Dim Dual3 as Bit
Dim Dual4 as Bit
Dim Dual5 as Bit
Dim Dual6 as Bit
Dim Dual7 as Bit

Do

Zahl = ...  (0-255)

Dual0 = Zahl.0
Dual1 = Zahl.1
Dual2 = Zahl.2
...
Dual7 = Zahl.7

Print Dual0,;Dual1; Dual2;...; Dual7

Loop

Man könnte natürlich versucht sein, Dual(N) als Array anzulegen und eine Schleife mit einem Zähler N von 1-8 durchlaufen zu lassen. Arrays gehen aber leider mit Bit-Variablen nicht...