Enkoder w Xmega

[Pikczu]

To ja się poddaje nie wiem na jakie pytanie tu trzeba było odpowiedzieć.

[Jacek]

Witam - obiecany film https://www.youtube.com/watch?v=uV2L4_Cck_I
na filmie jeszcze nie mam podziału przez 4 czyli jeden obrót enkodera to 4 obroty silnika ale już zmieniłem w programie i jeden obrót enkodera(1000 impulsów) odpowiada 1 obrotowi silnika(ustawione mam w sterowniku 1000 impulsów na 1 obrót silnika) Paweł hi pomyśl o lcd proszę.
pozdrawiam Jacek.

[niveasoft]

Jacku widziałeś, że opisałem co potrzebujesz od tego enkodera na MCS? Nie dołączyłem linku do filmu. Jak będziesz chciał to dołączysz.
Ciekawiło mnie kto napisze jak to zrobić lepiej. Mam kilka pomysłów.

[Jacek]

Witam - jeszcze nie byłem na forum MCS idę po herbatę nie dawno skończyłem hi malowanie pralni - dziękuje za zainteresowanie zaraz zobaczę.
pozdrawiam Jacek.

[Pikczu]

Bartek możesz to gdzieś poprzenosić?
Bajzel se robi w każdym wątku.

PS. Przydała by się możliwość blokowania/zamykania wątków.

[niveasoft]

Piszesz i masz. Przeniesione a pierwszy wątek zablokowany.
Niestety po takim szybkim przejrzeniu uprawnień to chyba nie ma możliwości by autor mógł zamknąć wątek. Może sprawdzę po aktualizacji.

[grafii1]

Witam , "troszki" inaczej i bez martwych punktów

Code: [Zaznacz cały] [Rozwiń/Zwiń]

1. Do
2.    Enc.0 = Pinb.2
3.    Enc.1 = Pinb.3
4.    If Enc = 0 Then Tryb = 0
5.    If Enc = 1 Then Gosub Impulsator
6.    If Enc = 2 Then Gosub Impulsator
7.    If Enc = 3 Then Tryb = 3          
8. Loop
9.  
10. '****************************   IMPULSATOR   ***********************************
11. Impulsator:
12.  
13.    Rez = 0
14.  
15.    If Pinb.2 <> Pinb.3 Then
16.  
17.       If Pinb.2 = 1 And Pinb.3 = 0 Then
18.          If Tryb = 0 Then If Ust > 0 Then Rez = -5
19.          If Tryb = 3 Then If Ust < 100 Then Rez = 5
20.          Tryb = 5
21.          Do
22.             Waitms 10
23.             If Pinb.2 = Pinb.3 Then Exit Do
24.          Loop
25.       End If
26.  
27.       If Pinb.2 = 0 And Pinb.3 = 1 Then
28.          If Tryb = 3 Then If Ust > 0 Then Rez = -5
29.          If Tryb = 0 Then If Ust < 100 Then Rez = 5
30.          Tryb = 5
31.          Do
32.             Waitms 10
33.             If Pinb.2 = Pinb.3 Then Exit Do
34.          Loop
35.       End If
36.  
37.    End If