bascom przyciskiem

[BASCOM] przyciski podłączone do portów (1 przycisk=2 porty)

Z przyciskiem żółtym nie ma problemu - jeden pin do masy, a drugi do procka i załatwione (jak przyciśnięty to zwarty do masy). A z pozostałymi robisz tak ... najpierw rysunek: http://obrazki.elektroda.net/56_12521055... Dwa piny procka podłączasz do punktów A i B - to będą "wyjścia". Dwa piny procka podłączasz do X i Y - to będą "wejścia". Krok T1:...

[Bascom/ATmega8] Przycisk i odliczanie czasu dla LED

seja4321 Napisałem kilka linii kodu ,jest to jedno z możliwych rozwiązań twojego problemu z przyciskiem . program przetestowałem. Moja rada to testuj program na kilku kilkunastu sekundach. powodzenia. Dodano po 46 Nie rozumiem dlaczego seja4321 został skarcony przez LordBlick, przecież pisze w dziale początkujący? Co do kodu, to jest dziwny, Piszesz...

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

Mega 8 Bascom - Podtrzymanie przycisku monostabilnego

[syntax=basic4gl] Przycisk_on Alias Pinx.y Przycisk_off Alias Pina.b DDRx.y = 0: DDRa.b = 0 PORTx.y = 1: PORTa.b = 1 Dim Zapamietalem As Bit Do If Przycisk_on = 0 then Zapamietałem=1 If Przycisk_off = 0 then Zapamietałem=0 Loop [/syntax] Zmienna Zapamietalem pamięta który przycisk został ostatnio naciśnięty. "0" jeśli Przycisk_off; "1" jeśli Przycisk_on....

[atmega32][bascom] 4 przyciski, jedno przerwanie i powerdown

Żeby zrobić za pomocą Timera - to nie możesz używać trybu PowerDown tylko Sleep - żeby właśnie Timery mogły działać to po pierwsze. W taki trybie jednak będziesz miał nieco większy pobór prądu niż w pełnym PowerDown. Więc wszystko zależy na ile ma wystarczać bateria o ile jest to coś zasilane z baterii. Bez PowerDown'a na pewno będzie to sporo krótszy...

[Attiny13][Bascom] - Sterowanie jednym przyciskiem kilkoma funkcjami.

Żeby układ sam się resetował przy włączeniu zasilania , to opornik dajesz do plusa i kondensator z pinu reset do masy.

AT90S2313 i Bascom - błędne odczyty przycisków, zakłócenia przy dotyku

Tak jak twój program kofiguruje, piny są w stanie wysokiej impedancji, ustawione jako wejścia (PORT.X = 0; DDR.X = 0) i losują wszystko z otoczenia, a jak włączysz podciągnięcie, to masz na PIN.X stabilny stan = 1, bo wewnętrzne rezystory (ok. 50 k) ciągną to do Vcc. Jak zewrzesz przyciskiem pin z masą, wewnętrzny rezystor nie zaprotestuje, bo płynie...

Bascom: Jak obsłużyć przycisk i enkoder bez blokowania pętli?

Jak wyjść z pętli do loop, w której znajduje się encoder(). ? Funkcja ENCODER ma parametr określający czy czekać na zdarzenie, czy tylko sprawdzić i przejść dalej. Ty ustawiasz tryb "czekaj". Samo wyjście z pętli to po prostu EXIT DO.

[bascom] Dlaczego procedura ustawianie uruchamia się bez naciśnięcia przycisku w Bascom?

Standardowy błąd początkującego. Nie włączone wewnętrzne podciąganie (pull-up) na wejściach na których są switche.

Jak zresetować program w Bascom po naciśnięciu przycisku na AVT?

Wykorzystaj podprogram w którym umieścisz swoje instrukcje a na jego końcu umieść bitwait a potem tylko ponownie wywołaj ten podprogram.

[Bascom] Przyciski same się "naciskają" ....

I sama nazwa miała by taki wpływ na działanie? Aż sprawdzę ale nie jestem do tego przekonany że to wina tego, ale sprawdzę po południu. Aliasy masz dla PINx a to jest rejestr tylko do odczytu. Rejestr sterujący pull up nazywa się PORTx. Zrób set PORTx.

Zmiana trybu pracy zgrzewarki z BASCOM 89C2051 przez przycisk S1

Może sam spróbuj ;-) Tak w zarysie : w pętli głównej musisz dodać warunek: jeśli przycisk wciśnięty to zwiększ zmienną "czas" o 1 jeśli puszczony to zmienna "czas" =0 następnie: jeśli zmienna "czas" = 123 (dla przykładu, bo nie wiem jak szybko ta pętla przebiega) to : zmień tryb pracy (to masz strasznie napisane, więc trudno ogarnąć)...

[Bascom] Problem z obsługą przycisków i przerwania.

Nie będę sie rozpisywał: Dim T1 As Single , T2 As Integer ... T1 = -123.50 T2 = T1 'bez części ułamkowej T2 = Round(T1) 'zaokrągli zgodnie z prawami arytmetyki ... Pozdrawiam Piotrek

Attiny2313 - dioda nie gaśnie po naciśnięciu przycisku, Bascom kurs

Zmień schemat: Przyciski podłącz do masy, elektrolit zamień na ceramik 100nF a diodę podłącz przez rezystor do zasilania a katoda do uc. Program: $regfile = "attiny2313.dat" $crystal = 1000000 ddrb =&B11111100 PORTB = &B00000011 ddrd =&B11111111 PORTD = &B00000000 do if pinb.0 =0 then waitms 100 portd.0 = 0 end if if pinb.1 =0 then waitms...

[BASCOM] [BASCOM][ATM32] - Nieaktywne przyciski w menu wielopoziomowym na ZL3AVR

Witam. Spróbuj tak napisać etykiety podprogramów. Zamiast Menu_1 : Napisz Sub Menu_1

Bascom: Jak załączyć PWM przyciskiem na Pind.7?

wejście jest sterowane minusem. Po napisaniu coś takiego, układ działa ale po za tym że nie czeka 1 s i nie przechodzi do Pwm1b = 100. Z pewnością przechodzi do Pwm1a = 100, (dlaczego Pwm1b ?) tylko ty mu nie dajesz szansy (czasu) abyś to mógł zobaczyć. Poza tym, nie masz kontroli nad czasem ponad 1 sec. pętla dalej jest przewijana w nieskoczoność....

[attiny2313] [attiny2313][Bascom] Problem z przyciskiem S1 w programie stoper C012a

Spróbuj zrobić tak Co4ms: 'procedura obsługi przerwania od Timera T/C0 wykonywana co 4ms Timer0 = 6 'załaduj do Timera0, żeby zliczył 250 (=256-6) impulsów Incr Licznik If Licznik = 6 Then 'zmienna Licznik liczy do 6 aby Licznik = 0 'sprawdzanie stanu przycisku następowało If Pind.0 = 0 Then 'co ok.24ms If Pomoc = 1 Then 'jeśli zmienna Pomoc...

BASCOM AVR - Implementacja przycisku ON/Stand-by z opóźnieniem 3s

Dodałem drobną poprawkę, przetestowałem w symulatorze i wyglada że teraz jest ok. Ustaw $crystal odpowiednio. Podłącz pod PD.3 przycisk i pod PD.0 LED (led będzie świecił gdy sprzęt jest w stanie czuwania). O powerdown nie ma co walczyć i tak używasz zasilacza. Najpierw przetestuj ten program, dopiero potem połącz go z twoim silnikowym i przekonfiguruj...

Jak napisać program w BASCOM do sterowania przekaźnikiem przyciskiem?

I jak tam postępy z projektem, udało ci się go zrealizować?, jeśli tak to może byś zamknął temat. Rozumiem że na kliknięcie "pomógł" nie mam co liczyć, bo przecież cel osiągnąłeś, a "jeleń" nie jest już do niczego potrzebny.

Jak zapalać diodę po jakimś czasie od wciśnięcia przycisku? BASCOM, ATtiny2313.

1.Konfiguruje się PORT 2.Podciąganie do plusa włącza się w PORT 3.Przyciski czyta się z PIN Sterować można PORT`em a sprawdza się PIN [syntax=basic4gl] Config PORT.x = Input 'nie podłaczamy driverow - port bedzie wejsciem PORT.x = 1 'sterujemy portem, podłączamy wewnętrzny rezystor Przycisk Alias PIN.x ' PIN PIN PIN PIN! [/syntax]

[Attiny2313][Bascom]Zapalanie i gaszenie diody przyciskiem

1) jeśli używasz przycisków to zawsze podłącz go tak aby przyciśnięcie zwierało nóżkę portu do masy czyli do -. To naprawdę ułatwia sprawę i zawsze działa 2) dobra praktyka - przyciski, jumpery itp podłączaj do pinu procesora przez rezystor np 180 omów. Chodzi o to że kiedyś możesz się pomylić, ustawić pin jako wyjście, dać na nim 1 czyli napięcie +...

[Bascom] Jak poprawnie obsłużyć przycisk w pętli Case?

To już musisz poczytać i popróbować. Nie możemy Ci każdej jednej rzeczy tłumaczyć.

Bascom Basic - Jak zaprogramować przycisk do wielu funkcji?

W procedurze/podprogramie obsługi przycisku wciśniętego zwiększaj zmienną o 1 a w programie głównym, czy też tam gdzie to jest potrzebne, wykonuj program w zależności od tej zmiennej, np. wykorzystując SELECT CASE.

Jak stworzyć menu w Bascomie z jednym przyciskiem do wyboru podprogramów?

...I dalej mam takie pytanie czy da się to zrobić prościej Bascom posiada funkcję skoków do podprogramu w/g indeksu. Portc.4 = 1 'podciagam port - przycisk Dim A As Byte , B As Byte Declare Sub Temp Declare Sub Temp2 Declare Sub Nap Declare Sub Przyc Const Maxa = 2 'maksymalna ilosc podprogramow A = 0 : B = 1 Cls Do 'petla glowna Debounce Pinc.4...

[BASCOM] Attiny2313: Brak reakcji przycisków na PORTD.0 i PORTD.1 w BASCOM

Czy włączyłeś podciąganie linii portów, do których są podłączone przyciski? Obsługa przycisków w programie też jest "nie tak". Naciśnięcie przycisku powoduje, że na wejściu będziesz miał 0, nie 1. To, co dalej robisz w programie, też jest średnio sensowne, ale to zauważysz dopiero wtedy, kiedy wykryjesz poprawnie naciśnięcie przycisku.

Niepoprawny odczyt stanu przycisku w Bascom - jak to naprawić?

Witam Napisz dokładniej czy Ci zadziałał program i czy zrozumiałeś o co w ogóle chodzi. Miło by było gdybyś kliknął na przycisk "pomógł". Pozdrawiam i życzę sukcesów w programowaniu :)

Programowanie czasowego wyłącznika świateł w samochodzie - Bascom, timery, 1 przycisk

Rozwiązanie Twojego problemu jest banalne. Na początek proponuję wykorzystać zmienną, która jest zwiększana przy każdym wciśnięciu przycisku i w zależności od wartości tej zmiennej (tu wystarczy od 0 do 3, przy wartości 4 zmienna jest znowu zerowana) ustawiasz jedynkę na odpowiednim porcie jednocześnie uruchamiając zliczanie. Kiedy licznik dojdzie do...

Jak uruchomić stoper na ATMega8 po wciśnięciu przycisku w BASCOM?

Należy zastosować rezystor 10K podciągający pinc.4 do plusa. Można też dać kondensator 1nF z tego pinu do masy. Celem zniwelowania stanów nieustalonych. Powinno pomóc.

Attiny26: Czy można używać pinów jako I2C i przyciski w Bascom?

Witam Najprościej będzie jeśli w podprogramie obsługi I2C zdefiniujesz je jako SCL i SDA, natomiast w podprogramie obsługi przycisków zdefiniujesz te same piny jako wejście. Chodzi o to, żeby procek za każdym razem odpowiednio ustawiał te piny. Nie ustawiaj tych pinów w pętli głównej na dwa sposoby , jako wejścia i jako piny do obsługi I2C. Pozdrawiam

[AVR] [AVR][Bascom] Jak zoptymalizować obsługę przycisków w menu?

A w tych dodatkowych skokach których nie chcesz powinny być wszystkie Case i IFy. A te wszystkie debounceusy powinny być w 1 procedurce do której skakałbyś 1 Gosubem gdybyś tylko chciał obsłużyć jakiś klawisz.

[Atmega8] [Atmega8][Bascom] Modyfikacja zmiennej T2 przyciskiem - problem z warunkiem

Przyciski powinny zwierać do masy i mieć ustawione wewnętrzne pull-upy lub w aktualnym układzie (czego się nigdy nie robi) mieć zewnętrzne rezystory pull-down.

Jak wykonać skok do podprogramu w BASCOM za pomocą jednego przycisku?

Jeśli wciśniesz przycisk to GOSUB do podprogramu. W podprogramie wykonuje się pętla Do...LOOP. Jeśli przyciśniesz przycisk w podprogramie to RETURN do programu głównego.

Bascom AVR – jak zaprogramować przycisk z przyspieszającą inkrementacją zmiennej?

przycisk progresywny? te materiały sam musisz chyba sobie wykombinować. robisz to za pomocą pętli , wciskasz przycisk , tworzysz sobie zmienną x = ileś tam milisekund która określa odstęp czasowy , w pętli zmieniasz sobie jakąś tam swoją inną zmienną, zmniejszasz x i czekasz x czasu, jeśli przycisk puściłeś to wychodzisz z pętli i the end.

Jak ustawić czas w PCF 8535 za pomocą przycisków w BASCOM?

A gdzie masz Makedec ? Popatrz sobie w helpie. Sub Zmgodz '#### zmiana godzin #### H = Makedec(h) Incr H 'zwiększ godzinę If H > 23 Then 'jeżeli godzina większa od 23 H = 0 'to godzina = 0 End If H = Makebcd(h) End Sub

[atmega16/32] [atmega16/32][Bascom] Jak obsłużyć przyciski w menu z funkcją Sound?

Dla sprawdzania jednego klawisza: do ... ... ... gosub sprawdzanie_klawiszy if flaga = 1 then instrukcje gdy wciśnięty klawisz end if ... ... ... loop sprawdzanie_klawiszy: flaga = 0 if Ok = 0 then waitms 50 if Ok = 0 then flaga = 1 end if end if return mniej więcej tak to ma wyglądać. Jeśli chcesz sprawdzać kilka klawiszy robisz bardzo podobnie....

Attiny2313 [Bascom] - Nadawanie IR z dwóch przycisków

Tak jeszcze przed END IF: [syntax=basic4gl]Rc5send Togbit , Address , Command[/syntax]

Bascom: Jak zmniejszać liczbę na LCD przyciskiem S2?

If Pinb.2 = 0 Then Waitms 25 If Pinb.2 = 0 Then ... Zapoznaj się z Debounce !!! Do .... Debounce Pinb.0 , 0 , Dodaj , Sub Debounce Pinb.1 , 0 , Odejmij , Sub Loop Dodaj: Incr Zmienna 'lub zmienna = zmienna + {jakaś wartość} If Zmienna > {wartość końcowa} then Zmienna = {wartość początkowa albo wartość końcowa} Lcd...

Sterowanie manipulatorem ATMEGA8 przez RC5 w Bascom – jak wykryć puszczenie przycisku?

Kod jest już poprawiony. Ten działa w 100% Na pewno nie będzie działał brak zakończenia dwóch warunków w pętli Do -Loop oraz coś bardzo ciekawego : [syntax=basic4gl]Config Rc5 = Pind.2 If Command = 16 Then Portd.2 = 1 [/syntax] Najpierw deklarujesz jako RC5 a potem zmieniasz na nim stan ? . Coś mi się wydaje że za bardzo nie wiesz jak się do tego zabrać...

Pilot creative infra od cd-rom kody przycisków w bascom !

Chcę zrobic na tym pilocie sterowanie oświetlenia itp. Tylko mam problem ponieważ w linku poniżej http://www.elektroda.pl/rtvforum/topic21... są tylko kody 4 przycisków a ja chciałbym wykorzystac w tym pilocie Creativa również inne przyciski i prosiłbym o podanie ich kodów ! Niejestem na tyle doświadczony w tych sprawach aby sam to rozgryśc !...

gdzie dac instrukcje obslugiwana przycisk zegar led [bascom]

Zastawia mnie po co ciągle robisz warunek w warunku jak np. tu If Pinb.4 = 0 Then Waitms 1 Incr Setki If Setki = 10 Then Setki = 0 Incr Tys If Tys = 7 Then Tys = 0 End If End If End If Jak już mówiłem wcześniej, jeżeli zaprzęgnąłeś timer to wykorzystaj go do odliczania sekundy wtedy pętla główna zostaje do twojej dyspozycji i bez problemu tam umieścisz...

Atmega 8 Bascom - przyciski dodają/odejmują 50 bez naciskania

Np. W helpie do Bascoma. Akurat help Bascoma nie precyzuje wyraźnie tego zagadnienia. Natomiat w dośc prosty sposób datasheet określa właściwości rejestrów związanych z portami processora (str.51) "Three I/O memory address locations are allocated for each port, one each for the Data Register - PORTx, Data Direction Register - DDRx, and the Port Input...

Jak napisać program w Bascomie do przełączania algorytmów jednym przyciskiem?

Spróbuj tak: do Debounce Pind.0 , 0 , algorytmy ' Twój s1=pind.0 loop algorytmy: toggle A ' zmienna A jako bit If A=0 then Algorytm 1 sterowania wyników na LCD else Algorytm 2 sterowania wyników na LCD end if return Użycie debounce eliminuje drgania styków. Pozdrawiam.

Stan nieustalony w pętli Do-Loop w Bascom - przycisk odczytywany jako wciśnięty

Witam Elektrycznie jak najbardziej poprawnie - wszystko podciągnięte. Zegar wewnętrzny 8 Mhz Zmieniłem koncepcje programu i juz nie obserwuje zjawiska. poprzednio miałem 3 instrukcje wyboru select case select case zmienna1 case 1: . end select select case zmienna2 case 1: . end select select case zmienna3 case 1: . end select W zależności...

[Atmega8] [Atmega8][Bascom] Jak zredukować liczbę przycisków w obsłudze zegara RTC?

Witam, tu w Zegarek docelowo będzie używany przez dziewczynę, więc musi być przejrzysty. - to już szowinizm...

[ATMega] [Bascom] Obsługa klawiatury 4 przyciski z długim i krótkim naciśnięciem

Naprawdę nie potrafisz [url=http://www.elektroda.pl/rtvforum/vi... przystosować do własnych potrzeb??? Zapewniam Cię, że robiłem to na 10 key i wszystko biegało aż miło...

[m32] Jak emulować komendy RC5 jako przyciski w menu BASCOM?

Jak mogę zrobić aliasy: komenda 10 to przycisk1 = 1, komenda 20 to przycisk2 = 1, komenda 255 to przycisk1 = 0, przycisk2 = 0? Nie możesz. :P Aliasy to tylko dodatkowa nazwa, a ty chcesz bajtem ustawiać odpowiedni bit. Mógłbyś tak zrobić gdyby był ustawiany konkretny bit w bajcie, np. Command.0 Alias przycisk1 Moja propozycja jest taka: W przerwaniu...

[Atmega8] Jak zmieniać informacje na LCD jednym przyciskiem w Atmega8 i Bascom?

Nie rozumiem po co dioda LED ukazująca stan nawiewu jest podłączona do osobnego pinu. Nie ma takiej potrzeby, a nawet jest to nie wskazane. Stan wejściowy pinu portu D, nawet kiedy w DDRD jest on ustawiony jako wyjście, można odczytać z rejestru PIND, natomiast wyjściowy z PORTD - tak, ten rejestr można również odczytywać. Nie programuję w Bascom, ale...

[bascom] obsługa krótkiego i długiego naciśnięcia przycisku

"niestety w obu kodach brakuje czegoś co by dodawało cokolwiek do zmiennej A, więc nie przyjmie ona nigdy wartości 1 lub 2 skoro na początku się ją zeruje." Myślę że jesteś w błędzie. To daje A=1 Cls Lcd "krotkie" A=1 wait1 A to: Cls Lcd "dlugie" A=2 wait1 możesz jej nie kasować w ogóle i tak po skoku do MENU będzie ustalona. A to:...

Atmega8, Bascom - Jak przełączać diody za pomocą przycisku?

instrukcja Pinx.y służy do odczytu stanu portu natomiast Portx.y do ustawienia stanu na porcie

[Bascom] [Bascom][Atmega32] Jak wyłączyć dźwięk alarmu przyciskiem PORTD.0?

[syntax=basic4gl] If Alarm = 1 And Portd.0 = 0 Then Reset Alarm ' Jeśli alarm wysyła dźwięk i zostanie naciśnięty przycisk nr. 1 - wyłącz go[/syntax] powinien być Pind.0

Ustawienie w Bascomie wejścia dla przycisku podłączonego do masy

Poszukaj w hepie bascoma instrukcji Config Pin, oraz w dokumentacji procesora jak się włącza pull-upy.

[atmega8] [bascom] Jak zatrzymać pętlę do naciśnięcia przycisku?

Ten drugi pomysł jest moim zdaniem lepszy. Do tego możesz użyć końcówki przerwania INT - ma konfigurację zbocza, którym jest wyzwalane przerwanie.

Jak zrealizować przerzutnik T w Bascomie do obsługi przycisku?

To bedzie działać zgodnie z złozeniami Oto kod: If Portb.1 = 0 Then Toggle Portb.2 każdorazowe pojawienie się 0 na portb.1 spowoduje zmianę stanu portb.2 Pozdrawiam. a to nie if PIND.0 = 0 then PORTD.1 = 1 end

ATtiny13 Bascom - dwie funkcje w jednym przycisku jedna zależna od drugiej

Łap. Napisałem w przerwie między... Zajmuje połowę mniej niż Twój a działa :D [syntax=vbnet]$regfile = "attiny13.dat" $crystal = 9600000 $hwstack = 8 $swstack = 8 $framesize = 8 Config Portb = &B01110 : Portb = &B10001 Sw Alias Pinb.0 D1 Alias Portb.1 : Set D1 D2 Alias Portb.2 D3 Alias Portb.3 Config Timer0 = Timer , Prescale = 1024 , Clear...

Bascom: Jak poprawić reakcję na przycisk w stroboskopie LED z ATtiny2313?

Weź sobie załaduj do jakiegoś podprogramu fragment w którym sprawdzane są przyciski, jednocześnie w tym podprogramie odliczaj opóźnienie. (np zrób pętle która będzie miała waitms 1 - ilość wykonań pętli ilość opóźnienia ale równocześnie sprawdzany port przycisku) Zamiast rozkaz waitms wywołuj ten podprogram. To tak najprościej i bez przerwań.

Attiny2313 [BASCOM] Wolne piny przy obsłudze wyświetlacza na T6963C?

Nie do końca , ja ostatnio męczyłem się bo na wolnych portach chciałem puścić i2c , niestety bascom odmówił współpracy , musiałem na tych portach zrobić przyciski . Dziwne ?!

[Bascom] [Bascom][AtMega] Program: 2 przyciski, dioda świeci X sekund po naciśnięciu

A Twój program nie chce działać? Jaki jest problem. To co w programie masz nieprawidłowo to odczyt stanu przycisku. Procedura odczytu przycisku powinna przewidywać takie sytuacje jak drgania styków lub przypadkowe zakłócenia na linii przycisku. Jedną z możliwość odczytu przycisku jest: [syntax=basic4gl]If Wejscie = 0 Then Waitms 100 If Wejscie = 0 Then...

Bascom+Attiny2313 - Program nie reaguje na przyciski, jak to naprawić?

Problem powoduje używanie waitms. Podczas wykonywania waitms procesor pracuje tak jakby w pętli do..loop i nie reaguje na nic. W zasadzie nie powinna być używana. Rodzi więcej problemow, a wcale nic nie ułatwia. Zastosuj timer do sterowania diodą zamiast waitms.

[ATmega8][BASCOM] Zliczanie impulsów (ilości przyciśnięć przycisku na sekundę)

W C to bym ci nawet pokazał jak to zrobić, o BASCOMie nie mam pojęcia i nie chcę mieć :) Swoją drogą lepiej porzuć tą ciemną stronę mocy i przejdź na stronę światła :)

[Bascom] Jak dodać opóźnienie i obsługę przycisków w AT2313?

Przede wszystkim musisz zacząć kolego od poznania timerów. Do odmierzenia czasu używamy timerów ponieważ zlicza nam czas w tle działania procesora. Używając polecenia wait zatrzymujesz kompletnie uC na ten czas. Konfiguracja dla AtMega8 8Mhz u mnie wygląda tak: Config Timer1 = Timer , Prescale = 256 ''''konfiguracja timera On Timer1 1s ''''przy przerwaniu...

[Bascom] [Bascom][Atmega32] Nieprawidłowe działanie przycisków na porcie D.2 i D.3

Nie działa bo masz nie włączone podciąganie do plusa. Rejestry PIN nie służą do zapisu w tym procesorze (tylko w niektórych modelach zapis 1-dynki do nich powoduje zmianę stanu odpowiadającego bitu w rejestrze PORT). http://www.atmel.com/Images/doc2503.pdf - strona 64 Musisz dać dla każdego przycisku po instrukcji Config ... Input instrukcję Set Portd.x...

[Attiny2313][Bascom]Różne czasy reakcji na wciskanie przycisku.

Poczytaj np. [url=http://www.elektroda.pl/rtvforum/vi... to może Ci się nieco rozjaśni ;) A kilka postów wcześniej cytowanego linka jest podobne rozwiązanie z zastosowaniem timerów. Połącz oba i będziesz miał złoty środek... Pozdrawiam.

Jak włączyć i wyłączyć LED tym samym przyciskiem na AT89C4051 w Bascom 8051?

Krótki programik w Bascomie (pewnie mógłby być jeszcze krótszy ale jakoś nie mam weny twórczej ;) ): P1.7 = 1 Poczatek: If P3.0 = 1 Then Goto Zapal Goto Poczatek Zapal: P1.7 = 0 Oczekiwanie: If P3.0 = 1 Then Goto Oczekiwanie Waitms 20 Czekaj_zgas: If P3.0 = 1 Then Goto Zgas Goto Czekaj_zgas Zgas: P1.7 = 1 Oczekiwanie2: If P3.0...

[BASCOM] Sterowanie przyciskiem podłączonym do VCC.

Robiłem tak (attiny13): POTRB.4 podciągnięty 10k rezystorem do GND, od tego kabel do microswitcha, od niego do VCC PORTB.3 - dioda led - VCC (dla testu) program: $regfile "attiny13.dat" $crystal = 4800000 Config Portb.3 = Output Config Portb.4 = Input Led Alias Portb.3 S1 Alias Portb.4 Do Debounce S1 , 0 , Pr1 , Sub Loop End Pr1: Toggle...

Bascom AVR: Jak zmierzyć czas naciśnięcia przycisku na AT90S2313?

Hej! Oto programik w Bascom-AVR. Jeżeli naciśniesz przycisk(portd.0) na mniej niż pieć sekund to zapli Ci się dioda(Portb.7), a jeżeli będziesz trzymał przycisk wciśnięty przez pięć sekund to przesunie Ci jedynkę po całym porcie b. Config Pind.0 = Input Config Portb = Output Dim I As Dim I=1 Program: Do If Pind.0 = 0 Then For I = 1 To 5 Wait 1 If Pind.0...

[Atmega8] [Bascom] -równoczesne naciśnięcie 2 przycisków

Mam podobne zadanie i zrobiłam tak: [syntax=vbnet] Do Incr Czas1 If Czas1 >= 2000 Then : Czas1 = 2000 : Led = 0 : End If Incr Czas2 If Czas2 >= 2000 Then : Czas2 = 2000 : Led = 0 : End If Debounce K1 , 0 , Guzik1 , Sub Debounce K2 , 0 , Guzik2 , Sub Waitms 1 Loop Guzik1: Czas1 = 0 If Czas2 < 200 Then Led = 1 Return Guzik2: Czas2 = 0 If Czas1...

[Atmega8] [Atmega8][BASCOM] Jak dodać i odjąć wartość zmiennej przyciskiem?

Tak na szybko: Nie: If Portd.2 = 0 Then Liczba = Liczba + 1 Tylko: If Pind.2 = 0 Then Liczba = Liczba + 1 Zamiast tej plątaniny: If Liczba = 0 Then Reset Portb.0 Set Portb.1 Reset Portb.2 Reset Portb.3 Reset Portb.4 Reset Portb.5 Reset Portd.0 Elseif Liczba = 1 Then Reset Portb.0 Set Portb.1 Reset Portb.2 Set Portb.3 Reset Portb.4 Reset Portb.5 Reset...

Bascom AVR - Jak niezależnie odmierzać czasy dla wielu przycisków?

' Trzy przyciski kolejno .... (TSA ;) ' wersja bez przerwań i Timera czas_a as integer ' zmienna czasowa A czas_b as integer czas_c as integer we_a alias pinx.1 ' wejście A we_b alias pinx.2 we_c alias pinx.3 wy_a alias Py.1 ' wyjście A wy_b alias Py.2 wy_c alias Py.3 stan_a as bit ' stan układu monostabilnego A: 0 - czeka, 1- liczy stan_b...

ATmega8 Bascom - opóźnienie gaszenia LED po puszczeniu przycisku S1

Grala1 - Nie wiem czy ta wersja spełni oczekiwania : '$prog &HFF , &HE1 , &HD9 , &H00 ' Fusebity fabryczne !!! $sim ' dyrektywa opuszczania zwłoki (usunąć ten wiersz przy wgrywaniu w chip) $regfile = "m8def.dat" ' dyrektywa kompilatora o rodzaju procka ATMega 8 $crystal = 16000000 ' określenie kwarca 16 MHz Config Pinb.1 = Output...

[Atmega8] [Atmega8][Bascom] Wyjście z menu bez trzeciego przycisku - jak to zrobić?

Robisz sobie dwie zmienne: blokada i aktywność. Blokada jako prosta wartość 0 lub 1: jeśli blokada jest założona i wykryjesz, że oba przyciski są naciśnięte, to ustawiasz blokadę na 0 (i aktywność na 0, dodatkowo można dać opóźnienie, aby nie uwzględniać naciśniętych przycisków dalej). Jeśli blokada jest zdjęta, to robisz wszystkie testy, dodatkowo...

[ATMega8] [ATMega8][Bascom] Program nie reaguje na przyciski S1 i S2 po uruchomieniu

Proponuję przy aliasach przycisków wpisać nie port a pin, bo to są wejścia. No i faktycznie aby stany na wejściach nie szalały podciągnąć wejścia do plusa. Moze być np. tak: regfile = "m8def.dat" $crystal = 1000000 Config Portd = Output Portd = &B00000000 Config Pinb.0 = Input Config Pinb.1 = Input Led1 Alias Portd.1 Led2 Alias Portd.2 S1...

Bascom: Jak zaprogramować zapis do EEPROM po zwolnieniu przycisku?

Jakiś użytkownik też miał z tym kiedyś problem, rozwiązał to w taki sposób: Pinb.0 = 0 ' pin RW Waitms 100 Initlcd Nie sądzę, że jest to potrzebne, gdy pin został skonfigurowany w config lcdpin . Co z tą częstotliwością? W symulatorze raczej jest podany czas wykonywania kodu (sprawdź bez $sim ). Nie podałeś, jaki masz kod, ile się wykonuje na mikrokontrolerze,...

Ustawianie czasu w PCF8583 za pomocą przycisków w Bascomie

Dzieki Panowie za podpowiedzi ,mam problem z ustawieniem konkretnej godziny bo do pcfka musi byc godzina zapisana w formacie BCD,i jak zastosuje cos takiego Zwiększaj/zmniejszaj binarną , a dopiero po tym rób z tego BCD. H = 21 'dwudziesta pierwsza if pinc.2=0 then incr h end if H=Makebcd(h) 'w H znajdzie sie wartość &H22(binarnie 34)...

[Atmega8+Attiny2313][BASCOM]Zastąpienie przycisku uC

Co innego ustawiasz, a co innego kasujesz. To jest błąd.

[Bascom] Menu - przycisk a sekwencyjna zmiana przełacznikiem

Witam, Podczas pisania programu menu wyskoczył mi taki mały problem , może najpierw przedstawię kod [syntax=basic4gl] Config Pind.3 = Input Set Portd.3 Memo Alias Pind.3 Config Pind.4 = Input Set Portd.4 Smulti Alias Pind.4 Dim Nr_menu As Byte , Klucz As Bit , Step_ As Byte , Vfoab As Byte Nr_menu = 0 Do Cls Lcd Lookupstr(nr_menu , D_menu) On Nr_menu...

Sterowanie pinami ATmega8 w Bascom - jak używać Sub do obsługi przycisków?

Witam ! do dioda1 = 1 If przycisk1 = 1 and prycisk4 = 0 then dioda1 = 1 waitms 2 dioda1 = 0 waitms 20 end if loop itp. to początek resztę spróbuj sam Powodzenia życzę Stefan . GG6293398

BASCOM AVR attiny2313 – jak wykonać różne akcje po kolejnych naciśnięciach przycisku

Do if Pin = 0 then incr Zmienna_Pomocnicza if Zmienna_Pomocnicza > 2 then Zmienna_Pomocnicza = 0 if Zmienna_Pomocnicza = 0 then Wyslij kod 13 if Zmienna_Pomocnicza = 1 then Wyslij kod 14 if Zmienna_Pomocnicza = 2 then Wyslij kod 15 Bitwait Pin, set end if Loop To taki prosty programik na kolanie napisany. W miejsce Pin wstawic nazwe pinu do ktorego...

Kod pilota z girder-a? Bascom, sterowanie przyciskiem.

napisz program bez obslugi girdera wlacz przechwytywanie w girderze wykonaj w programie operacje przechwyc ja girderem przypisz jej konkretny klawisz juz proste prawda

[BASCOM] Atmega16 - Sterowanie wejściami za pomocą pilota i przycisków

Proszę. Kod masz taki, delikatnie pisząc, rozwlekły :D Trochę poskracałem zmieniane fragmenty. Sprawa jest nieskomplikowana. Kiedy naciskasz przycisk wyboru wyjść to czeka aż puścisz przycisk bo inaczej to od razu by z tej procedury wyszedł. Czeka więc aż puścisz i potem powtórne wciśnięcie spowoduje że zmienna Exit_this dostanie wartość 1 a to jest...

Bascom ATtiny2313: sterowanie LED i trybami przycisku – pętla nie wraca do początku

Po co stosować tu przerwanie? Kardynalny błąd to stosowanie polceceń opóźnień w przerwaniach. W tym programie problem tkwi w: If Przycisk = 0 Then Waitms 100 If Przycisk = 0 Then Incr Sekwencja If Sekwencja = 0 Then Incr Sekwencja If Sekwencja = 4 Then Sekwencja = 1 End If End If End If End If Popraw na: If Przycisk = 0 Then Waitms 100 If Przycisk =...

Resetowanie cyklu serwomechanizmów w Bascom po naciśnięciu przycisku

[syntax=vbnet] ...... Do Debounce S1 , 0 , Pr1 ,Sub Loop End ' koniec pętli Pr1: Waitms 100 Serwo(1) =150 Waitms 150 Serwo(2)=250 Waitms 200 Serwo(2)=50 Waitms 250 Serwo(1)=50 Wait 1 Serwo(1)=150 Waitms 100 Serwo(1)=50 Wait 1 Serwo(1)=150 Waitms 100 Serwo(1)=50 Return [/syntax] Przy takim kodzie serwa działają jak bym chciał tylko procesor wykonuje...

AtTiny13: Jak zliczać 3 naciśnięcia przycisku w 2 sekundy w Bascom?

Zobacz to: Dim Przycisk As Word , Czas As Integer , Czas_zamka As Integer Czas_zamka = 0 Czas = 0 Do Debounce Pinb.1 , 0 , Licz , Sub If Przycisk > 0 Then Incr Czas If Czas = 300 Then Przycisk = 0 Czas = 0 End If If Przycisk = 3 Then Portb.2 = 1 If Portb.2 = 1 Then Incr Czas_zamka If Czas_zamka = 300 Then Portb.2 = 0 Czas_zamka = 0 End If Waitms...

Rc5 i Bascom, pilot, przyciski, włączanie i wyłączanie bitów

a w jakim jezyku to chcesz mieć??

Atmega8, Bascom - Żarówka miga, brak reakcji na pilota po włączeniu przyciskiem

U mnie twój program działa bez problemu :D . Może to wina zakłóceń.

Bascom/ATTiny2313 - Sprawdznie programu - pętla po naciśnięciu switcha

Możesz zamienić waity na pętle, w których będziesz sprawdzał stan przycisków i odpowiednio reagował.

Bascom / Atmega8 - Obsługa przycisków i pilota NEC

Wiec zrobiłem to tak: [syntax=vbnet] Dim Piloty As Byte Dim Old_piloty As Byte Dim Klawisze As Byte Dim Old_klawisze As Byte Dim Licznik_kasuj As Byte Dim Flaga_kasuj As Bit Zeruj_klawisze Alias 250 Zeruj_piloty Alias 0 Klawisze_1 Alias Klawisze.0 Klawisze_2 Alias Klawisze.1 Klawisze_3 Alias Klawisze.2 Klawisze_4 Alias Klawisze.3 Klawisze_5 Alias Klawisze.4...

Bascom AVR Atmega8 – inkrementacja zmiennej po naciśnięciu przycisku (Pinb.2)

Nastepnym razem napisz jaki masz blad, na moje to zapis powinien byc i=i+1 oraz i=i-1

Jak przełączać podprogramy w BASCOM AVR jednym przyciskiem?

Witam. Poczytaj w polskim helpie do bascoma ale jak narazie to moge ci cos doradzic: program wywolujesz tym - call nazwa podprogramu , pamietaj ze musisz go wczesniej zadeklarowac tak: declare sub nazwa aby byl tylko on wykonywany zamknij go w petli do loop i w tym podprogramie wpisz np if pind.0=0 then call inny podprogram end if itd. Pozdrawiam

Bascom: Sterowanie silnikami krokowymi ATMega8, błąd w obsłudze przycisków

Może zrób tak: If Pind.2 = 0 Then 'i jest wciśnięty przycisk PIND.2 Incr Opoznienie_odczytu 'no bo przycisk ma drgania dłużej niż 237us- niech zwiększy 'to sprawdzanie powtórne do 17ms If Opoznienie_odczytu >= 70 Then 'dajmy mu na wygaszenie drgań 17ms If Temp0 = 0 Then ' i jest zezwolenie na zmianę stanu Gosub Ustawianie Temp0 = 1 ' zablokuj zezwolenie...

[atmega8][bascom] input/output - nie działa krańcówka

Wejście (pin procka PORTB.0) programujesz jako wejście . Ustawiasz wysoki poziom tego wejścia , tak aby naciśnięcie przycisku (zwarcie do masy) wymusiło niski poziom na tym wejściu , wykrywany przez program jako If PINB.0 = 0 Then ' coś do wykonania (naciśnięty przycisk)

[Atmega8][Bascom] Inteligentny / Wielofunkcyjny Przycisk

Ja w ramach nauki próbowałem takim czymś: Do 'malá smyčka pro zjištění dlouhého stisku "Mode" If Tlac_mode = 0 Then 'Pokud je stisknuto tlačítko "Mode" déle, Incr Stisk_dlouhy 'tato smyčka kontroluje jak dlouho Waitms 10 ' If Stisk_dlouhy > 200 Then 'pokud je stisk tlačítka dostatečně dlouhý Stisk_dlouhy = 0 'vynuluje počítadlo...

[BASCOM] Jak obsłużyć przyciski i wyświetlić stan na LCD w BASCOM dla ATmega8?

Program wykona się tylko raz. Jeżeli naciśniesz odpowiedni przycisk i przytrzymasz go do momentu az uruchomisz uc to odpowiedni warunek zostanie sprawdzony i wykona się odpowiednia akcja

atmega8 Bascom - dlaczego przycisk na porcie D.7 nie działa?

Witam ! Najpierw zmień tą linię: If Pind.7 = 1 Then na If Pind.7 = 0 Then dodaj też Else do If Pind.7 = o Then Portc.5 = 0 else Portc.5 = 1 loop end

[Atmega8] [Atmega8][Bascom] Kod nie działa po krótkim naciśnięciu przycisku - jak naprawić?

Miałem kiedyś jakąś potrzebę na taki 8-o przyciskowy program dla attiny2313. Zamieszczam go w całości z komentarzami, może Ci się przyda: [syntax=basic4gl]$regfile "attiny2313.dat" $crystal = 1000000 '-- Config Portb = Input Portb = &B11111111 Config Portd = Output Portd = &B00000000 Config Porta.0 = Output Porta.0 = 0 Dim Nr As Byte 'licznik...

[bascom] Jak przyspieszyć naliczanie czasu przytrzymując przycisk w Bascom?

Pittt, działa dobrze ale czy nie dało by się zrobić tak, by cyfry przeskakiwały tylko o 1 ale w szybkim tempie?

BAscom AVR 1.1.8.1: brak stanu portów w symulatorze i na Mega16

Włącz w symulatorze odświeżanie zmiennych. Przycisk z kartką i łapką.

2 przyciski i zmiana góra dół - atmega 8 - Bascom

Prościej sie nie da : 'w góre if pinb.5 = 0 then if A <> 4 then 'wartosc maxymalna A incr A waitms 100 end if end if 'w dół if pinb.6 = 0 then if A <> 0 then 'wartosc minimalna A decr A waitms 100 end if end if

[Bascom][atmega8]- Program termometru z przyciskami

A czytasz co napisałem wyżej ? Problem polega zapewne na tym, że przyciski nie są podciągnięte ani fizycznie ani programowo do + , czyż nie o to chodzi kolego piotrva? PS. Napisałem 'podciągnie' -literówka

BASCOM AVR – dlaczego na LCD wyświetla się 0 zamiast 8? Inicjalizacja zmiennych

Polecenie Do umieść przed pierwszym If Jest: Set Pind.7 Set Pind.6 Powinno być: Set Portd.7 Set Portd.6 PS Przy takim kodzie, musisz wcisnąć jednocześnie dwa przyciski.

BASCOM-AVR - Jak napisać program do sterowania diodami za pomocą przycisków?

Dawno nie pisałem w Bascomie, ale myślę że na końcu każdego podprogramu musisz dać return. Inaczej program idzie w następne etykiety. A u ciebie jest tylko na końcu ostatniej .

[BASCOM] [BASCOM][M8] Zawieszanie programu przy użyciu Waitms i obsługa przycisków SAA1057

Spróbuj: $regfile = "m8def.dat" $crystal = 8000000 $hwstack = 32 $swstack = 8 $framesize = 24 Config Portd = Output Config Pinb.0 = Output Config Pinb.1 = Output Config Pinb.2 = Output Config Pinb.3 = Output ' ustawiam porty do saa1057 Dat Alias Portd.3 'SPRAWDŹ CZY DOBRZE ZDEFINIOWAŁEM Ena Alias Portd.2 Clk Alias Portd.1 'przyciski Ddrc =...