Witam.
Tak jak pisałem powyżej w temacie. Problem jest z encoderem, tego typu, iż w jedną stronę ( dodatnią, gdy dodaje głośności ) działa "znośnie" dobrze, lecz w drugą, gdy kręcę ( szybko ) normalnie, dodaje 2 kroki, i odejmuje jeden, a kiedy powoli kręcę, to odejmuje cały czas, czyli działa normalnie. Jest to strasznie denerwujące. Właśnie wymieniłem encoder na kolejny ( myślałem, że to encoder się zepsuł), ale jednak to nie to.
Teraz krótko o programie:
instrukcja obsługująca encoder to
dalej podprogramy od encodera:
Probowałem, już wielu możliwości, z nim, i nic....Może ktoś miał podobny przypadek?? bardzo proszę o pomoc.
Z góry dziękuję.
Tak jak pisałem powyżej w temacie. Problem jest z encoderem, tego typu, iż w jedną stronę ( dodatnią, gdy dodaje głośności ) działa "znośnie" dobrze, lecz w drugą, gdy kręcę ( szybko ) normalnie, dodaje 2 kroki, i odejmuje jeden, a kiedy powoli kręcę, to odejmuje cały czas, czyli działa normalnie. Jest to strasznie denerwujące. Właśnie wymieniłem encoder na kolejny ( myślałem, że to encoder się zepsuł), ale jednak to nie to.
Teraz krótko o programie:
instrukcja obsługująca encoder to
Enk = Encoder(pina.6 , Pina.7 , Glosniej , Ciszej , 0) dalej podprogramy od encodera:
Glosniej:
Cls : Locate 1 , 1 : Lcd " glosnosc"
Incr Glosnosc
Wysglosnosc = Glosnosc
Wysglosnosc = Wysglosnosc * 125
Locate 2 , 2
Lcd " -" ; Wysglosnosc ; " "
Wysglosnosc = Wysglosnosc \ 100
Locate 2 , 1
Lcd " -" ; Wysglosnosc ; "."
Locate 2 , 11
Lcd "dB "
If Glosnosc > 63 Then Glosnosc = 63
Gosub Wyslijtda
Return
Ciszej:
Cls : Locate 1 , 1 : Lcd " glosnosc"
Decr Glosnosc
Wysglosnosc = Glosnosc
Wysglosnosc = Wysglosnosc * 125
Locate 2 , 2
Lcd " -" ; Wysglosnosc ; " "
Wysglosnosc = Wysglosnosc \ 100
Locate 2 , 1
Lcd " -" ; Wysglosnosc ; "."
Locate 2 , 11
Lcd "dB "
If Glosnosc > 63 Then Glosnosc = 63
Gosub Wyslijtda
Return
Probowałem, już wielu możliwości, z nim, i nic....Może ktoś miał podobny przypadek?? bardzo proszę o pomoc.
Z góry dziękuję.