ATNEL tech-forum

Re: Zapis binarny w b4a

2018-11-12T10:46:47+01:00

W bascomie ja wiem jak to zrobić nie wiedziałem jak to ogarnąć w b4a. Ale przy pomocy kodu zamieszczonego wyżej napisałem sobie procedurke.

Statystyki: Napisane przez grzeniu 73 — 12 lis 2018, o 10:46

Re: Zapis binarny w b4a

2018-11-11T19:36:44+01:00

Witam
pewnie w bascomie chcesz zrobić maskowanie bitów... coś w tę "mańkę"
[syntax=basic4gl]Select Case a
Case &B01110000:
'tutaj kod do wykonania
Case &B10110000:
'tutaj kod do wykonania
Case &B11010000:
'tutaj kod do wykonania
Case &B11100000:
'tutaj kod do wykonania
Case &B00110000:
End Select[/syntax]

kolega Jaglarz podsunął Ci chyba proste rozwiązanie...wysyłaj cyfry poniedziałek=0, wtorek=1, środa=3 itd

[syntax=basic4gl]Select Case a
Case 0:
&b00000000
Case 1:
&b00000001
Case 2:
&b00000011
Case 3:
&b00000111
Case 4:[/syntax]
no coś w tym stylu. Tak też możesz ustawić cały port

Statystyki: Napisane przez tfosik — 11 lis 2018, o 19:36

Re: Zapis binarny w b4a

2018-11-08T21:34:08+01:00

Pewnie. Mniej więcej wiem o co chodzi.

Statystyki: Napisane przez grzeniu 73 — 8 lis 2018, o 21:34

Re: Zapis binarny w b4a

2018-11-08T21:31:00+01:00

Chyba jednak mój kod nie zadziała w B4A. Natknąłem się teraz na stronę https://www.b4x.com/android/help/core.html#bit, z której wynika, że do operacji bitowych należy użyć metod obiektu Bit, czyli:
[syntax=basic4gl]' zamiast
Dni = Poniedzialek Or Sroda Or Sobota

' aby ustawić bity należy zrobić np. tak
Dni = 0
Dni = Bit.Or(Dni,Poniedzialek)
Dni = Bit.Or(Dni,Sroda)
Dni = Bit.Or(Dni,Sroda)

' aby sprawdzić bit
If Bit.And(Dni,Poniedzialek) <> 0[/syntax]

Dodatkowo argumenty operacji bitowych powinny być typu Int, więc nie jestem pewien, czy to zadziała z Byte (ewentualnie można wykonać operacje na Int, a później obciąć do Byte).

Nie mam możliwości tego sprawdzić, więc mam nadzieję, że sobie poradzisz
Powodzenia

Statystyki: Napisane przez andrews — 8 lis 2018, o 21:31

Re: Zapis binarny w b4a

2018-11-08T20:58:04+01:00

Problem w tym ze ani C nie znam ,ani nie mam pojęcia jak to zapisać w B4a .Nawet nie wiem dokładnie czego szukać w helpie. Dlatego poprosiłem o pomoc.

Statystyki: Napisane przez grzeniu 73 — 8 lis 2018, o 20:58

Re: Zapis binarny w b4a

2018-11-08T20:55:21+01:00

w b4a są tak samo operacje AND i OR więc operacje bitowe - zatem ustawianie bitów czy ich zerowanie odbywa się dokładnie jak w C - tylko inny nieco syntax

Statystyki: Napisane przez mirekk36 — 8 lis 2018, o 20:55

Re: Zapis binarny w b4a

2018-11-08T20:37:13+01:00

Musze sprawdzić Twój sposób.
Na razie na kalkulatorze sprawdziłem i to jest to o co mi chodziło. Dzięki

Chce w jednym bajcie bo mam 16 przekaźników ,kazdy ma 4 programy i kazdy program 7 dni. Byłoby duzo zmiennych. Dzięki zapisom samych bitów uprości to bardzo i zapis i odczyt tego wszystkiego.

Statystyki: Napisane przez grzeniu 73 — 8 lis 2018, o 20:37

Re: Zapis binarny w b4a

2018-11-08T20:49:33+01:00

Nie wiem, jak jest w B4A, ale o ile pamiętam trochę język Basic (VBA) to trzeba użyć triku w stylu:
[syntax=basic4gl]Dim const Poniedzialek As Byte = 1
Dim const Wtorek As Byte = 2
Dim const Sroda As Byte = 4
Dim const Czwartek As Byte = 8
Dim const Piatek As Byte = 16
Dim const Sobota As Byte = 32
Dim const Niedziela As Byte = 64

Dim Dni As Byte

' ustawienie bitów
Dni = Poniedzialek + Sroda + Sobota
' i w zmiennej Dni sa ustawione odpowiednie bity
' alternatywnie można też za pomocą Or (tak może nawet lepiej
' bo w razie powtórzenia jakiegoś dnia kilkakrotnie, nie będzie błędu)
Dni = Poniedzialek Or Sroda Or Sobota

; odczyt danego bitu
If Dni And Sroda <> 0
' kod do wykonania jeśli bit Środa jest ustawiony
End If[/syntax]

Statystyki: Napisane przez andrews — 8 lis 2018, o 20:32

Re: Zapis binarny w b4a

2018-11-08T20:25:17+01:00

A dlaczego się upierasz przy ustawianiu bitów zamiast wysyłać konkretne cyfry? Czwarte 3, Piątek 4...

Statystyki: Napisane przez Jaglarz — 8 lis 2018, o 20:25

Re: Zapis binarny w b4a

2018-11-08T20:14:53+01:00

Jest nad czym sie zastanawiając ,ponieważ chce ustawiać jeden bit w bajcie. Tak żeby 7 dni zmieściło sie w jednym bajcie.
Gdybym chciał zrobić 7 zmiennych to nie zadawałbym pytania.
"A czy pytanie nie dotyczy czasami odpowiednika pola bitowego z języka C w B4A?"
prawdę mówiąc nie wiem jak to sie nazywa w C.
Ale wiem ze można ustawić konkretny bit w byte. Tak jak napisałem w pierwszym poście. Byc może zle tłumaczę,ale inaczej nie potrafię tego wyjaśnić.
dim zmienna as byte
np: poniedzialek = zmienna.0
wtorek = zmienna.1
sroda = zmienna.2
...
i teraz zmienna=&b00000000 i wszystkie dni mam wyłączone , robię zmienna= b&00000111 i mam trzy dni włączone i reszta wylaczona.

Statystyki: Napisane przez grzeniu 73 — 8 lis 2018, o 20:14

Re: Zapis binarny w b4a

2018-11-08T20:07:51+01:00

A czy pytanie nie dotyczy czasami odpowiednika pola bitowego z języka C (nie wiem, czy taki istnieje) w B4A?

Statystyki: Napisane przez andrews — 8 lis 2018, o 20:07

Re: Zapis binarny w b4a

2018-11-08T19:49:33+01:00

Zadeklaruj zmienną jako Byte i masz tylko 8 bitów. :p

Statystyki: Napisane przez Jaglarz — 8 lis 2018, o 19:49

Re: Zapis binarny w b4a

2018-11-08T19:26:53+01:00

grzeniu 73 napisał(a):

ale jak zapisać to w B4a tak żebym mógł wysłać do avr jaka jeden bajt.

(sorki) ja pierdziu no ale prościej to już się nie da niż w C

zmienna = 1;

zmienna = 0;

i tak samo w B4A .... nawet ciężko tu się nad czymś zastanawiać

Statystyki: Napisane przez mirekk36 — 8 lis 2018, o 19:26

Zapis binarny w b4a

2018-11-08T17:41:14+01:00

Witam.
Nic sie tu nie dzieje to trochę rozruszam.
Robie sterownik i potrzebuje ustawić włączanie w określone dni tygodnia. Myślę to zrobić w ten sposób ze będę zaznaczał ptaszki CheckBoxach i chciałbym to zapisać tak jak można to zrobić w AVR w jednym bajcie np:
zmienna.1 = 1
zmienna .2 =0
itp. W bascomie to nie problem w c pewnie tez ale jak zapisać to w B4a tak żebym mógł wysłać do avr jaka jeden bajt.
Ewentualnie jakis inny pomysl ?

Statystyki: Napisane przez grzeniu 73 — 8 lis 2018, o 17:41