ATNEL tech-forum

Re: Odbieranie HEX przez bluetooth B4A

2015-05-24T19:26:55+01:00

Funkcja SubString2 ma odczytać ze zmiennej strumien po dwa znaki składające się na wartość hex która jest przetwarzana na wartość integer.
O ile masz odbierany ciąg 80 wartości hex to Twoja zmienna strumien ma 160 znaków, gdzie wartości hex są na pozycjach: 0-1, 2-3, 4-5, 6-7, ...., 158-159. Ponieważ SubString2 nie czyta znaku na pozycji koniec więc czytając 2 znaki koniec musi być +1,czyli:
1-szy hex SubString2(0, 2)
2-gi hex SubString2(2,4)
3-ci hex SubString2(4,6)
......
80-ty hex SubString2(158, 160)

Statystyki: Napisane przez rchobby — 24 maja 2015, o 19:26

Re: Odbieranie HEX przez bluetooth B4A

2015-05-24T18:12:34+01:00

czyli gdy przekonwertowałem już na string o dwóch znakach i odpowiednio zapisałem w tablicy który jest który. To tworze SubString2(poczatek As Int, koniec As Int). Jakoś jeszcze tego nie łapię;/ jak mam wyznaczyć początek i koniec.

Statystyki: Napisane przez fisto85 — 24 maja 2015, o 18:12

Re: Odbieranie HEX przez bluetooth B4A

2015-05-20T07:55:19+01:00

Przedstawiony kod pochodzi z programu odczytujacego transmisję z ładowarki modelarskiej Accucell-6 (klon iMax6), czyta z USB i Bluetooth'a.
Dana strumien jest typu string czyli pamięta ciąg znaków np. "1245AB8C" by zamienić na hex musimy wysupłać po dwa znaki np. "12", "45", "AB" (w przypadku wartości 8-bitowych) stąd polecenie SubString2(poczatek As Int, koniec As Int).
Natomiast ParseInt(tekst As String, radix As Int), gdzie radix od 2 do 36, zamienia powyższe hex-y na wartość integer o zadanej podstawie radix, u mnie 16.
W programie zapis wartości inetger jest do tabeli ints() by później łatwo odczytywać z określonych pozycji po każdym odczytanym pakiecie danych przesłanych z ładowarki, 152 znaki czyli 76 danych typu hex.

Statystyki: Napisane przez rchobby — 20 maja 2015, o 07:55

Re: Odbieranie HEX przez bluetooth B4A

2015-05-19T20:56:52+01:00

Wszystko rozumiem do punktu sub wyswietldane nie rozumiem dlaczego tak to musi wygladac?Czy móglbys mi to nakreslic blizej.

Statystyki: Napisane przez fisto85 — 19 maja 2015, o 20:56

Re: Odbieranie HEX przez bluetooth B4A

2015-05-19T18:55:41+01:00

Do konwersji na hex'a używam funkcji ByteConverter, zamiana na integer przez Bit.ParseInt

Code:

Sub Process_Globals
  Dim conv As ByteConverter
  ...
End Sub
Sub Globals
  Dim strumien As String
  Dim ints(76) As Int
  ...
nd Sub
....
Sub AStreams_NewData (Buffer() As Byte)
  Dim noweDane As String
  ...
  noweDane = conv.HexFromBytes(Buffer)
  ...
  strumien = strumien & noweDane
  ...
  wyswietlDane(strumien)
  ...
End Sub
Sub wyswietlDane(txtBlock As Sring)
  Dim i As Int
  For i = 0 To txtBlock.Length/2 - 2
    ints(i) = Bit.ParseInt(txtBlock.SubString2((i*2), (i*2+2)), 16)
  Next
  ...
End Sub

Statystyki: Napisane przez rchobby — 19 maja 2015, o 18:55

Re: Odbieranie HEX przez bluetooth B4A

2015-05-19T16:25:43+01:00

Nie no odbieram ciąg ale jak se je wyswietlam to sa krzaki a ja chce widziec te wartosci hex ewentualnie zrobic z nich integer zmienna

Statystyki: Napisane przez fisto85 — 19 maja 2015, o 16:25

Re: Odbieranie HEX przez bluetooth B4A

2015-05-18T22:06:19+01:00

Może sobie obejrzyj to:

https://www.youtube.com/watch?v=1tAXqCt5vVQ

Statystyki: Napisane przez mirekk36 — 18 maja 2015, o 22:06

Re: Odbieranie HEX przez bluetooth B4A

2015-05-18T21:04:52+01:00

Skoro umiesz odbierać dane jako normalny string (nie do końca rozumiem - znaczy ciąg ascii?), to czym różni się odbieranie danych binarnych (hex)? Odbierasz je po kolei, drugiego używasz do określenia ile bajtów odebrać. Rozumiem, że dane z tego urządzenia odbierasz jakbyś czytał z portu szeregowego?

Statystyki: Napisane przez Marvinn8686 — 18 maja 2015, o 21:04

Odbieranie HEX przez bluetooth B4A

2015-05-18T11:45:12+01:00

Witam umiem już odbierać dane z PC jako normalny string UTF-8. Natomiast nijak nie mogę pojąć jak mam odebrać łańcuch znaków hex i wydobyć z nich dane. Dodatkowo utrudnieniem jest, że dane z PC nie są wysyłane z chr(13) tylko po kolei ja muszę rozkodować po drugim znaku Hex(wartość) jak długi jest łańcuch znaków oraz wiem czym się kończy np. hex(01) lub hex(02). Na razie udało mi się tylko odebrać znaki z buffora zakończone enterem. Przykładowo wiem, że łańcuch ma 80 znaków hex wiem, że zaczyna się literą A ,a kończy znakiem hex (B1). Będę wdzięczny za pomoc.

Statystyki: Napisane przez fisto85 — 18 maja 2015, o 11:45