German Bluetooth SPP im binären Fomat

[cubetennis]

Hallo,

wollte über Bluetooth ein paar Bytes im binären Format mit folgenden Codes versenden.

Dim text1 As String
Dim TextWriter1 As TextWriter
Dim Serial1 As Serial

Serial1.Initialize("Serial1")
TextWriter1.Initialize(Serial1.OutputStream)
text1 = Chr(0x7F)
TextWriter1.Write(text1)
TextWriter1.Flush

Beim 0x7F wird 0x7F gesendet. Ist OK
Beim 0x80 werden dann aber 0xC2 0x80 gesendet. Warum ?
Beim 0xDD werden dann aber 0xC3 0x9D gesendet. Warum ?

Wie kann ich ihm beibringen, dass beim 0x80 bzw. 0xDD auch nur 0x80 bzw. 0xDD gesendet wird ?
Danke schon mal

 

[cubetennis]

Habe selber raus gefunden, so geht es mit dem Senden ....

Dim Serial1 As Serial
Dim ASS As AsyncStreams
Dim data(16) As Byte
Dim msg As String

ASS.Initialize(Serial1.InputStream,Serial1.OutputStream,"BT")
msg = "007F80DD"
data = Conv.HexToBytes(msg)
ASS.Write2(data,0,4)

 

[MaFu]

In Deinem vorherigen Versuch speicherst Du die Zeichen ja erst in einem String ab. Daher werden vermutlich die Zeichen als UTF-8 übertragen. Das erste Zeichen hat 0x7F (=127), somit als ein Byte. Die beiden Anderen sind größer als 127 und werden demnach als Zwei-Byte Zeichen übertragen.