ATNEL tech-forum

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-11T20:03:09+01:00

W pliku jest to właśnie pokazane, wraz z innymi rzeczami

Wysłane ze srajfona

Statystyki: Napisane przez Harry — 11 lis 2019, o 20:03

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-11T19:59:17+01:00

W tym przykładzie który mu podałem pokazane jak odbierać ciąg znaków i odczytać go po stronie Androida za pomocą AsyncStreamsText. AsyncStreamsText zajmuje się zbieraniem otrzymanych danych i analizowaniem ich na podstawie znaków końca lini właśnie.

Statystyki: Napisane przez tfosik — 11 lis 2019, o 19:59

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-11T18:30:46+01:00

To nie wina modułu, tylko programisty który zapomniał ustawić znak końca transmisji i teraz b4a analizuje wciąż nadchodzące dane.

Zobacz jak wygląda odbiór np tu topic19536-60.html#p198977 (zassaj)

Statystyki: Napisane przez Harry — 11 lis 2019, o 18:30

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-11T13:51:57+01:00

O ten moduł Ci chodzi
Tutaj masz przykład jak to zrobić prawidłowo po stronie B4A, niestety druga strona jest po b4r.
https://www.b4x.com/android/forum/threa ... oth.66677/

A tu trochę odpowiedzi na twój problem
https://www.b4x.com/android/forum/threa ... 2/#content

Statystyki: Napisane przez tfosik — 11 lis 2019, o 13:51

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-11T13:07:01+01:00

A jak to zmienić? Programowo w atmedze? Czy to wina modułu ? Używam HC-05

Statystyki: Napisane przez Tokio518 — 11 lis 2019, o 13:07

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-11T12:11:21+01:00

No to teraz widzisz co się dzieje. Dostajesz przypadkowe dane, powycinane , posklejane itp.
jedyny prawidłowy wynik uzyskałeś w tej linii
[syntax=basic4gl]27. zmienna str=.235.1023.[/syntax]

Statystyki: Napisane przez tfosik — 11 lis 2019, o 12:11

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-11T11:45:22+01:00

To było w konsoli
[syntax=vb]Logger połączony z: HUAWEI ATU-L21
--------- beginning of system
--------- beginning of main
*** Service (starter) Create ***
** Service (starter) Start **
** Activity (main) Create, isFirst = true **
** Activity (main) Resume **
zmienna str=.235.1023..235.1023..235.1023..235.1023..235.1023..235.1023..235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.
zmienna str=235.1023.
zmienna str=.
zmienna str=235.1023.[/syntax]

Statystyki: Napisane przez Tokio518 — 11 lis 2019, o 11:45

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-11T11:11:58+01:00

Witam masz złe kodowanie po stronie mikroprocka
[syntax=basic4gl]Sub AST_NewData (Buffer() As Byte)
dim str as string
str = BytesToString(Buffer, 0, Buffer.Length, "UTF8")
EdLog.text = str
Log("zmienna str="&str)

' to wszystko poniżej na razie nieczynne, do puki nie uzyskasz prawidłowego ciągu do podziału
' w przeciwnym razie będziesz dostawał błąd (w sposób przypadkowy)

'Dim a,b As String
'Dim numbers() As String
'numbers = Regex.split("\.", str)
'a=numbers(1)
'b=numbers(2)
'Label1.text = a
'Label2.text = b

End Sub[/syntax]
Oczywiście kompiluj w trybie debug..

Statystyki: Napisane przez tfosik — 11 lis 2019, o 11:11

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-11T09:41:10+01:00

W b4a wszystko się zgadza wszystko jest jako string w zmiennej "STR" nie ma nic dodatkowego. Ale zmniejszyłem częstotliwość wysyłania do 2000 ms i zauważyłem, że pierwsza partia danych przypisuje się a jak nadejdzie druga to wtedy wyłącza aplikacje.

Statystyki: Napisane przez Tokio518 — 11 lis 2019, o 09:41

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-10T15:13:03+01:00

Tokio, a jak wyślesz z procka raz, a nie ciąg co 600ms to działa?
Co zawiera zmienna STR, zanim poddasz ją dzieleniu regexem?
W jaki sposób wysyłasz z procka - masz znak końca wiersza?

Wysłane ze srajfona

------------------------ [ Dodano po: 36 minutach ]

Tokio, zrób tak:
ustaw breakpoint poniżej linii str=..., nastepnie najedz myszką na zmienną STR i zobacz czy jest to samo co Ci ląduje w Edlogu - mogą być jeszcze jakieś dane sterujące, które nie są wyświetlane, a mimo Regex je widzi.

Statystyki: Napisane przez Harry — 10 lis 2019, o 15:13

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-10T12:48:03+01:00

Pewnie tak.
https://www.b4x.com/android/forum/threa ... 9/#content

Tutaj fragment kodu z ARDUINO, tworzy ciąg i wysyła po udp, separatorem jest x, prymityw ale działa.
[syntax=cpp]String tempp1 ;
tempp1 += "x";
tempp1 += Pomiar1;
tempp1 += "x";
tempp1 += Pomiar2;
tempp1 += "x";
tempp1 += Pomiar3;
tempp1 += "x";
tempp1 += Pomiar4;
tempp1 += "x";
Udp.println(tempp1);[/syntax]

Musisz mieć pewność że wszystkie dane to string, jeżeli nie to musisz przekonwertować na string...

Statystyki: Napisane przez tfosik — 10 lis 2019, o 12:48

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-10T11:58:22+01:00

Tak to działa. Więc wina by leżała po stronie procka ?

Statystyki: Napisane przez Tokio518 — 10 lis 2019, o 11:58

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-10T10:56:09+01:00

Czy to działa dla Ciebie
[syntax=basic4gl]Sub AST_NewData (Buffer() As Byte)
Dim str As String=".tekst1.tekst2."
' STR = BytesToString(Buffer, 0, Buffer.Length, "UTF8")
EdLog.text = STR
Log("zmienna str="&STR) ' na przykład tutaj
Dim a,b As String
Dim numbers() As String
numbers = Regex.split("\.", STR)
a=numbers(1)
b=numbers(2)
Label1.text = a
Label2.text = b
End Sub[/syntax]

Statystyki: Napisane przez tfosik — 10 lis 2019, o 10:56

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-10T10:28:47+01:00

Nic to nie dało, jest jeszcze gorzej, ponieważ jak za komentuje b=numbers(2) to nie działa, a wcześniej to pomagało.

Statystyki: Napisane przez Tokio518 — 10 lis 2019, o 10:28

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-10T10:08:34+01:00

Tokio518 napisał(a):

Działa, gdy jest za komentowane b=numbers(1), ale w terminalu (Edlog) dane dziwnie się dzielą, ponieważ atmega wysyła "235.1023", a jest
"2
35.1023"
Tak jakby po 2 dodawała CRLF, które powinno być po wszystkim

Atmenga powinna wysyłać ".235.1023." Jeżeli wysyłasz tylko liczby to zmień może separator na x i wyślij coś takiego "x235x1023x"

tak działa metoda Regex, dzieli ciąg na części zawarte pomiędzy separatorami.

Statystyki: Napisane przez tfosik — 10 lis 2019, o 10:08

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-10T10:04:08+01:00

Statystyki: Napisane przez Tokio518 — 10 lis 2019, o 10:04

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-10T09:51:09+01:00

Ustaw to tak i nie zmieniaj
[syntax=basic4gl]a=numbers(1)
b=numbers(2)[/syntax]

Tu chyba problem leży po stronie procka, albo spróbuj jeszcze tak
[syntax=basic4gl]Sub AST_NewData (Buffer() As Byte)
Dim STR As String
dim e as string
STR = BytesToString(Buffer, 0, Buffer.Length, "UTF-8")
e = str & CRLF
EdLog.text = EdLog.text & e
Dim a,b As String
Dim numbers() As String
numbers = Regex.split("\.", e)
a=numbers(0)
' b=numbers(1)
Label1.text = a
Label2.text = b
End Sub[/syntax]

Statystyki: Napisane przez tfosik — 10 lis 2019, o 09:51

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-10T09:01:44+01:00

Żadne z rozwiązań nic nie dało, gdy ustawie
[syntax=vb]a=numbers(1)
b=numbers(2)[/syntax]
To nadlatujące dane zamieniają się miejscami. Debuger wskazuje na b=numbers(2), gdy dane z atmegi to "235.1023", a gdy dane to".235.1023." to wskazuje na a=numbers(1). (Dane z atmegi są wysyłane co 600ms)

------------------------ [ Dodano po: 14 minutach ]

To było w linijki z debugera
[syntax=vb]235
1023235
3235
1023235
23235
1023235
023235
1023235
1023235
1023235
1023235
5
1023235
35
1023235
Error occurred on line: 200 (Main)
java.lang.ArrayIndexOutOfBoundsException: length=1; index=1
at java.lang.reflect.Array.get(Array.java:174)
at anywheresoftware.b4a.shell.ArraysUtils.getElement(ArraysUtils.java:76)
at anywheresoftware.b4a.shell.Shell.getArrayElement(Shell.java:568)
at anywheresoftware.b4a.shell.Shell.raiseEventImpl(Shell.java:374)
at anywheresoftware.b4a.shell.Shell.raiseEvent(Shell.java:249)
at java.lang.reflect.Method.invoke(Native Method)
at anywheresoftware.b4a.ShellBA.raiseEvent2(ShellBA.java:139)
at anywheresoftware.b4a.BA$2.run(BA.java:360)
at android.os.Handler.handleCallback(Handler.java:808)
at android.os.Handler.dispatchMessage(Handler.java:101)
at android.os.Looper.loop(Looper.java:166)
at android.app.ActivityThread.main(ActivityThread.java:7529)
at java.lang.reflect.Method.invoke(Native Method)
at com.android.internal.os.Zygote$MethodAndArgsCaller.run(Zygote.java:245)
at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:921)[/syntax]
Linjka 200 to b=numbers(1)

Statystyki: Napisane przez Tokio518 — 10 lis 2019, o 09:01

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-10T01:16:49+01:00

Wystarczy, pod warunkiem że wie co się robi, a jak nie, to zostaje podgląd zmiennych w trakcie działania

Statystyki: Napisane przez Harry — 10 lis 2019, o 01:16

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-10T00:30:57+01:00

No Pudzian wygrał w KSW...
Rzadko korzystam z Breakpoint, nawet w rozbudowanych projektach, ale to dobre narzędzie. A Log-i to zamiast editext-ów i Labelek, w większości przypadków wystarczają.

Statystyki: Napisane przez tfosik — 10 lis 2019, o 00:30

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-09T23:52:02+01:00

Główna zaletą trybu debug nie są logi, tylko możliwość ustawienia pułapek i uruchamiania aplikacji krok po kroku. Tokio musi się tego nauczyć, bo bez tego będzie mu ciężko robić bardziej skomplikowane aplikacje.

Wysłane ze srajfona

Statystyki: Napisane przez Harry — 9 lis 2019, o 23:52

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-09T20:35:37+01:00

Tak sprawdziłem dla pewności
[syntax=basic4gl]Dim str As String=".tekst1.tekst2."
Dim a,b As String
Dim numbers() As String
numbers = Regex.split("\.", str)

a=numbers(1)
b=numbers(2)
Log(a)
Log(b)[/syntax]

I wszystko działa. Sprawdż i skompiluj w trybie debug

Statystyki: Napisane przez tfosik — 9 lis 2019, o 20:35

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-09T20:29:19+01:00

Przeleć linia po linii i zobacz co zawiera tablica numbers

Wysłane ze srajfona

Statystyki: Napisane przez Harry — 9 lis 2019, o 20:29

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-09T20:13:21+01:00

Spróbuj tak
[syntax=basic4gl]a=numbers(1)
b=numbers(2)[/syntax]

Jak wygląda ten ciąg?, który nadlatuje.

Statystyki: Napisane przez tfosik — 9 lis 2019, o 20:13

Re: Problem z dzieleniem danych z rs232 na zmienne w b4a

2019-11-09T19:45:11+01:00

Zmiana separatora nic nie dała, ale skompilowałem kod w trybie debug oto to co było w konsoli
[syntax=vb]Logger połączony z: HUAWEI ATU-L21
--------- beginning of system
--------- beginning of main
Error occurred on line: 195 (Main)
java.lang.ArrayIndexOutOfBoundsException: length=1; index=1
at b4a.example.main._ast_newdata(main.java:676)
at java.lang.reflect.Method.invoke(Native Method)
at anywheresoftware.b4a.shell.Shell.runMethod(Shell.java:710)
at anywheresoftware.b4a.shell.Shell.raiseEventImpl(Shell.java:342)
at anywheresoftware.b4a.shell.Shell.raiseEvent(Shell.java:249)
at java.lang.reflect.Method.invoke(Native Method)
at anywheresoftware.b4a.ShellBA.raiseEvent2(ShellBA.java:139)
at anywheresoftware.b4a.BA$2.run(BA.java:360)
at android.os.Handler.handleCallback(Handler.java:808)
at android.os.Handler.dispatchMessage(Handler.java:101)
at android.os.Looper.loop(Looper.java:166)
at android.app.ActivityThread.main(ActivityThread.java:7529)
at java.lang.reflect.Method.invoke(Native Method)
at com.android.internal.os.Zygote$MethodAndArgsCaller.run(Zygote.java:245)
at com.android.internal.os.ZygoteInit.main(ZygoteInit.java:921)
*** Service (starter) Create ***
** Service (starter) Start **
** Activity (main) Create, isFirst = true **
** Activity (main) Resume **[/syntax]
Za komentowałem linie 195 i aplikacja działa tylko pojawił się kolejny problem
[syntax=vb]Sub AST_NewData (Buffer() As Byte)
Dim STR As String
STR = BytesToString(Buffer, 0, Buffer.Length, "UTF8")
EdLog.text = EdLog.text & STR
Dim a,b As String
Dim numbers() As String
numbers = Regex.split("\.", STR)
a=numbers(0)
'b=numbers(1)
Label1.text = a
Label2.text = b
End Sub[/syntax]
Za komentowana linia która sprawiała problem przypisuje do zmiennej b dane z atmegi. Gdy za komentowana jest zmienna b wszystkon działa dobrze i pierwsza zmienna wysyłana przypisuje się zmiennej a

Statystyki: Napisane przez Tokio518 — 9 lis 2019, o 19:45