The device works fine but the address I get in the log-windows is:
01 19 0E C3 11 00 00 02
But it should be:
02 00 00 11 C3 0E 19 01 (that address is on the ibutton)
I have added spaces due to better readability. They are not shown in the output.
Dim a() As Byte = Array As Byte(0x01, 0x19, 0x0E, 0xC3, 0x11, 0x00, 0x00, 0x02)
Dim bc As ByteConverter
Dim b(8) As Byte
bc.ArrayCopy2(a, 4, b, 0, 4)
bc.ArrayCopy2(a, 0, b, 4, 4)
Log(bc.HexFromBytes(b))