' czestotliwość $crystal = 20000000 'procesorek Atmega8 mój ulubiony :) $regfile = "m8def.dat" '$regfile = "attiny2313.dat" 'stosy, jak program będzie działał to mozna je pozminiejszać $hwstack = 32 $swstack = 10 $framesize = 10 Const Ile = 12 ...
Rozbudowałem program o obsługę 4 diod wskazujących kierunek ruchu: $regfile = "m8def.dat" $crystal = 10000000 Config Pinb.0 = Output Config Pinb.1 = Output Config Pinc.0 = Output Config Pinc.1 = Output Config Pinc.2 = Output Config Pinc.3 = Output Config Rc5 = Pind.2 , Timer...
WItam :) Zwracam sie do szanownych doświadczonych kolegów o podpowiedź. Bawię się ostatnio mikrokontrolerkiem atmega8 w sterowanie servem (hitec hs-55). Program piszę w Bascomie i bardzo chciałbym załapać jak sensownie uzywać timera i przerwan (nie chcę uzywać bascomowskiego config servo). Po...
Udało się! $crystal = 2000000 Config Timer1 = Timer , Prescale = 1 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.6 , Db6 = Portc.2 , Db7 = Portc.7 , E = Portc.5 , Rs = Portc.4 Enable Timer1 Enable Interrupts On Timer1 Niski Config Porta = Output Config Pinc.0 = Output Config...
Witam. Mam przerobione serwo tak aby obracało się dookoła, odpiąłem potencjometr który jest w środku (5k) i wlutowałem miniaturowy i ustawiłem go w połowie tak aby serwo myślało że jest na środku.Oryginalną elektronikę zostawiłem. Jednak mam taki problem,jak uda mi się kręcić serwem w obie strony to...
Witam, rozpoczynam walkę z serwami i atmegą- jak na razie jest 1:0 dla serva;/ Mam układ podłączony jak na schemacie. Czyli pod laptopa podpięty programator, i programator z płytką do której jest też podpięte servo. Servo jest zasilane osobnym źródłem napięcia Zajrzałem do pomocy bascom`a...
Witam. Może ktoś mi podpowie. Mam podpięte servo (PowerHD 1235 MG) do płytki stykowej. Wciskając przyciski S1 lub S2 serwo płynie ustawia się wg. aktualnego parametru. Problem pojawia się gdy wysyłam wartość przez UART (dane dochodzą, widzę odebraną wartość na LCD), ale servo tylko burczy i nie...
W instrukcji CONFIG SERVOS jest taki parametr jak RELOAD = xxx. Liczba xxx określa jaki czas w us będzie pomiędzy kolejnymi przerwaniami licznika taktującego generator PWM dla układów serwa. I będzie to rozdzielczość tego układu. Zatem jeśli wpiszesz 10 to SERVOS(1) = 100 da nam 100x10us = 1ms impuls...
Trzeba mierzyć czas impulsu i jeśli wynik = ileśtam to wtedy dzieje sie cośtam Może : $regfile = "twój uP" $crystal = twój crystal Config Timer1 = Counter , Edge = Rising Config Portc = Input Do If Portc.1 = 1 Then Start Timer1 If Portc.1 = 0 Then Stop Timer1 End If End...
Polecenie konfiguracyjne serwa w języku Bascom wygląda następująco: CONFIG SERVOS = liczba , SERVO1 = końcówka [ , SERVOn = końcówka ] , RELOAD = czas W Helpie napisano, że parametr RELOAD to czas opóźnienia pomiędzy kolejnymi przerwaniami licznika TIMER0, rozdzielczość. Zazwyczaj jest to 10us,...
Próbuj to: $regfile = "M16def.dat" $hwstack = 32 $swstack = 32 $framesize = 32 $crystal = 16000000 '-----------------------------... Licznik_servo As Byte Dim Licznik_servo_2 As Byte Dim Servo As Byte '---------------------------------...
Witam, ostatnio zakupiłem silniki bezszczotkowe oraz układy ESC do nich. Próbowałem sterować nimi za pomocą Atmegi8 i polecenia config servo ale niestety nie mogę ich uruchomić. Czy ktoś mógłby wytłumaczyć mi jak to należy zrobić ? Kod Bascom: [syntax=vbnet]$regfile = "m8adef.dat" $crystal =...
Witajcie! Zabieram się za budowę sterownika który między innymi będzie sterował proporcjonalnie wychyleniem pewnego elementu mechanicznego. Chcę użyć do tego celu AVR2313, serwo modelarskie. Niestety sposób sterowania serwem przez komendę CONFIG Servo pozostawia wiele do życzenia - mianowicie będę...
Po wielu prubach wróciłem do instrukcji bascoma: "Config servo". Może wie ktoś jak to instrukcja jest napisana żeby można ją było przełożyć na język C lub na Bascom. Bo jeśli mam sterować 5 serwami to nie mogę do każdego używać osobnego serwa. A ta instrukcja może sterować 16 serwami na jednym taimerze...
Chcesz sterować za pomocą komputera, czy tylko mikrokontrolerem? Poszukaj pod hasłem "kontroler serw /serwomechanizmów" - są już gotowe programy sterujące większą ilością serw, a sprawujące się dużo lepiej niż bascomowskie "config servo". A teraz przemyśl taką sprawę: chcesz zrobić ramię na 6 serwach....
K_o_n_r_a_d , rozumiem. Nie potrzebuję aż tak dużej dokładności na zakres obrotu serwa jaką przypuszczałem. Problem tkwi w uzyskaniu tych 50Hz z zegara 4MHz. Sam preskaler nie jest w stanie tego uzyskać. W jaki sposób to zrealizować? (w tym przykładowym programie opóźnienie "Waitms 5" dałem jako przykładowe...
Sygnał o którym napisałeś można generować nie tylko korzystając z timera . Można również zrobić to programowo. Z tego co napisałeś jest to sygnał sterujący do serwomechanizmów modelarskich Od 1 do 2 ms i przerwa 20 ms . Bascom z tego co pamiętam ma coś gotowego w stylu config servo ... Jeśli chcesz zrobić...
witam kiedyś zacząłem projekt ramienia robota ale nie ukończyłem go postanowiłem więc dokończyć co zacząłem ramie miało być sterowane 5 serwami przez klawiaturę matrycową mam prośbę czy może ktoś sprawdzić schemat i kod w bascomie ???? nie znam sie na eagle dlatego prosiłbym o wykonanie płytki w tym...
nowsze bascomy (np. 1.11.9.8) mają wbudowaną obsługę serw: CONFIG SERVOS Configures how much servo’s will be controlled. Syntax CONFIG SERVOS = X , Servo1 = Portb.0 , Servo2 = Portb.1 , Reload = rl Remarks Servo’s need a variable pulse in order to operate. The CONFIG...
Oto kod Kod: '4x4 Line Follower 'Chibots line following Contest 2003 'Wright Hobbies, LLC Copyright 2003 'eddy(at)wrighthobbies.com 'Var... Detectors Dim Lineflag As Byte Dim I As Byte , X As Byte Dim Adcvalue As Word , Channel As Byte , Progspeed As Byte Dim Progsteer As Byte Dim...
Witam, Jestem całkowicie zielony jeśli chodzi o programowanie, ale postanowiłem spróbować napisać prosty program, który będzie miał za zadanie wyróżnić 3 ruchy robota w zależności od stanu krańcówek. Podprogram "Prawo" wtedy gdy S1 jest wciśnięta; "Lewo" gdy S2 jest wciśnięta; "Przod" gdy nic nie jest...
Witam, Na wstępie pragnę zaznaczyć iż nie jestem elektronikiem, ani żadną osobą zajmującą się rzeczami z tym związanymi. Jestem studentem inf. i potrzebuję rady. Razem z kolegą robimy projekt na zajęcia z mikroprocesorów i mikrokontrolerów. Śluzę 3-drzwiową zwalnianą i zamykaną przy pomocy serwomechanizmów(SG-5010)....
Program w Bascom Atiny 24 Dwa serwo poruszające kamerą. Po włączeniu zasilania pozycja środek. Przyciski. S1_lewo obraca Serwo 1 w lewo S1_praw obraca Serwo 1 w prawo S2_lewo obraca Serwo 2 w lewo S2_praw obraca Serwo 2 w prawo Nie ustawia pozycji środkowej , i nie zmienia pozycji. A to mój...
Witam, na forum jest wiele informacji na temat serw modelarskich ale nie znalazłem informacji o tym jak wysterować dwa serwomechanizmy naraz korzystając z Config Servos. Jeżeli wysteruję jedno serwo a potem drugie to jest w miarę ok. Natomiast przy próbie wysterowania 2 w tym samym czasie serwa wykonują...
Witam. Zacznę od tego, że jestem amatorem/początkującym więc moje programy gównie opierają się na tym co znajdę w internecie + jakaś znikoma wiedza :) Chciałem zrobić sterowanie serwem w zależności od temperatury. Założenia: -Mikrokontroler atmega8 -Pomiar temperatury DS18B20 -Sterowanie serwem...
Pomijajac pakt, ze post umiesciles w zlym dziale to moglbys troche poszukac zanim napiszesz post :boss: Tutaj masz przyklad z ksiazki "Programowanie mikrokontrolerow AVR w BASCOM": 'Mikrokontroler taktowany oscylatorem 10 MHz 'Przyciski S1 oraz S2 umożliwiają zmianę położenia serw. 'Serwo 2 zawsze...
Witam ogarnąłem już dużo na temat programowania w bascom, tylko mam kolejny problem, mianowicie chciałbym zaprogramować obsługę serwa pilotem nadającym w RC5 lecz gdy połączę obsługę rc5 i serwa mam takie błędy i nic nie działa: ........ Pojedynczo programy działają ok. ................. Rc5+...
Napisałem coś takiego ale nie działa jak powinno, co jest nie tak . [syntax=basic4gl] $regfile = "m8def.dat" $crystal = 10000000 'Config Lcd = 16 * 2 'deklaracje wyświetlacza 'Config Lcdpin = Pin , Db4 = Portb.3 , Db5 = Portb.2 , Db6 = Portb.1 , Db7 = Portc.0...
Witam. Na wstępie chciałem podziękować za listę porad i pouczeń. Wziąłem to do siebie. I po raz kolejny poprosić o sprawdzenie kolejnych wypocin. brak GND dla uC tego nie zrozumiałem. Jestem kompletnie zielony czym jest tu to uC. ? Czy kondensator na syjściu LM317 wystarczy do filtracji...
Witam Napisałem prosty program używający timera1 i timera 2 do zliczania częstotliwości, Chciałbym użyć dodatkowo serwa do mojego projektu ale używając intrukcji Servo coś nie tak dzieje się z serwem . Po włączeniu zasilania ciągle pracuje i próbuje przekręcić się o 360 stopni "ciągle pracuje". Kiedy...
Proszę ;) [syntax=vbnet]' "STEROWANIE SERWOMECHANIZMAMI" ' ' BARTek niveasoft(at)tlen.pl ' 'SERWO1 na PORTB.0 'SERWO2 na PORTB.1 'PRZYCISKI SERWA1: PINB.3 i PINB.4 'PRZYCISKI SERWA2: PINB.5 i PINB.6 ' 'W ATtiny2313 wyłączyć CKDIV8 tak by pracował na 8MHz ' 'Przy starcie serwa staja na środku...
Witam Mój problem to brak kompilacji przy konfiguracji Timer2 w tryb Counter Unknown CONFIG parameter Porblem polega na tym że w helpie BASCOM-AVR można konfigurować Timer 2 w tryb Counter. Wrzucam cały kod :[syntax=basic4gl] $regfile = "m16def.dat" $crystal = 16000000 Dim Freq...
Ludzie, jak potrafią, to pisza po rejestrach, ale prawie każdą rzecz da się zapisac komendami Bascom,a Znam wyjątki, ale nie będę teraz o nich pisał. Masz tu trzy przykłady bo się nie wygrzebiesz z tego a jest ładny dzień ;) Gdzies tam się machnąłem z częstotliwością bo wstawiałem...
Program na razie jest bardzo kulawy, pierwsze co miałem na celu to osiągnięcie takiego stanu, że kiedy serwo znajdzie się w położeniu 19 to wtedy zapali się dioda led. Generalnie to nie wiem czy nie mam gdzieś coś namieszane w fusebitach bo jakieś te przeliczenia mi śmieszne wychodzą, ale serwo obraca...
Co do programu to chodziło mi oto, że może program nie będzie poprawnie napisany to mimowszystko powinienem dać sobie radę aby działał. Ewentulanie w razie problemów bym napisał na forum ;) atmeg Servo(1) = 100 ta funkcja oznacza położenie serwa/orczyku 100 - oznacza środek a mniejsze...
Noc nie przespana ale działa ! prawie jedyny problem że oba serwa działają od połowy tj serwo a działa od 0 do 50 a serwo b od 50 do 100 co może być przyczyną ?? A raz na jakiś czas serwo_A działa ok a serwo_B działa tak do połowy potencjometru wykonując pełny ruch .. Odbiornik : [syntax=basic4gl]'Odbiornik...
Witam, Mam pewien problem z ATMEGĄ8 i serwem MG90S. $regfile = "m8def.dat" $crystal = 1000000 Config Servos = 1 , Servo1 = Portb.1 , Reload = 10 Config Adc = Single , Prescaler = 128 , Reference = Avcc Start Adc Dim W As Integer Config Pinb.1 = Output Dim I As Byte Dim I2...
Spróbuj program z helpa w razie potrzeby zmień sobie port wyjściowy , oraz Twój tak jak powinien wyglądać . Jedno pytanie czy coś jeszcze jest dołączone do mikrokontrolera oraz jest to jedyny program czy tylko jakiś fragment ? Masz serwo dobrze połączone i zasilacz o odpowiedniej wydajności prądowej...
Akurat ten ma komunikację w jedną stronę ale też działa na ponad 200m. Specjalnie daje krótszy program żeby nikt nie musiał się męczyć i z 1000 linii kody wyciągać samej komunikacji z RFM12B. Nadajnik: $regfile = "M8def.dat" $crystal = 8000000 $hwstack = 128 '----------------------------------...
Witam. Kupiłem ostatnio regulator Redox eco 20A oraz silnik Emax cf2812. Podłączyłem silnik do regulatora, regulator do pakietu 3cele (11,1V) i cisza, choć spodziewałem się usłyszeć piszczenie oznaczające wejście do trybu programowania. Sprawdziłem napięcie na wyjściu BEC regulatora i było 5V, więc...
Właśnie zacząłem trochę czytać o serwach i doszedłem do wniosku że to rozwiązanie bardziej mi odpowiada. Teraz tak - jest sobie taki program: Dodano po 31 [syntax=basic4gl] $regfile = "attiny13.dat" $crystal = 4800000 Config Adc = Single , Prescaler = Auto , Reference = Avcc Config...
Witam po raz kolejny pojawił się problem z moim programem otóż chcę aby kiedy wzrośnie temperatura i będzie wyższa lub równa zadanej to serwo obraca się w prawo poczym się zatrzymuje następnie kiedy temperatura będzie niższa od zadanej wtedy serwo obraca się w lewo i zatrzymuje się. [syntax=basic4gl]...
Krauser . Jeśli dobrze rozumiem pytanie to: Pozdrawiam Dziękuje że napisał pan dla mnie własną funkcję, ale jak widać działa prościej w ten sposób więc jednak przy tym pozostane. ____________________...
Pracuje nas sterowaniem małego serwomechanizmu: Programuje w Bascom AVR i do tego celu wykorzystuję jedynie Timer0. Nie mogę wykorzystać dodatkowego timera1 bo ten będzie służył do odliczania czasu. Instrukcji Serwos() także nie chce wykorzystywać...jakoś nie mam do niego zaufania :/ Aktualnie...
Witam! Mam problem z Atmega32 i serwomechanizmami. Przeanalizowałem mnóstwo postów z forum, ale mój problem nadal nie został rozwiązany. Mam układzik do sterowania 25 serwomechanizmami modelarskimi. Chciałbym chociaż jedno wysterować. Podłączony kwarc 16MHz. Fuse bity na 011111:Ext Crystal/Resonator...
PiTank to zdalnie sterowany czołg, kontrolowany poprzez sieć. Skonstruowany został w ramach szkolnego konkursu robotycznego. Realizacja projektu pochłonęła pięciu osobom około dwa tygodnie. Głównym pociskiem wystrzeliwanym przez działo pojazdu są piłeczki ping-pongowe - jest w stanie wystrzelić...
Witam,mam pewien problem, mianowicie chciałbym sterować dwoma serwami za pomocą joysticka bezprzewodowo, używając modułu nRF24I01. Kod dla jednego serwa działa bezproblemowo (wykorzystuję oś X na joysticku). Chciałbym drugie serwo kontrolować za pomocą osi Y. Jak to zrobić? Nadajnik:
Witam. Ostatnio zainteresował mnie pomiar natężenia światła, potrzebuję go do wykonania projektu. Pomiar dokonuje czujnikiem TSL235R, który podaje mi odpowiedź w formie częstotliwości. Chciałbym aby ktoś przyjrzał się temu co narazie wklepałem do kompilatora, bo nie jestem pewien, czy wszystko będzie...
Witam. Rozpoczynam właśnie zabawę w obsługę serw modelarskich przy pomocy attiny2313 i bascoma. Niestety wbudowana w bascoma procedura "Config servo" mnie zawiodła. Postanowiłem więc samodzielnie wygenerować sygnał, który posłuży do obsługi serwa. Napisałem więc taki prosty skrypt: [syntax=vbnet] Config...
Czesc. Moglby ktos pomoc/nakierowac co mam poprawic w kodzie poniewaz serwa ciagle kreca (zamiast w chwili wlaczenia maja byc zatrzymane i dopiero jak przechyle joystick w osi y to powinny sie krecic) i nie reaguja na ruch joysticka w osi y. Cel: Sterowanie przod tyl serwomechanizmami za pomoca joystick...
Witam Mam problem ze sterowaniem serwem w bascomie. Połączenie pomiędzy uC a serwem jest prawidłowe. Gdy wgrywam jakikolwiek program, np taki krótki: $regfile = "m16def.dat" $crystal = 10000000 Config Porta.4 = Output Config Servos = 1 , Servo1 = Porta.4 , Reload = 10 Enable Interrupts Servo(1)=100 wait.....
Od kilku godzin próbuje zrozumieć dlaczego ten układ nie chce działać. Podłączyłem atmege do zasilania, a do jej pinu C.5 podłączyłem kabelek Signal od serwa. Serwo do zasilania i GND (napięcie stabilizowane 5V). Wszystko ładnie pięknie - przy podłączeniu zasilania serwo wykonuje jakiś ruch, jednak...
Witam. Kupiłem właśnie kilka serw TowerPro. Podłączyłem jedno na próbę. Napisałem program w bascomie: $regfile = "m8def.dat" $crystal = 8000000 Config Portd.5 = Output Config Servos = 1 , Servo1 = Portd.5 , Reload = 10 'Enable Interrupts Dim Zmienna As Integer Zmienna = 100 Cls Do Servo(1)...
Witam Jak wyeliminować opóźnienia w instrukcji wait przy używaniu przerwań do obsługi serwa? Przy tym programie czas oczekiwania się niemal podwaja: [syntax=basic4gl] $regfile = "m8def.dat" $crystal = 8000000 ...
Witam serdecznie, Lata temu popełniłem sterownik silnika krokowego, który zaprojektował kolega "SOKI", przestawiając swój świetny projekt frezarki cnc za niespełna 250zł. Od lat sprawuje się świetnie, ale postanowiłem go nieco usprawnić by zyskać większą wydajność swoich silników, i zamiast zasilać...
Witam To moze zaczne od kodu: $regfile = "m8def.dat" $crystal = 8000000 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portd.5 , Db5 = Portd.6 , Db6 = Portd.7 , Db7 = Portd.4 , E = Portd.3 , Rs = Portd.2 Cls Config Servos = 1 , Servo1 = Portc.5 , Reload = 10 Config Portc.5 = Output Config...
Witam Poszukuję rozwiązania problemu programowania części PLC w Lenze serii 9300(EVS9324-ET). Muszę wymienić Servo ze względu na błędy komunikacji z modułem ProfiBus-a. O ile configi części Servo można bez problemu zgrywać za pomocą GDC, to część PLC jest odporna na wszelkie próby backupu, i dalej...
Witam, Mam 2 płytki Stellaris LaunchPad z procesorem LM4F120XL na pokładzie, po podłączeniu do nich modułu nrf24l01 bez ustanawiam komunikację między płytkami i steruje np: serwem, diodami. Program do Stellarisów napisałem w IDE o nazwie Energia, który jest klonem IDE do Arduino (dostosowanym pod...
np tak: Config Pinc.5 = Output Config Servos = 1 , Servo1 = Portc.5 , Reload = 4 a potem w kodzie wpisujesz odpowiednie wartości do : Servo(1) = wartość wychylenia to na szczęście w Bascomie proste jak poezja ;) zesztą zajrzyj sobie do helpa Bascom'a - config servos
Frezarka CNC Frezarka powstaje w dużej mierze z elementów przesłanych omyłkowo przez Chińczyka. Stąd też dość cienkie prowadnice liniowe 12mm. Nie narzekam, ponieważ dostałem pełny zwrot środków za omyłkowo wysłaną paczkę. W miarę budowy na bieżąco będę udostępniał kolejne zdjęcia. Całość...
Nie wiem co jest nie tak To program w C (mój pierwszy na uC :D) #include <interrupt.h> #include <delay.h> #define tau0 250; unsigned char liczt0; SIGNAL (SIG_OVERFLOW0) { TCNT0=tau0; ircr liczt0; if(liczt0==5) { ...
Świetnie. Wszystko jak należy. Wrzucilem na procesor ten podstawowy kod z tutoriala bo mój własny się nie skompilował. Także wrzucilem ten : $regfile = "m8def.dat" $crystal = 12000000 Config Servos = 1 , Servo1 = Portd.1 , Reload = 10 Config Portd = Output Enable Interrupts Dim Zmienna...
Witam. Chciałbym zapytać o poprawność mojego kodu: $regfile = "m8def.dat" $crystal = 12000000 Config Servos = 1 , Servo1 = Portd.1 , Reload = 10 Config Portd = Output Enable Interrupts Dim Zmienna As Integer 'Nasze "odchylenie" serwa Zmienna = 150 'Czas trwania impulsu będzie...
Witam. Szukam informacji nt. dekodowania RC5 w Bascomie. RC% wykorzystuje kodowanie typu Manchester i do dekodowania używa się takich samych technik jak dla kodu Manchester. Z. Hajduk w książce "Mikrokontrolery w systemach zdalnego sterowania" przedstawił następujące metody: *układy cyfrowej pętli...
A dlaczego nie skorzystasz z polecenia Config servos i Servo?Zobacz w dokumentacji informacje o tych poleceniach. pozdr
Witam. Pomyślałem że, dopiszę się do rozmowy o sterowaniu serwami :D . W BASCOM jest gotowa obsługa serw która wygląda tak: $regfile = "m16def.dat" $crystal = 8000000 Config Servos = 1 , Servo1 = Portd.5 , Reload = 10 Enable Interrupts Dim I As Byte , Ruch As Byte Do If I <...
nRF24L01.C: Dodano po 26 Problem w pewnym stopniu rozwiązałem.. w funkcji wysyłającej miałem na "twardo" ustawione, że wysyła sie 1 bajt, zmieniłem to ale teraz układ odbiera tylko ten 2 bajt i podczas odbierania zapisuje 2 razy to samo
