ATNEL tech-forum

Re: Polaczenie bluetooth raz jeszcze

2020-05-02T08:40:37+01:00

Kod troche jest tajny przynajmniej w kilku punktach, bo jest do obsługi urządzenia do którego dostęp będzie miało kilka osób.Po prostu można nim konfigurować je i przydzielać dostęp. Ale zaraz wytnę wszystko zostawiając tylko komunikacje Bt i logi jakie wysyłam z procka.

------------------------ [ Dodano po: dzisiaj, o 08:40 ]

Ok. To opisze trochę urządzenie. Jest to projekt dla Caritas i będzie dostarczany dla osób w obozach dla uchodźców. Mimo,ze z kościołem nie jest mi po drodze to jednak projekt wydal mi sie na tyle pozytywny,ze postanowiłem wesprzeć charytatywnie go. Nie jest to mój pomysł i ja pomaga przy drugiej wersji urządzenia. https://pesitho.com/ tu więcej informacji jeśli kogoś interesuje.
Sterownik tego urządzenia oprócz ogólnego sterowania zapisuje tez logi sa w nim napięcia akumulatora ,panela słonecznego ,pobór pradu i takie tam .Log wygląda mniej więcej tak
[syntax=basic4gl]29-4-2020 19:40/0.0/28.0/27.0/5.2/0.0/0.0/0.00/0/0/0
29-4-2020 19:42/0.0/28.0/27.0/5.2/0.0/0.0/0.00/0/0/0
29-4-2020 19:43/0.0/28.0/27.0/5.2/0.0/0.0/0.00/0/0/0
29-4-2020 19:44/0.0/28.0/27.0/5.2/0.0/0.0/0.00/0/0/0[/syntax]
Jest to .text i wysyłam to jako zwykle stringi.
W procku robie to tak:
[syntax=basic4gl]Ff = Freefile()
Open Nazwa For Input As #ff 'otwieramy plik do oczytu
If Lof(#ff) <> 0 Then
Ile_plikow2 = 0

Disable Interrupts

Do

Line Input #ff , Text
Incr Ile_plikow2 ' linia odczytana
Print Text
Text = ""
Reset Watchdog

End If
Enable Interrupts
Loop Until Eof(#ff) <> 0
Close #ff[/syntax]

jak widać jest to bascom i w pętli robi tylko odczyt z karty i wysyla. W tym czasie nie robi nic innego. Kwarc 16Mhz i baud 115200, ale tez testowałem na 38400. Tu wszystko jest OK bo i Putty i moj program na kompie nie ma problemow żeby wszystko zapisywać.
Problem jest tylko z Androidem. Takich Lini do przesłania będzie kilkadziesiąt tysięcy ,a pewnie i settysiecy. Dziennie zapisuje 1440 logów. 150 000 zapisuje w około 10 minut. Trochę wolno,ale szybciej niz rozbieranie urządzenia i wyjmowanie karty. Chyba to wszystko. W zalaczniku program na szybko zrobiony,ale efekt działania jest identyczny jak w głównym programie

------------------------ [ Dodano po: dzisiaj, o 08:40 ]

Zapomniałem dopisać, ze problemy sa tylko gdy ściągam powyżej kilkuset lini. Przy normalnym użytkowania nie ma żadnych problemow

------------------------ [ Dodano po: 2 maja 2020, o 08:40 ]

I jak tam sprawdził ktos ta komunikacje? Czy na darmo sie rozpisywałem?

Statystyki: Napisane przez grzeniu 73 — 2 maja 2020, o 08:40

Re: Polaczenie bluetooth raz jeszcze

2020-05-02T01:00:10+01:00

On pisał wcześniej, że nawet jak usunie sekcję zapisu to też się wyglebia, więc to nie to.
Chyba nie doczekamy się kodu.

O wysyłanie z procka to ty się nie martw, bo możemy sobie zrobić bombardowanie BT we własnym zakresie(z kompa/procka a nawet innego telefonu jak ktoś będzie miał ochotę).
To jest naprawdę aż taki tajny kod?

Statystyki: Napisane przez Harry — 2 maja 2020, o 01:00

Re: Polaczenie bluetooth raz jeszcze

2020-05-01T23:27:20+01:00

Napisz dokładnie co robi twój program i prześlij mały projekt w którym występuje problem. Tylko z twoim kodem i nie pisz że kod ten sam co u Mirka tylko prześlij projekt.

P.S. Tak zerknąłem na to co przesłałeś
[syntax=basic4gl]If zapis_karta = 1 Then
ile_plikow =ile_plikow +1
downladfile.Text=ile_plikow & " file"

TextWriter1.Initialize(File.OpenOutput(File.DirRootExternal , save_name, True))
TextWriter1.WriteLine(Text)
TextWriter1.Close[/syntax]

Zmienna TextWriter1 tworzona jest gdzieś wyżej, może powinna być tworzona w tym sub-ie
[syntax=basic4gl]If zapis_karta = 1 Then
ile_plikow =ile_plikow +1
downladfile.Text=ile_plikow & " file"

Dim TextWriter1 as TextWriter
TextWriter1.Initialize(File.OpenOutput(File.DirRootExternal , save_name, True))
TextWriter1.WriteLine(Text)
TextWriter1.Close[/syntax]
Ale to też tylko spekulacje.

Statystyki: Napisane przez tfosik — 1 maja 2020, o 23:27

Re: Polaczenie bluetooth raz jeszcze

2020-05-01T22:59:19+01:00

Kurcze musiałby tez mieć cos wysyła cały czas dane z procka. Projekt to nie problem bo mirek gdzieś w filmikach o terminalu kod udostępnił ,a ja mam to samo.

Statystyki: Napisane przez grzeniu 73 — 1 maja 2020, o 22:59

Re: Polaczenie bluetooth raz jeszcze

2020-05-01T20:36:27+01:00

Stwórz mały projekt, zapakuj w ZIP i prześlij na forum. Może, któryś z kolegów znajdzie problem.

Statystyki: Napisane przez tfosik — 1 maja 2020, o 20:36

Re: Polaczenie bluetooth raz jeszcze

2020-05-01T20:20:57+01:00

AsyncStreamsText. Znalazłem jeszcze moduł HC-05 i to samo co z HC-06 . Kurcze jeśli komputer ogarnia bez problemu transmisje i stary jak świat telefon to chyba wydajność nie jest tu problemem. I to tez jest tak ze jak nie działa to zawsze ,a na tych co działa to zawsze działa. Za tydzień czeka mnie kwarantanna to to będę miał dwa tygodnie, to pobawię się WiFi chociaż tam nie bardzo mam opanowany odbiór.

Statystyki: Napisane przez grzeniu 73 — 1 maja 2020, o 20:20

Re: Polaczenie bluetooth raz jeszcze

2020-05-01T17:34:48+01:00

grzeniu 73 napisał(a):

Musze teraz ,tylko dojść który BT robi problemy. W telefonie czy HC-06

A jak myślisz?
Skoro telefonów masz kilka i na żadnym poza jednym nie działa...

Ostatnie pytanie i można zamknąć skoro działa, mimo że nie działa.
Używasz klasy AsyncStreamsText czy zwykłego AsyncStreams?
Po kablu telefon ma znacznie mniej do roboty, ale...

Statystyki: Napisane przez Harry — 1 maja 2020, o 17:34

Re: Polaczenie bluetooth raz jeszcze

2020-05-01T15:37:25+01:00

Tu naprawdę nie ma nic z kodem wspólnego. To jest ten sam kod co jest w poradnikach. Jest tylko to co co wysłałem wcześniej i odbiór na AsyncStreams module.
Przerobiłem odbiór teraz na UsbSerial ta biblioteka korzysta tak samo jak biblioteka Serial do BT z modułu AsyncStreams
wiec program pozostał ten sam i wszystko śmiga dobrze. Musze teraz ,tylko dojść który BT robi problemy. W telefonie czy HC-06.
Albo WiFi tylko muszę moduł od Mirka zamówić. Odhaczyłem filtrowanie przy Logach i nie było ani jednego błędu.

Statystyki: Napisane przez grzeniu 73 — 1 maja 2020, o 15:37

Re: Polaczenie bluetooth raz jeszcze

2020-05-01T14:47:56+01:00

Wrzucisz w końcu kod?
Ten najprostszy.

Wysłane ze srajfona

Statystyki: Napisane przez Harry — 1 maja 2020, o 14:47

Re: Polaczenie bluetooth raz jeszcze

2020-05-01T12:18:04+01:00

Sprawdź w niefiltrowanych dziennikach...Jak by się udało błąd złapać to by była jakaś wskazówka a tak to trochę wróżenie..
Tutaj jest przykład (nie wiem czy z tego korzystasz).
https://www.b4x.com/android/forum/threa ... 7/#content

Statystyki: Napisane przez tfosik — 1 maja 2020, o 12:18

Re: Polaczenie bluetooth raz jeszcze

2020-05-01T11:56:27+01:00

Dodałem to ale nic to nie zmieniło. Napisałem programik, który tylko odbiera dane ,nawet nie zapisuje tego ,tylko zmienna incrementuje i dalej to samo. Pozostaje tylko zmienić komunikacje albo moduły BT

Statystyki: Napisane przez grzeniu 73 — 1 maja 2020, o 11:56

Re: Polaczenie bluetooth raz jeszcze

2020-05-01T09:32:07+01:00

Spróbuj przydzielić więcej pamięci na stosie, dodaj to do manifestu
SetApplicationAttribute(android:largeHeap,"true")
Nie wiem czy to pomoże ale spróbować warto...

Statystyki: Napisane przez tfosik — 1 maja 2020, o 09:32

Re: Polaczenie bluetooth raz jeszcze

2020-05-01T06:00:47+01:00

Witam! manifest mam na 28 ustawiony. miejsce zapisu zmieniałem na wszystkie możliwe. Otwieranie i zamykanie tez lini tez robiłem przed wejściem w odbiór zapisu. Nawet te liczenie plików wyłączałem zostawiając sam zapis na kartę i pozniej zapisane logi sprawdzalem. Jest tak ze zapisze kilkaset lini pozniej kilkanaście ,kilkadziesiąt nie i dalej zapisuje. Wylaczenie ekranu mam zablokowane. Włączałem nawet wifi i wszystko co w telefonie nie potrzebne. Sprawdzałem na Samsungu S7 tu zapisuje okolo 80% na tablecie Tab3 8 tu skandalicznie malo albo całkiem zrywa połączenie. Na tablecie całkiem starym lenowo 7cali od razu wywala ,bo cos tam zapisem ,ale juz nie sprawdzałem dlaczego. Na telefonie Dysan x5 działa idealnie . Ten telefon nie ma chyba żadnej nakładki producenta sam android i moze to jest powód działania. Tu wszyscy maja ajfony i nie mogę na większej grupie sprawdzić . Musze poszukać innych modułów Bt do urządzenia ,albo kabel jeszcze przetestuje.
Próbowałem tez zapisywać bezpośrednio w module astreams bufor zapisywać bez żadnego przetwarzania. Efekt zawsze ten sam.
Sprobuje jeszcze napisac apke, ktora bedzie tylko odbierala dane i nic wiecej

Statystyki: Napisane przez grzeniu 73 — 1 maja 2020, o 06:00

Re: Polaczenie bluetooth raz jeszcze

2020-04-30T22:03:28+01:00

@Harry, masz rację...ten File.DirRootExternal to na 99% już nie będzie karta SD.
Zmień folder na File.DirInternal i zobaczymy...

Statystyki: Napisane przez tfosik — 30 kwi 2020, o 22:03

Re: Polaczenie bluetooth raz jeszcze

2020-04-30T21:30:52+01:00

Na nowych androidach(od 6.0 w górę) File.DirRootExternal oznacza pamięć telefonu, a nie kartę SD.
Pisze że im starszy telefon tym gorzej działa, więc to raczej nie tu leży problem.
Poczekamy i zobaczymy, bo tak to można tylko gdybać w nieskończoność.

Statystyki: Napisane przez Harry — 30 kwi 2020, o 21:30

Re: Polaczenie bluetooth raz jeszcze

2020-04-30T21:27:05+01:00

Harry napisał(a):

Jakby nie miał prawa zapisu, to by w ogóle nie działało, a nie tak że dopiero powyżej tysiąca pada.
Podejrzewam problem z buforem(dlatego pytałem o Astreams), albo za dużą częstotliwoscią otwarcia/zamknięcia pliku.

Nie koniecznie, na starym telefonie wszystko mu działa. Jak ma ustawione w manifeście np. targetSdkVersion=19 to niby powinno działać na nowych Androidach (oczywiście w sklepie google to już nie przejdzie) ale mogą być i są różne problemy.
Inna opcja to zapis i odczyt do wewnętrznego folderu...

Statystyki: Napisane przez tfosik — 30 kwi 2020, o 21:27

Re: Polaczenie bluetooth raz jeszcze

2020-04-30T21:11:46+01:00

Statystyki: Napisane przez Harry — 30 kwi 2020, o 21:11

Re: Polaczenie bluetooth raz jeszcze

2020-04-30T21:03:33+01:00

Witam
Jak masz ustawione w manifeście targetSdkVersion, (powinno być 28). Musisz prawidłowo przeprowadzić zabawę z uzyskiwaniem pozwolenia na korzystanie z SD. To może być problem...

Statystyki: Napisane przez tfosik — 30 kwi 2020, o 21:03

Re: Polaczenie bluetooth raz jeszcze

2020-04-30T20:36:08+01:00

Obawiam się, że bez całości będzie ciężko coś wymyślić.
Używasz klasy Astreams_text(z pliku), czy deklarujesz bezpośrednio?
Rozumiem że telefon ma zapisać hurtem ileś tam linii? - Jeśli tak, to może przenieś otwarcie/zamknięcie pliku, bo może tu go coś boli.
Próbowałeś debugować? Ustaw kilka pułapek w newralgicznych miejscach i zobacz.

------------------------ [ Dodano po: 17 minutach ]

Coś mi jeszcze przyszło na myśl, czy telefon przypadkiem nie wyłącza ekranu, jak zaczyna gubić linie albo się rozłączać?

Statystyki: Napisane przez Harry — 30 kwi 2020, o 20:36

Re: Polaczenie bluetooth raz jeszcze

2020-04-30T19:35:51+01:00

Faktycznie potrzebny w tym wypadku. Napisałem,ze jest tożsamy z tym w poradnikach Mirkowych jak i z forum Erela. Gdyby to byl problem z softem nie działałby na jednym telefonie,a na innym nie. Ale wkleję kawałek z odbioru danych. Bo całego i tak nikt by nie chciał analizować.[syntax=basic4gl]Sub ast_NewText( Text As String )
if Text="Done" Then zapis_karta=0

If zapis_karta = 1 Then
ile_plikow =ile_plikow +1
downladfile.Text=ile_plikow & " file"

TextWriter1.Initialize(File.OpenOutput(File.DirRootExternal , save_name, True))
TextWriter1.WriteLine(Text)
TextWriter1.Close
Else
' cos tam se dalej odbiera po skonczeniu pobierania innego nie związanego z zapisem
end if[/syntax]

Podejrzewam ,ze te Bt sa w telefonach za nowe i nie kompatybilne albo za stare .
Dodawalem nawet opznienie (15ms) przy wysyłaniu z procesora,ale efekt taki sam

Podczas pobierania nic więcej w apce sie nie dzieje. Wszystkie timery wyłączone.

Statystyki: Napisane przez grzeniu 73 — 30 kwi 2020, o 19:35

Re: Polaczenie bluetooth raz jeszcze

2020-04-30T18:28:36+01:00

Pochwal się softem na telefon, bo nie mamy tu jasnowidzów, a szklaną kulę mam u szklarza na polerowaniu, więc też niema na czym wróżyć. No chyba że pomyliłeś fora i chciałeś wysłać na forum z poezją

Wysłane ze srajfona

Statystyki: Napisane przez Harry — 30 kwi 2020, o 18:28

Polaczenie bluetooth raz jeszcze

2020-04-30T17:14:20+01:00

Witam.
Mam trochę nietypowe pytanie. Mianowicie mam jakieś tam urządzenie które zapisuje logi na SD. Oprócz tego zwykła komunikacja z użytkownikiem przez B4A i B4J. Normalnie wszystko działa. Ale gdy pobieram logi z Karty linia po lini procek wysyła przez BT i android zapisuje na dysku. Jeśli tych lini jest mniej niż około 1000 to idzie wszystko normalnie i zapisuje w telefonie 100%, ale gdy tego jest więcej zaczyna jakby sie blokować i potrafi po kilkanaście lini pomijać czasem zrywa połączenie BT. Próbowałem na kilku telefonach i czym starszy tym gorzej było. Jednak znalazłem jeden telefon totalna chińszczyzna z androidem 5.2 i ten za każdym razem odbiera 100% danych tak samo jak komputer zawsze 100% bez względu ile tych danych jest. Po stronie procka jest bt HC-06 i prędkość 115200. Czy to może byc wina modułu BT w telefonie? We wszystkich mam 4.0 lub 4.2 ,tylko w tym chinskim nie mogę żadnych danych znaleźć i nie mam pojęcia co tam jest. Procedura odbioru w b4a jest taka sama jak w poradnikach i tu raczej nie jest wina kodu. Znacie może jakiś inne moduły Bt z SPP

Statystyki: Napisane przez grzeniu 73 — 30 kwi 2020, o 17:14