Co mam poustawiać aby piny z tematu można było używać jako zwykłe wyjścia. Napisałem w bascomie taki prosty programik: Config Portd = Output Set Portd.3 Set Portd.4 Set Portd.5 Set Portd.6 Do loop I po włączeniu układu na pinach PD.1 (TxD) i PD.2 (INT0) mam cały czas 0 a na PD.3 i PD.4 mam 5 V. Jeśli natomiast usune linijki Set Portd.3 Set Portd.4 to...
Widzę że muszę trochę sprostować. 1. Nawet kosmicznie często wywoływane przerwanie zdąży się wykonać choć by nie wiem jak długo ono trwało, bo przerwania po wejściu w obsługę jakiegoś przerwania są blokowane i odblokowywane są dopiero po zakończeniu się obsługi tego przerwania. Więc twierdzenie że przerwanie nie zdąży się wykonać w ciągu 128us bo samo...
Może być np tak: $regfile = "m8def.dat" Config Portd = Output Portd = &B00000000 Dim D As Integer , D1 As Byte D = 0 D1 = 0 Do If D = 0 Then Portd = &B00000000 If D = 1 Then Portd = &B00000001 If D = 2 Then Portd = &B00000011 If D = 3 Then Portd = &B00000111 If D = 4 Then Portd = &B00001111 If D = 5 Then Portd = &B00011111 If D = 6 Then Portd...
Jeżeli przycisk miałby podciąganie to zawsze byłby w trybie gaszenia a po wciśnięciu i zwarciu do masy 0 czyli tryb rozjaśniania tu mi już coś nie pasuje! Dodano po 20 [syntax=basic4gl]$regfile = "m8def.dat" $crystal = 16000000 Config Pinb.1 = Output Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Down , Compare B Pwm = Disconnect , Prescale =...
Witam mam mały problem i proszę o w miarę możliwości szybką odpowiedz Dzisiaj kupiłem ten probramator Linki zostały usunięte - zgodnie z regulaminem pkt.3.1.18 Chcę w bascomie 1.11.9.5 zaprogramować układ ATmega8 do sterowania diodami mają się zapalać po kolei Program prosty : Portc = Output Portb = Output Portd = Output Do Portb = &00000000 Portc =...
Witam. Znalazłem coś innego i po modyfikacji działa jak powinno . Przypisany jeden klawisz pod PB.2 wysyłający LewyALT + Q. Jest też zmiana u gnieździe usb D- PD.3 na PD.4. [syntax=vbnet] 'Author : Rick Richard 'www : http://www.sloservers.com/swusb 'Created : Jul 29, 2009 'Version : 1.00 '***************************************...
Sprawdź jaki procesor masz ustawiony w opcjach bascoma... pewnie jakiś attiny2313 i bascom kompiluje program pod ten właśnie procesor. I spróbuj zaprogramować tym: $regfile = "m8def.dat" Config Portd = Output Config Portb = Output Do Toggle Portb Toggle Portd Waitms 200 Loop : End
[syntax=bascom] Waitms 500 Portb = &B00010010 Portc = &B00001000 Portd = &B00001000 Waitms 150 Portb = &B00000100 Portc = &B00000001 Portd = &B00010001 Waitms 150 Portb = &B00001000 Portc = &B00000100 Portd = &B00100010 Waitms 150 Portb = &B00010010 Portc = &B00001000 Portd = &B00001000[/syntax] Zmienione, nadal to samo.
Witam Jestem w trakcie robienia zagara nixie ze strony http://mirley.firlej.org/zegar_nixie Mikrokontrolerem jest Atmega8 a wkład zrobiony na Bascomie. Potrzebuję dodać opcję chwilowego wyłączenia lamp, w celu zabezpieczenia lamp przed zatruciem. Bardzo proszę o pomoc. To kod: '************* Konfiguracja uC ***************** '***************************************...
Ja pierniczę. A ustawiłeś typ procesora? Ustaw na ATTiny2313 albo ustaw ATMega8 i pozamieniaj wszystkie PortA na PortD na przykład. PS. Fotografia ślubna? Rispekt ;p
Witam zaczynam programować i mam problem.Potrzebuje zaprogramować atmege8. Założenia po załączeniu przycisku ma dać stan niski i po jakimś czasie ma ponownie dać stan wysoki 2 razy. $regfile = "m8def.dat" $crystal = 8000000 Config Portd = Output Config Pinb.0 = Input Przycisk Alias Pinb.0 Do Portd = &B11111111 Przycisk = 0 Waitms 30 Portd = &B00000000...
Nie napisałeś nawet czym przejawia się to dziwne zachowanie uC, może program jest ok, a po prostu Ty nie wiesz czego chcesz? Kropka na wyświetlaczy świeci się, bo PB0 jest zerem logicznym, kiedy nie naciskasz przycisku, a co się stanie, gdy przytrzymasz ten przycisk dłużej? PORTB = B&11111111 - tutaj masz jeszcze literówkę. EDIT: Poza tym PORTD w Atmedze8...
Witam mam identyczny problem z moim ATmega8, mam płytkę testową ZL2AVR + programator ZL2PRG. Wgrywanie i odczytywanie programów działa bez problemu na ustawionym kwarcu zewn. czy na oscylatorze wewn. Ale wykonać jakiegokolwiek polecenia z programu nie chce (milczy) na żadnym zaprogramowanym wyjściu nie zmienia się stan, wszystko jak przy pustej pamięci....
Ponieważ napisałeś do mnie na PW to odpowiadam: - bardzo dobrym programem (niestety płatnym) jest mkavrcalculator, jednak w Twoim przypadku (atmega8) możesz go użyć - wersja demo obsługje w całości ten procesor - chwalę sobie AVRBurn-O-Mat - nakładka graficzna na avrdude - KhazamaAVRProgrammer Tylko nie rozumiem zbytnio po co chcesz ich używać skoro...
Witajcie, Zacząłem pisać ostatnio program w bascom, jednak nie działał, okazało się że część kodu odpowiedzialna za przejście do podprogramu nie działa, długo kombinowałem, wklejałem części kodu znalezionych w internecie, ale wciąż nie działa. Kod: [syntax=basic4gl] $regfile = "m8adef.dat" $crystal = 8000000 $hwstack = 40 $swstack = 16 $framesize =...
a czy takie coś to wyzerowanie bitu?: PORTD |= ~(1<<3); Bit zerujesz innym operatorem (mnożenie bitowe): [syntax=c]PORTD &= ~(1<<3); [/syntax] Kurs na stronie forbot jest bardzo przystępnie napisany (dawałem do niego link w poprzednim poście). Jakbyś miał problemy z timerami to pisz śmiało. Pochwalam przejście z Bascoma na C, jeszcze...
Rekinisko, to powinno wyglądać tak: Kod Basic4GL - No to wiele zmieniło ;) jutro wkleję poprawki do oceny.
Portb = toggle Portb ja programuje w mikropascalu i to dziala program button_test; var oldstate : byte; begin DDRD:=$FF; while true do begin if Button(PORTB, 0, 1, 1) then oldstate := 255; if oldstate and Button(PORTB, 0, 1, 0) then begin PORTD := not(PORTD); oldstate := 0; end; end; end.
trafiłem jeszcze na coś takiego SPI odpada bo wysyla za kazdym razem LOAD. Tylko Shiftout. 'To przyklad na dwa maxy polaczone w szereg. Wlasnie te _noop to cala filozofia !! 'Reszte wiecie jak zrobic. Dodano po 2 Muszę poszukać innych modułów z MAX7219, może coś z ty mi nie tak. Próbowałem z użyciem Shiftout. Wypociłem coś takiego: Dodano po 24 Wgrałem...
Witam !!! Chcę wysłać a z komórki i załączyć diodę Mogą mi koledzy podpowiedzieć co robię źle w programie ? [syntax=text] $regfile = "m8def.dat" $crystal = 8000000 $baud = 9600 Config Serialin = Buffered , Size = 30 Config Portd = &B10111111 : Portd = &B00000000 'konfiguracja portow Config Portb = &B11111111 : Portb = &B00000000 Config Portc = &B00000000...
config pinb.0 = input s1 alias pinb.0 set portb.0 config portc = output portc=&b00100000 do if s1=0 then waitms 45 bitwait s1, set if portc.8= 1 then portc.8=0 portc.5=1 end if rotate portc, right end if loop end masz przyklad reszta twoja. ________________________________________... Wlasnie widze, ze ktos byl pierwszy Dodano...
Witam, napisałem program sterowania stralką automatyczną w BASCOM pod mikrokontroler Atmega8 i jest z tym programem tylko jeden problem, podczas wykonywania nie wczytuje stanu wejść (czyli pinów od pinb.0 do pinb.7), jeżeli zadam stany logiczne przed włączeniem zasilania to program się wykonuje ale przecież trzeba odczytać wielokrotnie stan presostatu...
Mam takie coś. Co jest nie tak? $regfile = "m8def.dat" $crystal = 8000000 $sim Config Timer0 = Timer , Prescale = 64 Config Portd = Output Portd.0 = 0 Portd.1 = 0 Portd.2 = 0 Dim Sekundnik30 As Byte Dim Minutnik As Byte Dim W As Byte Led1 Alias Portd.0 Led2 Alias Portd.1 Led3 Alias Portd.2 Stop Timer0 Timer0 = 0 Do Start Timer0 Wait 1 Led1 = 1 Wait...
Witam Dopiero zacząłem przygodę z mikrokontrolerami. Kupiłem programator USBasp i podstawke programującą. Do programowania używam BASCOM napisałem w nim taki prosty programik: $regfile = "m8def.dat" $crystal = 1000000 Config Portd = Output 'pprt d jako wyjścia Portd = &B0000000 'wszędzie stan spoczynkowy-0 Do Portd.0 = 1 'zapal diode Waitms...
Witam, Mam problem z zaprogramowaniem procesora ATmega8, jak próbuje wgrać na niego program to pokazują się komunikaty http://obrazki.elektroda.pl/9480560700_1... http://obrazki.elektroda.pl/4888139100_1... Kod programu to http://obrazki.elektroda.pl/5540419900_1... Mój programator to ISP STK200/300 http://obrazki.elektroda.pl/9443642700_1...
A po co ? config portb = &B00000110 config portc = output config portd = &B10000000 Portb = &B00000001 Portc = &B1111111 Portd = &B11110000 wystarczy Config portc = output Config pinb.0 = output reszta wydaje mi sie ze jest dobrze sprawdz czy na pewno masz dobrze podłaczony wyświetlacz
Witam. Jestem poczatkujacym dlatego proszę o błachostkę. Buduje ups-a / przetwornice trafo z starego ups-a a generator 50hz ... Niema dlatego wybor padl na atmege 8 i timer1. Czy ktoś co coś jarzy mógłby mi to sprawdzić ? Byłbym wdzięczny . Oto kod : $regfile = "m8def.dat" 'atmega 8 $crystal = 8000000 '8 mhz 'INNE KONFIGURACJE Config Timer1...
Witam. Jestem na etapie czytania książki "Programowanie mikrokontrolerów AVR w języku BASCOM", kilka dni zajęło mi budowanie programatora i płytki z diodami do testowania Atmega8. Na pierwszy ogień poszedł oczywiście najprostszy program ze strony 87 - schemat ideowy układu na stronie 86. Mój problem polega na tym, że kiedy wgram bez błędów programik...
To nie problem z rezonatorem i fuse bit'ami tylko z konfiguracja timera. Ponizej zamieszczam moja przerobiona wersje twojego kodu $regfile = "m8def.dat" $crystal = 8000000 Config Portd = Output 'Konfiguracja 4 pinów wyjściowych PWM Dim Wyp(6) As Byte 'zmienne wypełnienia Dim Licz As Byte 'zmienna głównego licznika Dim X As Byte Dim...
Witam. Chcę zrobić układ załączający przekaźnik po 30sek od podania zasilania.Uczę się dopiero pisać w bascomie i dlatego proszę o pomoc. Podłączyłem pod portD 0 tranzystor bc548 i do niego przekaźnik.Napisałem program i załącza się przekaźnik ale od razu bez zwłoki. Wiem że wykorzystanie mikrokontrolera do jednego przekaźnika do lekka przesada ,ale...
Witam! A więc tak jak w temacie chciałbym się dowiedzieć jak się nauczyć przerabiania programu na przykład przeznaczonego na procesor atmega8 , na attiny2313 ? Lub na odwrót. W języku basic w bascomie. . Na przykład taki program jak skonfigurowac pod atmegę 8 ? : $regfile = "attiny2313.dat" 'typ proca $crystal = 1000000 'taktowanie Config...
Spróbuj tak: $regfile="m8def.dat" Portb = &B11111111 Portc = &B11111111 Portd = &B11111111 Dim A As word Dim B As byte A = 1000 B = 200 Do Waitus A Portc.5 = 1 Waitus B Portc.5 = 0 Loop End
Zacznę od początku mam problem z sharp 340k. Na początek chciałem zrobić "wykrywacz" czyli jak zauważy sharp 340k coś to dioda się zaświeci w dalszych etapach pracy miało by to służyć do minisumo. Tylko jest problem z tym żeby zaświeciła się dioda. Programuje w bascom. tu schemat : http://obrazki.elektroda.pl/8082435600_1... A kod to...
No i paczka doszła. Szybko zrobione na stykówce, i wyświetlacz działa, ale coś jest nie tak, oraz nie widzę komunikacji. Nadajnik: [syntax=Bascom] $regfile = "m8def.dat" $crystal = 1000000 $hwstack = 40 $swstack = 16 $framesize = 32 Config Portb.1 = Input Portb.1 = 0 Config Portd.3 = Output Config Pind.1 = Output 'PIN TXD Set Portd 'PIN TXD Enable Interrupts...
"Waitms" Komeda służąca do zatrzymania programu na pewien czas końcówka ms oznacza ze wartości będą milisekundami czyli waitms 0.40 oznacza ze program zatrzymany zastanie na 0.40 ms i to działa bo w programie Test działa!!! jak nie wierzysz to sprawdź ale wiem można użyć Komedy waitus która użyję raczej w programie ostatecznym A co do programu to chodzi...
Trochę dziwnie napisałeś ten program, pozwoliłem go sobie trochę przerobić. Sprawdź konfigurację portów żebyś nie uwalił sobie procka, i napisz czy poniższy program rozwiązał Twój problem. Kod: [syntax=basic4gl] 'Tester napiecia na AVR ' ' - zegar wewnetrzny 1 MHz ' - górny fuse bit D9 ' - dolny fuse bit E1 'procesor ATMEGA8 $regfile = "m8def.dat" $crystal...
witam kolegow i kolezanki poskladalem ten zegar jednak troche go przerobilem i mam problemy z softem ... chyba ... bo jak wgrywam soft drakerusa i ustawiam na $crystal = 16000000 bo taki mam to mi wszystko chodzi jakby za wolno nawet widac jak diody migaja zamiast sie caly czas palic ... jeszcze jedno co do tego kawalka kodu pod spodem da sie zrobic...
Witam Chciałbym sterować 2 silnikami DC z dwóch potencjometrów. Na początku mam program który przyspiesza silnik za pomocą PWM [syntax=basic4gl]$regfile = "m8def.dat" $crystal = 1000000 Config Portb = Output Portb = &B11111111 Config Portd = Input Portd = &B1111111 Config Timer1 = Pwm , Pwm = 8 , Prescale = 1 , Compare A Pwm = Clear Down Pwm1a = 30...
juz jest ok - wszystko dziala jak powinno :) poprostu mialem PORTD zamiast PIND i od tylu podany config portow :) wasze rady jak najbardziej trafne... dlaczego konfid adc?? bo to jest takie urzadzonko 2 w 1 - centralka alarmu + termometr wewn./zewn. + miernik pozuiomu gazu LPG w zbiorniku i wstawilem tu caly konfig oprocz zmiennych z rozpedu... ale...
Witam Zbudowałem klawiaturę matrycową 4x3 oraz podłączyłem ją do mikroprocesora Atmega8. Napisałem program ( jestem początkujący w programowaniu , wszystkich komend nie znam) w Bascom'ie który ma odczytywać który switch w klawiaturze jest wciśnięty i przypisywać do niego pewną wartość. W zależności od tej wartości dioda podłączona do uC ma mignąć tyle...
o kurde... przegladalem wszystko ale jakos mi sie wymknelo :/ dzieki :) bardzo fajny programik :) mam jeszcze takie pytanie: (BASCOM AVR i atmega8) czy jest mozliwe wpisywanie wartosci z tabeli (DATA) ale nie do calego portu tylko do 7 jego pinow? np port D ma 8 bitow ale potrzebuje jego wejscie nr5 jako wejscie timera pracujacego jako counter a na...
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 pierwsze... Czy na 8 mhz kwarcu mogę sterowanie sensownie...
Witam Napisalem sobie pogramik menu w AVR na Atmege8 teraz chcial bym to przetetowac w Proteusie. Ale wywala mi blad. Jako ze to moja pierwsza proba to nie zabardzo wiem co mam zrobic. A mianowicie pogram wyglda tak: Config Portb = &11111111 Config Portc = &11111111 Config Portd = &11111000 Config Lcd = 16 * 2 Plus Alias Portd.0 Minus Alias...
Witam Jestem początkujacy w pisaniu programów. Do tej pory nie miałem do czynienia z pisaniem, ale chciałem się nauczyć i zacząłem próby w bascom avr. Zakupiłem książkę Pana Góreckiego, miała być dla początkujących i same podstawy, niestety nie rozumiem wielu wątków omawianych przez autora, a zwłaszcza sposobu działania itd. Szukałem już w googlach...
Witam Procesor przechodzi w stan Powerdown po ustalonym czasie kiedy zmienna L=1. Ustawiłem wybudzanie z przycisku (podanie 0 na int0) no i nie działa . Przepatrzyłem już chyba wszystkie tematy na forum i robiłem z milion kombinacji. Już nie mam pojęcia co robić czy to może być wina BASCOM, procesora , prosilbym o konkretne wskazówki jak ustawić aby...
Pisanie na kilkanaście minut i zobacz że lepiej to wygląda niż twoja sieczka. Do tego możesz teraz bardzo łatwo dodawać sobie kolejne efekty. Jak nie zadziała to sobie popraw :-) [syntax=basic4gl] $regfile = "m8def.dat" $crystal = 8000000 Config Portd.0 = Input Config Portd.1 = Input Config Portd.2 = Input Config Portd.3 = Input Config Portc = Output...
Dzięki za odpowiedź. Siedziałem nad tym kilka dni i spróbowałem chyba wszystkich możliwych konfiguracji SPI. Listing, który wrzuciłem powyżej po prostu trochę działał. Inne listingi, gdzie miałem skonfigurowane SS i wszystko inne tak jak trzeba nie chciały działać. po ile bajtów przydzieliłeś na stosy? Nie wiem jak to zrobić ręcznie. Myślałem, że bascom...
poprawiłem układ o ten dzielnik. do kodu też dołożyłem te zera a wynik nic praktycznie się nie poprawił (jedynie o ten dzielnik) [syntax=basic4gl]$regfile = "m8def.dat" $crystal = 8000000 ' -------- konfiguracja SPI Config Portd = Output Config Portc = Input PORTC = &B0000000 DDRC = &B0000000 Config Spi = Soft , Din = Portd.0 , Dout = Portd.4 , Ss =...
Witam, dopiero zaczynam swoją przygodę z programowaniem. Wykonałem już kilka udanych programów z wykorzystaniem portu D. Ale kiedy chciałem ustawić port C poleceniem "Config PORTC= &B1111111" od razu wyskoczył mi błąd "Variable can not be used with [DDRC] , in file(...)". Programuje w Bascom`ie. Uczyłem się stawiać pierwsze kroki z książką gdzie wszystko...
wielkie dzieki Dodano po 15 mam do ciebie jeszcze jedno pytanko napisalem program i cos mi robocik glupieje jak by wogle czujnik nie reagowal albo jest cos z ADC czy moze to byc przyczyna ze do ACC czujnika nie dalem dlawika 33uH i kondenatroka w szeregu zailsania owartosci 33uF??? ponizej podaje kod moze cos jest nie tego z programem: $regfile = "m8def.dat"...
Witam serdecznie, dopiero zaczynam programowanie, i ucze sie na bascom. Mam problem, dlaczego nie moge skonfigurowac portc, a portb i portd moge?? Pozdrawiam http://obrazki.elektroda.net/33_12284267... Regulamin, punkt 8.3. Przeniosłem z "Programowanie początkujący". Poprawiłem temat.
Witam serdecznie. Jako, że to mój pierwszy program ( aż wstyd się przyznać ;) ) i już mi wywala błędem ... Na początek kod programu : [syntax=BASCOM]$regfile = "m8def.dat" $crystal = 8000000 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Pinc.2 , Db5 = Pinc.3 , Db6 = Pinc.4 , Db7 = Pinc.5 , E = Pinc.1 , Rs = Pinc.0 Cls Config Portb = Input Config Portd.7...
Mógłby ktoś zerknąć na kod? Portami się nie przejmujcie. Z góry dzięki! $regfile = "m8def.dat" $crystal = 8000000 Config Lcdbus = 4 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Pb.4 , Db5 = Pb.5 , Db6 = Pb.6 , Db7 = Pb.7 , E = Pb.3 , Rs = Pb.2 Config Portd = Output Config 1wire = Portb.0 ' termometr ds18b20 Dim I As Integer 'zmienne do...
Witam Mam impulsy (ok.100 impulsów) trwające 0,4us i powtarzające się co 5us (PinB.0) impulsy "0" z wysokiego stanu do masy. W czasie trwania tego impulsu na PinD pojawia się 8 bitów, które chcę zapisać do tablicy a potem chce je przeglądać. Mam jakieś przerwania bo X się zwiększa i dane w tablicy też ale to nie te dane. Czy to jest wykonalne na Atmega168...
Witam Mam taki problem. Jestem początkującym programistą. Próbuję napisać program do atmegi8. Problem jest taki, że gdy próbuję skonfigurować porty PC.0 - PC.5 jako wejścia wyskakuje mi błąd, konfiguracja wygląda tak: Config Pinc.5 = Input Config Pinc.4 = Input Config Pinc.3 = Input Config Pinc.2 = Input Config Pinc.1 = Input Na czym mój błąd polega?
Witam kolegów mam taki problem: mimo różnych prób nie mogę ustawić na portd.0 stanu 1. Oto kod: Konfiguracja portów: [syntax=basic4gl]Config Pinb.1 = Output Config Pinb.2 = Output Config Pind.0 = Output Config Pind.1 = Output Config Pind.2 = Input Portb.1 = 0 Portb.2 = 0 Portd.1 = 0 Portd.0 = 1[/syntax] Obsługa portu: [syntax=basic4gl]If Grzalka = 1...
Witam wszystkich mam taki problem potrzebuję wykonać coś takiego: np: A=200 portb.1=a czyli 11001000 tylko port zmienia stany od 0 do 7 odczytując to np. z zmiennej a podobnie jak w magistrali 1wire wiem że to chyba jest proste ale nie mama pomysłu jak to zrobić w bascomie proszę o jakiś przykład. Wielkie dzięki za wszelkie sugestie i przykłady
Witam! Otoz mam taki problem: Zrobilem prosty programator na zlacze drukarkowe. Podlaczylem go tak: pin 6 > SCK pin7 > MOSI pin9 > RESET pin10 > MISO Laczne 18-25 > GND(po lewej stonie(jesli mam wglebienie na gorze)) Gdy podlaczam go do bascoma i wyszukuje mikrokontrolera otrzymuje widomosc podana w temacie posta. Wszystko sprawdzilem (jest prawidlowo...
portd atmega8 atmega8 portd atmega8 dioda portd
schemat alarm skoda octavia hotel sharp zasilanie segment
karta pioneer interfejs delphi
Mercedes Sprinter ASSYST – znaczenie klucza i -300 na wskaźnikach serwisowych Projekt maszyny BGA – konstrukcja, sterowanie, profile termiczne, optyka split-vision