Jeśli kolega ma zamiar pisać poważne programy a z objętości kodu można wywnioskować że hello world już kolega przeskoczył najwyższa pora by przesiąść się do bardziej profesjonalnego środowiska . Wydanie prawie 500PLN na Bascoma to strata pieniędzy . Za taką sumę może kolega zakupić np DRAGONA I XPLAINA z 1284p lub oryginalny JTAG ICE3 i ściągnąć w pełni...
czegoś nie rozumie , przecież nawet dość stare wersje Bascoma obsługiwały C2051 , wystarczy w opcjach ustawiać uC na który chcesz pisać program proponuje zapoznaj się z konfiguracją Bascoma http://www.edw.com.pl/pdf/k10/52_04.pdf
Prawdopodobnie kompilujesz program przy ustawieniu niewłaściwego uP doclowego. Użyj na początku programu $regfile.
Nie dolaczyles pliku z definicja jaki uc uzywasz. $regfile = "m8def.dat" Pozdro Dexter
Spróbuj skompilować ten programik pod konkretny mikrokontroler. W Bascomie domyślenie masz ustawione AT90S2313. Użyj dyrektywy: $regfile = "m8def.dat" - dla ATMega8, $regfile = "2313def.dat" - dla AT90S2313, Może pomoże :)
Witam. Ustaw prawidłowy scalak powinno być : $regfile = "m644pdef.Dat"
Określenie "program" jest zbyt na wyrost ;-) Proszę bardzo : [syntax=Bascom] $regfile = "ATtiny13.dat" $crystal = 4800000 Config Pinb.2 = Output 'przekaznik Przekaznik Alias Portb.2 Wait 60 Set Przekaznik Waitms 500 Reset Przekaznik Do Loop End [/syntax]
Czytam, szukam, i nic nie rozumiem.... Dodano po 24 Udało mi się ;) Nie wiedziałem że bity w dyrektywie &B liczone są od tyłu ;) [syntax=Bascom]$regfile = "m32def.dat" $crystal = 16000000 $hwstack = 40 $swstack = 16 $framesize = 32 dim adc1 as byte Admux = &B01100000 Adcsra = &B11100100 do kanal1 = adch loop[/syntax] Dokumentacja Atmega32 str. 212 Temat...
zwarciem zasilania nie miales prawa uszkodzic wlasciwie to operujac napieciem 5V mozesz na chwile kazde wyprowadzenie zewrzec zarowno do + jak - nigdy mi nic nie padlo , dlaczego nie napiszesz prstego programu na miganie LED? w bascom : $regfile = "m8def.dat" $crystal = 1000000 Config Portb = Output Do Portb = 255 Wait 1 Portb = 0 Wait 1 Loop End
W przeglądanym pliku w/g mnie brakuje informacji dla kompilatora jakiego procka dotyczy - np" $regfile=" ". Trzeba podać jakiego używasz procka.
Jak dopisałem na początku: $regfile = "attiny2313.dat" to zaczęło się kompilować.
Zmień to: $regfile = "2313def.dat" na to: $regfile = "attiny2313.dat" i obserwuj rezultat :)
A czy dodałeś plik definicji rejestrów dla procka którego używasz? $regfile = "m8535.dat" dla atmega8535 (nie wiem jakiego proca używasz)
witam . Dlaczego nie mogę skompilować tj; zmienna = zmienna / 4 kod bascom $regfile = "attiny13.dat" 'typ proca $crystal = 800000 Config Adc = Single , Prescaler = Auto , Reference = Avcc Config Timer0 = Pwm , Prescale = 8 , Compare B Pwm = Clear Up Dim B As Iram Word Config Portb.0 = Output Portb.0 = 0 Config Portb.1 = Output Portb.1 = 0 Dim Zmienna...
Proszę bardzo pewnie jest zły ale daje go: [syntax=bascom]$regfile = "m16def.DAT" $crystal = 1000000 Config Portd = Output Config Portb = Output Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portd.4 , Db5 = Portd.5 , Db6 = Portd.6 , Db7 = Portd.7 , E = Portb.2 , Rs = Portb.0 Initlcd Cls Lcd "cos tam" End[/syntax] Dodam, że ten config lcd i config...
Witam ! Przetestowałem ten kod: $regfile = "m8def.dat" $crystal = 1000000 Config Lcd = 20 * 4 Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portc.1 , Db7 = Portc , E = Portc.4 , Rs = Portc.5 Lcd "witam!" Fourthline Lcd "4" End i wszystko jest OK, program się kompiluje Prawdopodobnie powodem nie kompilowania...
A co wpisałeś w $regfile = ?
Witam Mam mały problem z BTM-222. Jeśli podłącze go do PC poprzez RS232( stosuje ST3232) i uruchomię HyperTerminal wysyłam do BT komendy AT,ATI1 oraz pozostałe np. ATB? to modem odpowiada prawidłowo. Jeśli podłącze go do Atmegi32L i wysyłam komendy AT i ATI1 to modem działa i odpowiada "OK". Natomiast jeśli wydaje inne komendy np. ATB? to w odpowiedzi...
Pierwsze co zrobiłem, to zrealizowałem Twój pierwszy pomysł, i to najprostrzej możliwej postaci (aż wstyd!). Wżuciłem Attiny13, i program tak prosty że aż śmieszny - Działa :D Zostawiłem to na razie tak jak jest, i jeśli będzie się dobrze sprawować, nie będe już poprawiał. Dzięki! [syntax=Bascom] $regfile = "attiny13.dat" $crystal = 9600000 $hwstack...
Witam Moja propozycja jest taka sciagnij note katalogowa z atmela tam masz spis rejestrow z adresami tego procka ,utworz swoj plik np. atm168DEF.dat a w nim wpisz te rejestry(na podstawie jakiegos innego procka) . W pliku *.bas na poczatku wstaw $regfile ="atm168DEF.dat" i powinno dzialac Pozdrawiam
Nazwa=adres hex,wartość początkowa 89C2051.dat: [BIT] ACC = E0 , 00 B = F0 , 00 IE = A8 , 00 IP = B8 , 00 P1 = 90 , FF P3 = B0 , FF PSW = D0 , 00 SCON = 98 , 00 TCON = 88 , 00 [BYTE] SP = 81 DPL = 82 , 00 DPH = 83 , 00 PCON = 87 , 00 TMOD = 89 , 00 TL0 = 8A , 00 TL1 = 8B , 00 TH0 = 8C , 00 TH1 = 8D , 00 SBUF = 99 , 00 [MISC] up=AT89C2051 IRAM = 128...
Witam, Zakupiłem sobie ATmege16 testowałem jej działanie. Mogę odczytać jej sygnaturę, mogę ustawić taktowanie, mogę wgrać program. Problem jestt w tym, że jakkolwiek bym nie ustawił stanu wyjść, procesor nie wystawia ani 1 ani 0. Dokładniej: Podłączyłem diodę anodą do PB.0 i katodę przez R 100Ω. Program: [syntax=bascom] $regfile = "m16adef.dat"...
, przetłumacz poniższy kod z BASCOM AVR na Arduino Uno: $regfile = "attiny2313.dat" $crystal = 8000000 Dim A As Byte a=0 Config Pind.6 = Output led Alias Portd.6 led= 0 Config Pind.0 = Input Portd.0 = 1 Sw Alias Pind.0 do if a >1 then a=0 if sw=0 then bitwait sw, set incr a End If if a=1 then toggle led waitms 100 else led=0 end if loop end Przekształcanie...
Wstaw to i powinno się udać. Nie chce mi sie tego tłumaczyć setny raz więc chyba poświecę temu zagadnieniu raz jedną stronę na swojej witrynie i będę tylko linkował :D [syntax=vbnet]$Regfile="attiny13a.dat" $crystal=9600000 $hwstack = 4 $swstack = 2 $framesize = 20[/syntax]
Przepraszam. No to zacznę od początku. Układ według tego schematu: [url=http://easyeda.com/export_TfxrJ1jd7... Na komputerze też nie chce dodać do postu. Musiałem tak. A oto kod: [syntax=Bascom] $regfile = "m8def.dat" ' $crystal = 1000000 Config...
Ale kiedy chciałem ustawić port C poleceniem "Config PORTC= &B1111111" od razu wyskoczył mi błąd "Variable can not be used with Niech kolega poczyta o $regfile w helpie.
Moim zdaniem nie zadeklarowałeś proca w programie czyli: $regfile = "m8def.dat" Ale mogę się mylić bo jestem początkujący w tym temacie :D Bonmis
Pobierz plik z załącznika. Rozpakuj go i wklej do głównego folderu programu. Na samym początku programu wpisz: $regfile = "Attiny13.dat" I nic więcej nie musisz robić.
at90s2313 juz nie produkuja. Teraz jest attiny2313, ktory potrafi wiecej niz stara wersja. Wiec problemow raczej nie powinienes miec. Jak to jest bascom to oczywiscie $regfile musisz zmienic. Najlepiej zapodaj caly kod to postaram sie go dopasowac
Witam, pokombinowałem i wreszcie działa. Niekiedy nie odbiera dobrze, ale to pewnie wynika z tego, że sygnał może być odbity i nie dociera cała ramka. [syntax=bascom]$regfile = "m16def.dat" $crystal = 8000000 $baud = 9600 Config Int0 = Falling On Int0 Rc5 Config Rc5 = Pind.2 , Wait = 12000 Dim Address As Byte Dim Command As Byte Dim Odebrano As Bit...
....przeniosłem się na atmega32.... .... Hmmm, przesiadłeś się na ATmega32 a kompilujesz pod ATmega328p :?: To są dwa "troszkę" różne procesory. A programator jak podłączasz :?:
Kolego tu masz krótką notę z którą możesz się zapoznać: https://ww1.microchip.com/downloads/en/A... Ale dla ciebie najistotniejsza informacja to drugi akapit: [syntax=Nota]The ATtiny24A/44A/84A is a functionally identical, drop-in replacement for the ATtiny24/44/84. All devices are subject to the same qualification process and same set...
Witam Poprawiłem parę elementów i układ działa jak należy. Odłączanie uzyskałem na przekaźniku. Mam jednak kolejny problem. Korzystam z przetwornika ADC na PA0. Schemat podłączania brałem z kursu BASCOM. Jednak w tym przypadku mi nie działa. Mógłby mnie ktoś nakierować czy taki schemat ma możliwość poprawnej pracy? Obecnie wyjście POT to potencjometr...
Zaczynam dopiero programować i mam problem z TIMER = COUNTER . Chce by o zliczeniu ilości impulsów procesor wykonał np: zmianę stanu portu lub coś innego . To jest program : [syntax=bascom] $regfile = "m32def.dat" $crystal = 8000000 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Porta.2 , Db5 = Porta.3 , Db6 = Porta.4 , Db7 = Porta.5 , E = Porta.1...
[syntax=bascom] $regfile = "attiny2313.dat" $crystal = 4000000 Config Portb = &B11111111 Portb = &B11111111 Config Portd = &B11111100 Portd = &B11111111 Dim Jednostki As Byte , Dziesiatki As Byte , Zmiana As Bit , Pomoc As Byte Jednostki = 0 Dziesiatki = 0 Pomoc = 0 Do Waitms 10 Toggle Zmiana Incr Pomoc If Pomoc = 10 Then Pomoc = 0 Incr Jednostki End...
witam do sterowania statecznikiem 1-10v z powodzeniem wykorzystuję schemat ze strony: http://obrazki.elektroda.pl/8153193400_1... Przykładowy kod w bascom: [syntax=bascom]$regfile = "2313def.dat" $crystal = 4000000 Config Sda = Portd.5 Config Scl = Portd.4 Config I2cdelay = 10 Config Pind.6 = Output Const Pcf8591write = &H90 Const Pcf8591read...
Dobra, poddaje się. Szukałem, czytałem, kombinowałem i nic. W wypadku 1 dioda podwójna świeci cały czas, a tamte migają. W wypadku 2, ta nie świeci, a tamte dwie migają. Niezależnie od włącznika, który przecież jest wyjściem w stanie 1. Nie rozumiem totalnie co się dzieje. Kod1: [syntax=Bascom][/syntax] $regfile = "m8def.dat" ' $crystal = 1000000 Config...
Jtag możesz wyłączyć nawet w kodzie: [syntax=vbnet]$regfile = "m32adef.dat" $crystal = 8000000 $hwstack = 64 $swstack = 32 $framesize = 32 Disable Jtag[/syntax] Do tego wszystkie aliasy przycisków powinny się odnosić do PIN a nie PORT. W niektórych masz PINA i tam jest dobrze ale niektóre masz PORTD i tam zawsze mikrokontroler będzie odczytywał 0.
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...
Masz błąd na schemacie. AVR nie mają pull-down, więc przycisk powinien zwierać z masą (minusem baterii). Program też nie wydaje się dobry, choć nie znam Bascom. Na moje oko trzeba tak: $regfile = "m8def.dat" $crystal = 8000000 Config Portb = Output Config Portd = Output Config Portd.4 = Input P Alias Pind.4 D Alias Portb.6 Set Portd.4 Do If...
Mam problem z wysyłaniem i odbieraniem danych przez port RS232. Na płytcie mam układ ATmega16. Program piszę w BASCOM-ie: $regfile = "m16def.dat" $crystal = 11059200 $baud = 9600 'lub 19200 Do Print "TEST" Loop End I niestety nie mam efektów. Czy może mi ktoś w tym problemie pomóc? PODAJE LINK Z SCHEMATEM MOJEJ PŁYTKI: http://obrazki.elektroda.net/32_11528802...
4 diody to jest to co napisałem ale kurcze nie działa [syntax=bascom]" $regfile = "attiny2313.dat" $crystal = 4000000 Config Portd = Input Portd = &B10000000 Config Portb = Output Portb = &B0000000 Do If Pind.0 = 0 Then Portb.0 = 1 Pind.1 = 1 End If If Pind.0 = 1 And Pind.1 = 1 Then Portb.1 = 1 Portb.0 = 0 Pind.2 = 1 End If If Pind.0 = 1 And Pind.1...
Do Autora wątku: Proszę. Nie taki diabeł straszny. Nie napisałeś jaki to procesor więc napisałem przykład dla Mega8. Funkcja odczytuje ADC(0-5) z włączony ADLAR czyli tylko osiem bitów. Wynik od 0 do 255. Zapewne działa nawet w symulatorze. To taki podstawowy. Można nie czekać a ustawić przerwanie, ale to pewnie jeszcze nie dla Ciebie :D Wpisz w Google...
Tam nic nie trzeba zmieniać. Wystarczyło podłączyć do identycznych linii LCD i DS18B20 i zmienić $regfile = "Attiny2313.dat" na $regfile = "mega8.dat"
Po pierwsze jakie czasy chcesz obliczać i jakie przerwania po co ??? To jest bascom nie assembler, deklarujesz na wstępie programu prędkość kwarcu a kompilator troszczy się o resztę tj. dajesz deklarację $regfile = "m8def.dat" $crystal = 12000000 Po drugie, procedura obsługi wyświetlaczy LCD (mowa tu o alfanumerycznych HD44780) jest w BASCOM zaimplementowana...
Znalazłem rozwiązanie mojego problemu :) Okazało się że instrukcja Bascomowa odczytu portu mikrokontrolera korzysta z ramu, a Attini nie ma ramu! Trzeba sięgnąc do asemblera no i działa. Oto przykład jak to zrobić w Bascomie: $regfile = "at12.def.dat" $crystal = 1000000 $tiny $noramclear do !sbic pinb,0 !jmp koniec set portb.1 waitms 250 reset portb.1...
Nie wiem skąd takie bzdury przeczytałeś - te procesory nie mają bitu kompatybilności, ale z punktu widzenia rejestrów Attiny2313 to prawie to samo co poczciwy 90s2313. Programy w Bascom powinny działać po zmianie $regfile na taki odpowiedni dla procesora Attiny2313: $regfile = "attiny2313.dat"
Nnajprawdopodobniej nie ominie Cię instalacja nowszej wersji Bascom-a. Wersja 1.11.6.4 wg mnie powinna obsługiwać ten układ bez problemu. Spróbój jeszcze zamiast wybierać układ w ustawieniach wpisać w programie jako pierwszą, taką linijkę: $regfile = "m8def.dat"
BASCOM jednak wymaga dla Atmega8A wpisania $regfile "m8 a def.dat" więc coś w tym jest. Nie widzę jednak nic szczególnego dla Atmega8L w opcjach BASCOMa.
Cześć. Proszę ten poradnik będzie dla Ciebie pomocny. Czy to już tablica? Gdzie ją umieścić? Tak, to jest tablica. Kompilator sam załatwi sprawę. [syntax=vbnet]$regfile = "m48def.dat" $crystal = 4000000 $baud = 19200 $hwstack = 32 $swstack = 10 $framesize = 40 Dim B1 As Byte , I As Integer B1 = Lookup(2 , Dta) Print B1 I = Lookup(0 , Dta2) Print I End...
Witam Jestem w trakcie tworzenia projektu mającego na celu zczytywanie temperatury z magistrali 1Wire i przesyłanie dalej za pomocą Ethernetu (Wiznet w3100a). Udało mi się skonfigurować Wizneta, pingował się świetnie. Ponieważ miałem problemy z utworzeniem serwera postanowiłem dodać kilka diodek za pomocą których mógłbym debugować program. Kiedy wgrałem...
Witam. Dzięki temu $regfile = "M8DEF.dat" kompilator wie z jakim procesorem ma do czynienia. Jeżeli tego nie miałeś w pierwotnym programie, to kompilator brał tę informację z ustawienia w Opcjach. A pewnie był tam wpisany procesor, który nie miał timera nr 2. To samo z przerwaniami - wektor przerwań od timera nr 0 jest różny dla różnych typów procesorów...
$regfile = "at26def.dat"
Pootwieraj wszystkie i szukaj jednego z deklaracją mikrokontrolera. Tylko jeden będzie miał wpis i tylko ten się kompiluje. $nocompile
Bardzo bym sie zdziwil gdyby ten program w jego oryginalnej postaci lub nawet z pozniejszymi poprawkami mogl funkcjoniwac! Po pierwsze: Jest on nie pelny, nie tylko brak jak juz ktoz zauwazyl, deklaracji rodzaju, typu uC i jego cyklu pracy (czestotliwosci). Pomimo faktu ze nie ma w programie pomiarow czasu to ta informacja nie moze byc pominieta. W...
masz gotowca, chyba prościej nie można :) 'sterownik do wentylatora na ATTINY15 'PMW - port PB.1 sterowany napięciem z PB.2 '---------------------------------------... '$tiny $regfile = "At15def.dat" $crystal = 1600000 Ddrb.1 = 1 Ddrb.2 = 0 Tccr1 = &B11110010 Admux = &B00100001 Adcsr = &B11100011 '---------------------------------------...
podaj fusebity. Tam jest problem . Po zmianie procka zmieniles pierwsza linijke programu polecenie $regfile ?
Ponieważ asemblerowe operatory high() i low() są także jednymi z zatrzeżonych funkcji języka BASCOM Basic, i tak niestety są rozpoznawane, trzeba użyć innego "sposobu": $regfile = "m8def.dat" Const _liczba = &HAA55 Const _liczba2 = _liczba / 256 $asm ldi R16, _liczba ldi R17, _liczba2 $end Asm Tym samym do R16 trafia &H55 a do R17 &HAA. Jeśli...
Witam Niestety tamten sposób - program miał wade, przykładowo kiedy jeden z kanałów zmienił swój stan kilkukrotnie stan licznika był zmieniany w jednym kierunku (w zależności od stanu drugiego kanału) prostymi słowy wahający się enkoder generował błędy rozwiązałem ten problem ustawiając wejście by reagowało na zbocze rosnące i opadające. [syntax=bascom]$regfile...
I popraw program : [syntax=basic4gl] $regfile = "m32def.dat" $crystal = 8000000 Config Portd.3 = Output 'buzzer Portd.3 = 0 Do Wait 1 Portd.3 = 1 Wait 1 Portd.3 = 0 Wait1 Portd.3 = 1 Wait 1 Portd.3 = 0 Loop End [/syntax] albo lepiej tak: [syntax=basic4gl]$regfile = "m32def.dat" $crystal = 8000000 Config Portd.3 = Output 'buzzer Do Wait 1 Toggle Portd.3...
Nie wiem czy to jest ważne. Program skompilowany dla AT89S2051, a autor zastosował AT89C2051. Programowo to nie problem, ale sprzętowo może się pojawić. Ta linia o której pisze Gienek powstała tak: W Bascomie 8051 są pliki demo, edytowałem jeden z plików demo, a tam było: $regfile = "89s4051.dat" , przerobiłem na $regfile = "89s2051.dat" i wkleiłem...
Cześć. Z góry uprzedzam, że przeszukałem tematy poświęcone temu problemowi (a jest ich całkiem sporo), jednakże nie udało mi się uporać z moim (zapewne trywialnym) problemem: Schemat i zasada działania są z założenia bardzo proste. Mikrokontroler ma ustawiony stan 1 na porcie D3 który jest połączony z bazą tranzystora. Stabilizator MCP1702 zasila Atmegę...
1. sprawdź taktowanie np. dając miganie diodą co 1s z wykorzystaniem polecenia wait 2. czy testowałeś mój program po zmianie odpowiednich wartości (regfile i crystal)?
Na wstępie proszę moderatora o przeniesienie tematu do odpowiedniego działu, jeżeli ten jest zły. Witam Mam problem z obsługą zegara RTC PCF8563. Otóż po wgraniu kodu do ATmegi pojawiają się różne dziwne rzeczy, np. godzina 80:80 lub 80:102 itp. Czym to może być spowodowane? Dodam, że wszystko było robione dokładnie ze schematem w datasheet. Póki co...
Niestety nic z tego nie wyszło. Po wpisaniu powyższego programu i zmianie $regfile na "attiny45.dat" BASCOM wskazuje na błędy: "Error: 46 Line: 7 Assignment error [TCCR1a: 0 &B00010001; 112] Error: 46 Line: 8 Assignment error [TCCR1b: 0 &B10000011; 112]" Jeżeli wpiszę $regfile = "attiny26.dat", wtedy jest OK. Jeżeli chcę normalnie w BASCOMIE uruchomić...
Może sprawdzić połączenia? Kolejny bascomowiec definiujący wszystko w menu... a $regfile, a $baud? a $crystal?
Dodaj na początku programu: $regfile = "m8def.dat"
Wklej ten kod do programu, ustaw w ustawieniach LCD, i wgraj do procka. $regfile = "2313def.dat" $crystal = 8000000 Config Lcd = 16 * 2 Do Lcd "witam" Lowerline Lcd "Bascom" Wait 3 Cls Loop End Dodano po 6 Sprawdź połączenie miedzy Prockiem a LCD. Nie wiem jak jest na tej płytce ale jak montuje wyświetlacz na płytce uniwersalnej...
Witam Mam problem co mam dalej zrobić użyłem tego schematu: http://obrazki.elektroda.pl/6887134200_1... Rezystory dałem 1%, wyplułem na wyświetlacz wartość napięcia porównując do miernika. Muszę odczytać temp. od 0 - 50 stopni. Przy rezystorze 100 om powinienem mieć 0V, a wskazuje mi 0,15 V. W temp. pokojowej wskazuję mi 0.56V a na mierniku...
https://obrazki.elektroda.pl/4901753200_... Witam, Prezentowana konstrukcja, to bardzo proste urządzonko, które cyklicznie co 24 godziny restartuje podłączone do niego urządzenie. W moim przypadku są to przepływomierze zainstalowane na sieci wodociągowej, które z racji swojego wieku średnio raz na 30 – 40 godzin się zawieszają...
Witam, mam podłączony enkoder inkrementalny do AVR Atmega128, do wejść INT0 i INT1 (PIND0 i 1) Wszystko się fajnie liczy i wyświetla na LCD, ale przy szybszej regulacji enkoderem, licznik się gubi i nie liczy tylko oscyluje w granicach ostatniej liczby. Tak jakby za wolno pracował. W czym jest problem? Wielki dzięki!!! a oto kod BASCOM: $regfile = "m128def.dat"...
A ja polecam używanie dyrektywy $regfile = "" - wtedy typ procesora związany jest z programem, a nie z ustawieniami środowiska. Czyli dodaj w pierwszej linijce programu [syntax=basic4gl] $regfile = "m8def.dat" [/syntax]
Witam. Zbudowałem układ do 16 diod. Diody są podłączone do portu przez rezystor, diody są na przemian 1 niebieska druga czerwona itd... Układ działa poprawnie. Steruje 3 portami, jednak mój problem polega na tym, że czerwone diody cały czas się żarzą, a w przypadku gdy są sterowane normalnie się palą. Co do układu to zasilam go 5 V do resetu podciągnięty...
Zmieniłem program na ATmega8 ( bo ATmega16 nie posiadam ) [syntax=basic4gl] '$regfile = "m16def.dat" $regfile = "m8def.DAT" $crystal = 8000000 Config Pind.7 = Input Config Pinc.0 = Output Set Portc.0 Set Portd.7 Do If Pind.7 = 0 Then Portc.0 = 0 Else Portc.0 = 1 End If Loop End [/syntax] wgrałem, program działa dobrze. Bascom DEMO 2.0.7.1
Nie mogę uruchomić przerwań w tym procesorze. Przerwania od timer0 nie dzialają ani w symulatorze Bascom AVR, ani po zaprogramowaniu proca. Poniżej kod programu. A jak wpisałeś typ procesora. Powinno być $regfile = "m8515def.dat"
Witam! Mam pytanie, bo również potrzebuję sterować silnikiem krokowym, potrzebuje mieć możliwość wyboru obrotów prawo, lub w lewo. napisalem program w bascomie (dopiero sie ucze) na Attiny 2313, ale mam problem bo w momencie kiedy nie wciskam żadnego przycisku silnik drga (prawo lewo) dlaczego? poniżej plik źródłowy w bascom $regfile = "attiny2313.dat"...
Witam. Czy to jest prawidłowa deklaracja mikrokontrolera ATtiny2313 ? [syntax=basic4gl]$regfile = "2313def.dat"[/syntax]
1. Jeśli używasz czyjegoś kodu, bądź łaskawy nie wycinać z niego informacji o licencji i prawach autorskich. '=======================================... '= MAX7456 Video overlay Demo = '= By EvertDekker.com 2009 = '= Created with Bascom-Avr: 1.11.9.3.001 license = '= No copyright for private use = '= Version 1.1 = '=======================================...
A jest $regfile "m8515.dat" ? Zresztą może Bascom nie chce rejestru w if. Może tak: Dim moja _flaga as bit moja _flaga= ADCSRA.FE if moja_flaga=0 then
'///////////////////////////////////////... '// Police Alarm With ATmega8 (Use 4%) // '// Compiler: Bascom 1.11.9.0 // '// Programmer: Behnam zakizadeh // '// Web: www.avr64.com // '// Email: Behnamzaki(at)hotmail.com // '///////////////////////////////////////...
Nie martw się nie jesteś sam ja też kupiłem Atmege8A i po zaprogramowaniu nie działa. :( Choć wszyscy zapewniają ,że nie ma między nimi różnicy!!! , jak widać jest!!! Programuję w Bascomie ,myślę że przyczyną będzie plik regfile. Jak dotąd nie mogę nic poradzić ,też mi leży kilka sztuk i się kurzą :(
$regfile = "attiny2313.DAT" lub zaznaczenie uC w opcjach kompilatora. Dodatkowo być może przyjdzie się zmagać z "fusami" bo Tiny 2313 ma preskaler ustawiony do podziału zegara przez 8. Przy częstotliwości generatora kwarcowego np. 16MHz chodzi z częstotliwością 2MHz. Jeżeli to nie przeszkadza to wystarczy w Bascomie wskazać zegar 2000000Hz i po kłopocie.
$regfile = "2313def.dat" - to napewno źle bascom musi wiedzieć że to attiny a nie at90s co do programatora to powinno być ok chociaż nie jestem pewny.
Witajcie Chciałbym poprosić o pomoc - wklejam kod programu [syntax=bascom] $regfile="m8515.dat" $crystal=4000000 $baud=9600 $hwstack=64 $swstack=64 $framsize=64 Config Lcd = 16 * 2 Config Lcdpin=Pin, Db4=Portb.0, Db5=Portb.1, Db6=Portb.2, Db7=Portb.3, E=Portb.4, Rs=Portb.5 Config Serial0=Buffered, Size=60, Bytematch=13 Enable Interrupts Declare Sub...
Czy jest możliwy błąd podłączenia? Tutaj oczywiście zmieniłem na PB.1 Tak, wszystko jest możliwe... Spróbuj ten code: [syntax=basic4gl] 'DS18B20 - ROM reading test from single sensor DS18B20 $regfile = "m8adef.dat" $crystal = 4000000 $hwstack = 80 $swstack = 80 $framesize = 40 Config 1wire = Portb.1 'Config 1wire = Portd.5 Dim N As Byte Dim Dsid1(8)...
Wyłapałem że wcześniej deklarowałeś $regfile = "m16def.dat" zamiast $regfile = "m16adef.dat" (mimo że procesory różnią się jedynie poborem prądu i rezystancją podciągania pinu RESET to warto było sprawdzić ten trop), jeśli dioda LED podłączona jest poprawnie do PORTA.0 to niestety nic więcej (poza samym komputerem) nie przychodzi mi do głowy... Ostatni...
po usunięciu drugiej linijki, czyli $lib "mcsbyte.lbx" i zmianie pierwszej z $regfile = "m16adef.dat" na $regfile = "m16def.dat" błędu nie wywala. Z helpa wynika, że : Biblioteka MCSBYTE.LIB jest zoptymalizowaną wersją, która obsługuje tylko liczby typu Byte. i zmieniając wpis na Dim A As Byte A = 255 Lcd A wtedy błędu nie wywali, ale zmienna a musi...
Unknown statement Atmega 8 nie ma portu "A". (tylko "B", "C" i "D"). Nie zmieniłeś też $REGFILE na poprawny!
A zamieściłeś np. $regfile="m8def.dat" ? //tomasz.w mnie wyprzedził :D
Witam Mam pytanie w sprawie odczytu. Program ogólnie mi działa odczyty są w miarę fajne tylko nie wiem z skąd są te wartości, by mi zależało na tym. V = V - 0.5 V = V / 0.01 Znalazłem na stronce z arduino, ale nic nie opisali za bardzo z kad wzieli te wartości. Czujnik daje 10mV na 1stopien, przy 0 stopni ma 500mV. owszem zamiast 0.0049 dałem 0.0046...
Można to zrobić tak (BASCOM AVR): $regfile = "m8def.dat" Dim Dana As Word Dim Nr_bitu As Byte Dim Wart_bitu As Bit Dana = 9876 For Nr_bitu = 13 To 0 Step -1 Wart_bitu = Dana.nr_bitu Print Wart_bitu Next Nr_bitu Do Loop End
Dodaj na początku programu: $regfile = "m8def.dat" $crystal = 1000000
Wcześniej zrobiłem to w optionsach , ale dodałem $regfile = "m8def.dat" i wciąż to samo ;/
_-kod-_ w bascomie avr $sim $regfile = "ATtiny13.dat" $crystal = 4000000 Dim Licz As Iram Byte Config Portb.4 = Input Config Portb.3 = Input Config Portb.1 = Output Set Portb.4 Set Portb.3 Do If Pinb.4 = 0 Then Waitms 25 If Pinb.4 = 0 Then Incr Licz End If End If If Licz = 30 Then Do Set Portb.1 nop Waitms 20 Loop Until Pinb.3 = 0 Licz = 0...
http://obrazki.elektroda.pl/5724768100_1... Witam, Aktualnie buduję/remontuje niewielką tokarkę, do zastosowań domowych. Jej mechanika jest dość prymitywna, co za tym idzie nie posiada żadnych podziałek, ani automatycznych posuwów. Wobec tego chciał bym zaopatrzyć ją w liniał, który będzie pokazywał pozycję imaka na wyświetlaczu LCD....
no to jak kolega się wzoruje na helpach sprzed n lat to się nie dziwię. Polski help polecam jedynie jako orientacyjny jak ktoś nie zna angielskiego, albo zna słabo. A takto tylko angielskie helpy dołączone do najnowszych bascomów. nie wiem jak się to wszystko zachowuje, bo nie testowałem takiej transmisji rozszerzonej. spróbuj zmienić w nadajniku na...
Witam. Można tak: $regfile = "attiny13.dat" $crystal = 1200000 Config Portb.3 = Output Config Pinb.4 = Input set pinb.4 reset portb.3 do if pinb.4=0 then do Set PORTB.3 Wait 1 Reset PORTB.3 Wait 1 Loop end if Loop W pętli odczytujesz stan przycisku i jak będzie niski zacznie migać.
$regfile = "ATtiny2313.dat" nie pamiętam czy taki jest nagłówek dla tego procka w bascomie a nie np tiny2313.dat albo tn2313.dat sprawdź to sobie sam ..... przecież to już nie problem mając bascoma a potem kompilacja i masz HEX'a - no przecież już o tym pisałem aha tylko jeszcze jedno - trzeba przestawić panie kochany fusebity w procku ATtiny2313 np...
Po co się męczyć to tylko kilka linijek w bascomie: Kod archaiczny dla słabeuszy: $regfile = "m128def.dat" $crystal = 8000000 Config Spi = Soft , Din = Pinf.2 , Dout = Portf.0 , Ss = None , Clock = Portf.6 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Porta.4 , Db5 = Porta.5 , Db6 = Porta.6 , Db7 = Porta.7 , E = Porta.3 , Rs = Porta.2 Config Pinf.6...
weź pod uwagę następujące elementy: 1 układ scalony diody podłączone pomiędzy zasilanie a wyprowadzenie układu tylko przez rezystor program napisany w chociażby w bascomie (ok 15 linii kodu) nie wiem czy da się to zrobić szybciej, taniej i prościej może i tak tylko użycie krzywej ładowania wymaga przygotowania elementów do sprawdzenia poziomu napięcia,...
regfile attiny13 regfile attiny2313 regfile atmega
logitech wzmacniacz uszkodzony przelacznik swiatla gąbka chłodząca
kominek drzwi hulajnoga xiaomi zasilacz
Zacinający się obraz w dekoderze Cabletech URZ0336B Kopanie kryptowalut na ESP8266: Możliwości i ograniczenia