BCC-Code erzeugen

[Picht]

Hallo Leute
ich will ein String als BCC codiert übertragen.
dazu muss ja die Stringlänge ermittelt werden
dann kommt ein Befehlssatz
Dann der Stringsatz
Dann die Xor Prüfsumme.
hab sowas noch nie gemacht.
Vielleicht kennt jemand Links oder Beispiele.


Wigbert

[Picht]

Hallo,
noch mal das leidige Thema CRC

Dim Ar(10) As Byte

Dim J As Byte

Ar(1) = 1

Ar(2) = 2

Ar(3) = 3

J = Crc8(ar(1) , 3) 'calculate value which is 216

Print J

End

Ergebnis 216

was macht Befehl crc8 eigentlich
Ich dachte er addiert die Arrys subtrahiert von 0
und gibt den Rest aus.
Kann das aber mit den Taschenrechner nicht nachvollziehen.

Wigbert