Zajrzałem do skompilowanego pliku i widzę że kompilator w ogóle nie używa tu R2 i R3 więc mi je zostawił ;) Od pewnego czasu w Bascom do rejestrów można się odwoływać prosto z kodu. Ciekawe którą wersję Bascom masz. Pewnie znowu schody... U mnie program się kompiluje na 96% [syntax=vbnet] $regfile = "attiny13.dat" $crystal = 9600000 $hwstack = 16 $swstack...
Sprawdź miernikiem napięcie podawane z LM35 na ADC. Przepisałem ten kod tak by był przejrzystszy. Przy okazji zaoszczędziłem 8% pamięci. To nieistotne. Istotne natomiast jest to, że teraz widać, że układ wyłączy się jeśli odczyt na ADC będzie w zakresie 250-300. Powyżej lub poniżej tego zakresu krążek będzie świecił. [syntax=vbnet]'Program "elektronicznej...
Witam , wklejam kod jaki udało mi się wypocić. Miało być tak pięknie a wyszło jak zawsze :-( Ten twój kod jest oczywiście błędny. Po pierwsze, jeżeli stosujesz napięcie referencyjne wewnętrzne, to dla AtMega 8 wynosi ono 2.56V. Zatem poziom napięcia mierzonego podanego na dowolny pin ADC nie może przekroczyc tej wartości. Jeżeli jednak ten warunek...
No dobra, udalo ci sie polechtac moja proznosc wiec moze zrobimy tak. Opisze tutaj przykladowego mekafile-a z nastawieniem na WinAVR, Atmega8 i STK200 tak aby inni tez cos z tego mieli. W zasadzie wszystko jest opisane w angielszczyznie no ale jakby kto nie umial to daje po polsku. # Hey Emacs, this is a -*- makefile -*- #---------------------------------------...
https://obrazki.elektroda.pl/8115173800_... Witam, w ramach konkursu na urządzenie pomiarowe przedstawiam bardzo prosty miliamperomierz do testowania gniazd usb w smartfonach i innych urządzeniach. Konstrukcja jest śmiesznie prosta, oparta na mikrokontrolerze attiny13 i zawiera tylko kilka elementów niezbędnych do działania. Miernik...
Program napisany w BASCOM AVR i wyskakujące 3 błędy , mogę wiedzieć dlaczego one wyskakują podczas kompilacji , poniżej zamieszczam kodzik. 'podwójny woltomierz i amperomierz (dwa kanały pomiaru napięcia i dwa kanały pomiaru prądu 'UWAGA _ PONOWNE WGRANIE PROGRAMU SKASUJE WARTOŚCI WSP KOREKCJI Z PAMIECI EPROM '---------------------------------------...
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 '***************************************...
Witam Aby kozystac z przetwornikow ADC w ATmega8 nalezy je wczesniej skonfigurowac poleceniem Config ADC. W pomocy Bascom AVR podane sa trzy mozliwosci konfiguracji Reference - mozna ustawic OFF , AVCC lub INTERNAL. Co oznaczaja, do czego sluza poszczegolne pozycje ? Pozdrawiam
Witam. Ja przetwornik ADC ustawiam następująco: Config Adc = Single , Prescaler = Auto , Reference = Avcc lub Internal
A próbowałeś z parametrem "Reference = AVCC" ? Dla "Reference = off" pobierasz napięcie wzorcowe z Vref. 'The reference param may be : 'OFF : AREF, internal reference turned off 'AVCC : AVCC, with external capacitor at AREF pin 'INTERNAL : Internal 2.56 voltage reference with external capacitor ar AREF pin
A jest możliwość zapisu danych w do MS Excela lub do csv w postaci tabel? Dlaczego 11 bajtów przy czterech naraz (a nie 8)? Niestety nie ma możliwości zapisu do excel'a, i ja nie potrafie tego zrobić. Wykres można zapisać do pliku *.grf Po otwarciu go w notatniku wygląda tak: Kurve 255 1462 0.00000000000000E+0000 0.00000000000000E+0000 9.99999999999446E-0004...
Z określa czy panel został wciśnięty. A nawet można zrobić czujnik siły nacisku. Reference ustaw na AVCC. Teraz masz Internal i właśnie to jest problem.
PS Czy ktoś używał wewnętrznego czujnika temperatury na ADC8 ? Pytam, bo nie wiem jak interpretować wynik ADC8=357. Tu jest jakiś przykład w BASCOM'ie [url=http://wileczeknet.blogspot.com/201... kalibracja jest opisana w dokumencie [url=http://www.atmel.com/Images/doc8108... Calibration of the AVR's...
Dim ___rseed As Word ___rseed = Getadc(9) Lcd ___rseed Dlaczego na LCD cały czas jest 00? Atmega8, w obudowie DIP posiada 6 kanałów ADC... W obudowie TQFP i QFN jest ich 8. Ty próbujesz pobrać wartość z 10 kanału (liczymy od 0). Zamień 9 na wartość od 0 do 5 (podejrzewam, że Twoja Atmega jest w obudowie DIP): __rseed = Getadc(0) Oraz...
Config Adc = Single , Prescaler = Auto Brak tu konfiguracji napięcia odniesienia dla przetwornika Powinno być CONFIG ADC = single, PRESCALER = AUTO, REFERENCE = opt gdzie opt = OFF | AVCC | INTERNAL OFFnapięcie podaje się z zewnątrz (końcówka AREF), AVCCnapięciem odniesienia jest napięcie zasilające część analogową (między AREF a AGND należy dołączyć...
Troche jeszcze posiedziałem i napisałem taki działający kod [syntax=basic4gl]$regfile = "m8def.dat" $crystal = 1000000 Config Portb = Output Config Portc = Input Config Timer1 = Pwm , Pwm = 10 , Prescale = 1 , Compare A Pwm = Clear Down Config Adc = Free , Prescaler = 8 , Reference = Avcc 'tu próbowalem także reference = internal ; avcc; on Dim U As...
To coś źle przeczytałeś - dla wewnętrznego odn. mamy reference = internal ;] A dodam, że zwykle piszę w C :P PS. A co do rezysora, to ja nawet dałbym trochę więcej niż wyszło z obliczeń - przyciski są tylko 4, przetwornik w miarę dobry, a zdarza się, że wbudowane ZNO ma wartość mniejszą od typowej katalogowej. No i z ciut większą rezystancją nieco mniejszy...
Witam, proszę o pomoc: Stworzyłem taki kod: $regfile = "m8def.dat" $crystal = 8000000 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Pb.2 , Db5 = Pb.3 , Db6 = Pb.4 , Db7 = Pb.5 , E = Pb.0 , Rs = Pc.0 Cls Config Adc = Single , Prescaler = Auto , Reference = Internal Start Adc Dim W As Word Cursor Blink Do W = Getadc(0) W = Getadc(0)...
Witam Wszystkich!! Mam nietypowy problem.Oto listing: Dim W As Integer Dim Channel As Byte Config Adc = Single , Prescaler = Auto , Reference = Internal Declare Sub Volt Do Channel = 2 Start Adc W = Getadc(channel) Waitms 1 Stop Adc Cls Lcd "Temp=" ; W ; " C" Wait 1 Loop Gdy za wartosc channel wstawiam cyfre(2 np.kanal 2) to wszystko dziala ok. A jak...
$regfile = "m8def.dat" $crystal = 100000 Config Portb = &B11111111 Portb = &B11111111 Config Portd = &B11111111 Portd = &B11111111 Dim Czas As Word Config Adc = Single , Prescaler = Auto , Reference = Internal Enable Interrupts Start Adc Config Portb.1 = Output Led0 Alias Portb.0 Led1 Alias Portb.1 Do Czas = Getadc(5) For Czas = 0...
Siema. Otóż mam taki problem, podczas gdy kod ładowania i zerowania data DACx działa, np DACB1 = 0 waitus 500 DACB1 = 4095 (full zakresu) waitus 500 daje jakieś 2Khz pisku w słuchawkach co jest oznaką działania , to gdy ładuję próbki muzyki wav z karty na zasadzie DACxx = pwm nic się nie dzieje. Tu całt kod xmega: [syntax=basic4gl] '=======================================...
http://obrazki.elektroda.pl/3205208400_1... Sorry for only english . Here is a ATTiny connected as the above schematic. Clock must be the internal clock. Datasheet says 4.8/9.6MHz . I think 4.8 is enough. I want help for a program in Bascom .I see that ATTiny13 is not the perfect one for the task . May be ATTiny25 or ATTiny45 will be...
Dzień dobry, Chciał bym zrobić sobie prosty oscyloskop tyle że z wykorzystaniem uC Atmega8. Czy mógł by mi ktoś przetłumaczyć poniższy kod na język Bascom, lub chociaż objaśnić jego działanie? Kompletnie nic z tego nie rozumiem... Za przetłumaczenie na język Bascom oferuję 500pkt
Witam! Mam taki program: $regfile = "at26def.dat" $crystal = 1000000 Config Porta = &B11111111; Config Portb = &B00000000; Porta = &B11111111; Portb = &B00000000; Config Adc = Single , Prescaler = Auto , Reference = Internal Start Adc Dim W As Word Do W = Getadc(8) Porta = W Loop End Na porcie diody migają jak szalone, jedynie starsze...
W przytoczonym wzorze przeze mnie VBG = 1,22V. Nota odnośnie Atmega8L podaje 1.3V a specyfikacja do Atmega88V VBG = 1.1V. Stąd są te różnice. W każdym razie uzyskałem to o co mi chodziło. ..... Pojawił się problem ponieważ chcę odczytywać dodatkowo jeszcze zewnętrzne napięcie doprowadzone do jednego kanału przetwornika. Po umieszczeniu na początku programu...
Witam!!! Używam BASCOMA 1.11.7.4 i mam problem z kompilacją programu do obsługi ADC dla ATmega8535 z wykorzystaniem wewnętrznego źródła odniesienia. Jest on prawie identyczny jak ten dołączony w folderze BASCOMA – SAMPLES. $regfile = "m8535.dat Config Adc = Single , Prescaler = Auto , Reference = Internal Start Adc Dim W As Word , Channel As Byte...
W bascom to jest proste jak nie powiem co - ale trzeba udoskonaliś kawałek z przeliczaniem wartości z adc na czas wysokiego impulsu. Config Adc = Single , Prescaler = Auto , Reference = Internal Start Adc Dim Pls As Word Dim Czaswysimp As Single Do Pls = Getadc(0) 'pobór wartości z ADC Czaswysimp = Pls Czaswysimp = Czaswysimp / 200 'tu należy...
Przy kompilacji kodu na atmega8 wychodzą mi błędy;ADC_MUX entry not found in dat file. Ten sam kod działa na atmega16 oczywiście po zmianie wyprowadzeń. $regfile = "m8def.dat" $crystal = 8000000 Config Lcdpin = Pin , Rs = Portd.2 , E = Portd.3 , Db4 = Portd.5 , Db5 = Portd.6 , Db6 = Portd.7 , Db7 = Portd.0 Config Lcd = 16 * 2 Cls Cursor Off...
Męczysz tego kota :D Wystarczyłoby troszkę pomysłowości i sprawdziłbyś wszystko jak ja na tym filmie w kilka minut zamiast pisać posty. Niektórym się wydaje że Timery albo ADC się konfiguruje raz na początku kodu i już Amen. Wiele peryferii i urządzeń możesz sobie konfigurować wielokrotnie. Przy ADC trzeba brać poprawkę że pierwszy odczyt po zmianie...
Dzięki za obliczenia. Niestety, ale nie sprawdzę tego bo nie mam takiego rezystora. W mojej mieścinie nie ma żadnego sklepu elektronicznego :( Zrobiłem dzielnik napięcia i o ile dobrze zrozumiałem tekst z http://obrazki.elektroda.pl/6266525700_1... R2=100Ω i PR1=200Ω Posiłkowałem się programem mkAVR Calculator: http://obrazki.elektroda.pl/4601595300_1...
Sznowni forumowicze może znajdzie się ktoś kto pomoże rozwiązać mi następujący problem. Procek Atmega32 do portu A podłączone 2 elementy. Pierwszy to LM35 na kanale 0 a drugi to potencjometr na kanale 1. $regfile = "m32def.dat" Enable Interrupts Config Porta = Input Config Adc = Single , Prescaler = Auto , Reference = Internal Porta = &B11111110...
Zrobiłem w tym bałaganie trochę porządku. Program musi mieć logiczny przebieg. Nie można tu wrzucać instrukcji w dowolnej kolejności. Nie sprawdziłem czy działa. To Twoje zadanie. Zanim uruchomisz to go przeanalizuj. Najlepiej jak dopiszesz objaśnienia. $regfile = "m8def.dat" $crystal = 8000000 $baud = 9600 Dim Pomiar As Byte Dim Wart_nap...
Mam 2 atmegi. Jedna to atmega8 a druga atmega16. Używam Uart programowy i nie wiem dlaczego nie działa. Poniżej kod programu w bascomie dla nadajnika Config Adc = Single , Prescaler = Auto , Reference = Internal Config Pinb.0 = Output Config Pind.6 = Output Config Pind.7 = Output Config Pind.3 = Input Config Pind.4 = Output Portd.3 = 1 Open "Comd.3:1200,8,n,1"...
Program o który mi chodzi miałby działać tak: mierzę napięcie na jednym z pinów, jeśli jest ono mniejsze niż pewna określona wartość to na innym pinie pojawia się bardzo szybki przebieg prostokatny, powiedzmy 600kHz. Napięcie wzrasta- na wyjściu jest 0. Teoretycznie można by to zrealizować za pomoca przerwania: Maksymalna częstotliwość TINY13 to 9,6Mhz....
co do pierwszej odpowiedzi to: mógłbyś mi powiedzieć gdzie dokładniej bo jakoś znaleźć nie mogłem, ktoś też mi mówił że widział na jakiejś stronie coś podobnego, ale jak dotąd ja tego nie znalazłem będe wdzięczny a co do drugiej odpowiedzi to: po co wogóle robić sobie woltomierz można kupić gotowy??? ja poprostu eksperymentuje z uC i właśnie robie sobie...
Chcę użyć przetwornika AD w Atmega8. Programuje w bascomie AVR. Jest tam funkcja GetADC i nie mam żadnego problemu z jej uzyciem, ale ma ona taka zasadncizą wadę, że dziala tylko w trybie single i po jej wywołaniu czeka aż konwersja zostanie zakończona. (Jest to dość naturalne, bo przecież musi zwrócić wynik konwersji). Zależało by mi, aby uniknąć tego...
Nawiązując do wcześniejszej wypowiedzi chce zbudować generator regulowany za pomocą 2 potencjometrów. Jednym chcę regulować czas trwania logicznej 1 a drugim potencjometrem czas trwania logicznego 0. Czasy obu sygnałów regulowane w przedziale 0,05ms - 5ms. [syntax=basic] $regfile = "m16def.dat" $crystal = 16000000 Config Lcdbus = 4 Config Lcd = 20 *...
ATTiny13, do pinu 2 (PB3) podłączony jest dzielnik napięcia mierzący napięcie zasilania. Po spadku napięcia poniżej zadanej wartości powinna nastąpić sygnalizacja poprzez "wywołanie 3 mignięć" na pinie 5 (PB0). Poziom napięcia przy, którym ma nastąpić sygnalizacja ustalany jest przez zapis wartości napięcia zasiania do EEPROMu po zwarciu pinu 1 (PB%)...
Witam, chciałbym skorzystać z projektu z linku http://diy.elektroda.eu/interaktywna-pod... na użytek mojego modelu samochodu RC do mierzenia temperatury silnika szczotkowego żeby go nie przegrzać powyżej 80 stopni i mam pytanie: 1) Co trzeba zmienić w programie jeśli mam ATtiny13 20Mhz (twórca projektu użył ATTiny13V 10MHz) żeby dobrze...
Nareszcie twórcza odpowieć. Dięki wielkie myślę że coś z tym zrobię chociarz nie ukrywam że wolałbym ręczny ruch potencjometru jako priorytet lecz ten program a właściwie atmega musi zmieścić jeszcze więcej funkcji. A jak zrobić żeby flaga była ustawiana dopiero po odebraniu komunikatu? Dodano po 2 Przepraszam za odgrzewanie tematu, napisałem program...
Witam posiadam napisany program w języku Bascom. Mój problem wiąże się z tym że mam problem z jego kompilacją a dokładniej z jedną linijką programu. Czy może mi ktoś pomóc wyeliminować ten błąd. Bascom wskazuje że błędem jest Dim Wart_nap As String * [syntax=basic4gl] 'dopisałem funkcja wathdog czyli autoreset gdy procesor nir odpowiada dłużej niż 2...
$regfile = "m8def.dat" 'informuje kompilator o pliku 'dyrektyw mikrokontrolera $crystal = 8000000 'informuje kompilator 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 Config Adc = Single , Prescaler = Auto , Reference = Internal Config Watchdog = 2048 'reset wystąpi...
W sumie znalazłem równoległy projekt autorstwa ZbeeGin . Bardzo fajna sprawa :) ' VU meter na ATmega8 ' (c) by ZbeeGin / Reset soft '---------------------------------------... $regfile = "m8def.dat" $crystal = 1000000 Config Portd = &B11111111 Config Portb = &B00000011 Config Adc = Single , Prescaler = Auto , Reference = Internal Start...
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...
mam kilka pytań odnośnie bascoma i atmegi8 wypróbowałem sobie przetwornik no i właśnie mam problem tylko prosze mi wszystko wytłumaczyć łopatologicznie bo ja dopiero zaczynam 1. do czego potrzebny jest ten plik m8def, bez niego przetwornik nie dziła i czy może wskazane byłoby używać tego pliku w innych programach. 2. Użyłem programu jak poniżej. Zauważyłem...
PRZEPRASZAM, POPEŁNIŁEM BŁĄD !!! WZÓR JEST "Vref/1023", a nie, jak pisałem odwrotnie Atmega8 żeby mierzyć napięcie musi mieć jakieś odniesienie - napięcie odniesienia czy też inaczej referencyjne. Są trzy możliwości - napięcie referencyjne to: - napięcie zasilania AVCC (około 5V) - napięcie odniesienia wewnętrzne 2,65V - napięcie referencyjne z zewnątrz,...
Dzień dobry, Nie mogę dojść dlaczego emulator DS2050 działa na wewnętrznym oscylatorze 8Mhz a na kwarcu 8MHz zawiesza się i resetuje gdy tylko chcę odczytać z niego wartości. Kondensatory przy kwarcu 22pF. Fusebity: gdy clock 111101:Ext (czyli kwarc) to nie działa poprawnie. Próbowałem wszystkich ustawień kwarcu. Dlaczego tak się dzieje ? [syntax=Bascom]...
Witam mam problem: napisałem program do regulacji pwm wg czujnika haltronowego. $regfile = "m8def.dat" $crystal = 8000000 Config Timer1 = Pwm , Pwm = 10 , Compare A Pwm = Clear Down , Compare B Pwm = Disconnect , Prescale = 1 Config Lcdpin = Pin , Db4 = Portd.2 , Db5 = Portd.3 , Db6 = Portd.4 , Db7 = Portd.6 , E = Portd.1 , Rs = Portd.0 Config...
Mam taki problem, potrzebowałem na szybko coś zrobic do obserwacji pradu i napiecia, jak szybko i nieskomplikowanie to bascom napisałem taki programik Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portd.3 , Db7 = Portd.4 , E = Portc.4 , Rs = Portc.5 Config Adc = Free , Prescaler = Auto , Reference = Internal Dim Adc0...
Wiec trochę to trwało by cokolwiek napisać ( brak programatora działającego z bascom trochę mnie stopował) Zrobiłem juz prosty algorytm tego co potrzeba zrobić i podzieliłem prace na 4 etapy: 1) wejścia adc dla map sensora ( zrobione ;) 2 wejście dla enkodera ( muszę zakupić jakiś impulsator i napisać parę linijek) 3 pomiar czasu pracy każdego z wtryskiwaczy....
internal reference reference internal internal reference voltage
podłączenie migomat bester schemat obwodu świetlówki otwartego oprogramowania
jakie elektronarzędzia wybrać jakie elektronarzędzia wybrać
Sonoff nie wysyła temperatury na serwer - przyczyny Wymiary pasków do Technics RS-EH600
