DDR to nie instrukcja tylko rejestr portów np. DDRB - rejestr określający kierunek portu PortB (wejście czy wyjście). W bascomie konfigurujesz np. Config portb.5=output lub np. config portb=input Po szczegóły odsyłam do dokumentacji procesora i języka Bascom.
Dzięki. Mój problem polega na tym, że nie mam doświadczenia z RS 485. Chodzi mi o jakakolwiek pomoc i wskazówki. Jeden układ ma być tak jak wspomniałeś Master, a pozostałe Slave. Slave ma zbierać dane i przesyłać je do Master. Master po odebraniu danych ma wyświetlić je na tablicy synoptyczneji (opcjonalnie przesłać dalej do komputera). Dane mają być...
Czesc, Jak zrobic zeby na wejsciu np. Pinc.1 ustawionego na input mozna bylo podlaczyc +5V i to odczytac oczywiscie - kompil. Bascom. pozdrawiam
Po wczorajszym, (zamknięcie tematu, i itp) Postanowiłem że postaram się coś samodzielnie wyklecić w bascomie (w końcu to mój projekt) narazie to tylko przykładowy kod, w którym chodzi tylko o wyjaśnienie zagadnienia, i ewentualne poprawki. MASTER : $regfile = "attiny2313.dat" $crystal = 4000000 Config Serialin = Buffered , Size = 15 Const...
Input w Bascomie czeka na pojawienie się znaku CR, którego ty z PC nie wysyłasz. Wg mnie powinno być Mscomm1.output= "A" + Chr (13) '(ew. popraw skladnię)
Czy mogę wykorzystać w Attiny 2313 pin PA0 i PA1 jako wejście , układ pracuje na wewnętrznym oscylatorze 4 Mhz.
Sprawdź czy coś się zmieni gdy dopiszesz przed config adc, config pina.0 = input .
Witam. Tak poradziłem sobie z uruchomieniem. Myślę, że warto opisać tutaj dokładnie co i jak z tym HC-05. A więc jeśli ktoś ma sam układ HC-05 bez dodatkowej płytki z goldpinami, to powinien podłączyć go według tego schematu: Oczywiście diody LED nie są konieczne. Jednak polecam podłączyć jedną (dwóch nie ma sensu wg mnie). Mam na myśli diodę LED, która...
Witam, piszę sobie program na A128 i nie umiem sobie poradzić z jednym problemem ... wykorzystuję instrukcję encoder jaka jest w bascomie do zliczania zmiennej LONG + - i jednocześnie dokonuję pomiaru napięcia V kod programu [syntax=basic4gl]'----------------------... 'name : BG30dB_LCD.bas 'copyright...
mam prosty prgram $crystal = 11059200 $baud = 300 $timeout Dim Znak As Integer Do Inputbin Znak Timeout = 100 If P1.7 = 1 Then Reset P1.7 Else Set P1.7 End If Waitms 200 loop end na p1.7 jest dioda ktora sygnalizuje czy timeout dziala czy nie no i wlasnie problem jest taki ze nie dziala!!! i nie wiem dlaczego? Tak samo jest w symulatorze z Bascoma,...
no temat nie wydaje sie problematyczny... ale pewnie zawsze sie trafi na jakies przeszkody :) no nie pomoge ci podajac gotowca, ale poszukalem chwile na necie i : PS/2 Mouse/Keyboard Protocol: jesli jestes dobry w c to na podstawie ponizszego linku pewnie rozjasni sie w glowie (to interfejs klawiatury) Ponadto gotowiec znaleziony na necie ale do odczytu...
Pisząc program stanąłem przed problemem odbioru kodu RC5 z pilota ale z użyciem przerwania. O ile w BASCOM 8051 GETRC5 w przerwaniu działa doskonale, to w BASCOM AVR jest to kompletna porażka. Wadą Bascomowej funkcji GETRC5 jest: 1) Dziadowskie działanie w przerwaniu (niby działa ale traci pierwszy pakiet z pilota) 2) Zastosowanie jej w programie powoduje...
Z tym Bascomem nie może byś aż tak źle - znalazłem w sieci opis pojazdu typu segway na silnikach BLDC i wszystko w Bascomie. [syntax=vbnet]'25 04 2017 'poprawiny blad z wartoscia w przypadku braku potencjometru '21 04 2015 ' m,nastawa prądu od 256 do 512 na adc 'czas migania LED ustalany przez timer 0 '255x256x60 cykli timera dla f 8Mhz 'procesor attiny88...
Witam, Mam pewien problem z funkcjonowaniem symulatora w Bascomie. Chodzi o to, że gdy chcę wczytać jakąś wartość poprzez terminal program się zawiesza (niebieska strzałka przeskakuje do pierwszej linijki i tyle. Ma ktoś jakiś pomysł na to? Wrzucam przykładowy kod. Pozdrawiam serdecznie. $regfile = "m32def.dat" $crystal = 16000000 $sim Config...
Korzystam z ksiazki M.Wiazania i kompilujac program zamieszczony ponizej nie dzialaja mi polecenia wait i waitms. W wyniku programu diody ciagle swieca a powinny mrugac. Uklad z mk sam zrobilem( 8 diod mikrostyk i rezonator +atmega8) Posiadam bascoma-avr w wersji demo. $sim $regfile = "m8def.dat" $crystal = 8000000 Config Portd = Output Config...
To na razie wersja robocza więc sporo niedociąnięć, muszę jednak zacząć rezygnować z bascoma. Niby już wszystko było OK, ale gdy tylko w pętli głównej przed wyświetlaniem chciałem zamaskować wynik poleceniem fusing, znów jakieś głupoty zaczęły się dziać. Nie mam już nerwów. $crystal = 8000000 $regfile "m16def.dat" '*********************zmienne***********...
Witam Testuję moduł GSM SIM800L. Chciałem, aby po otrzymaniu komendy przez SMS odsyłał zwrotny SMS lub wysyłał email z danymi. Najpierw "na sucho" klepiąc ręcznie linia po linii przez terminal uzyskałem pozytywne wyniki testów ( tzn. otrzymywałem SMS i email ). Nieco gorzej jest w przypadku podłączenia do Atmega328. Podsłuchując terminalem odbieram:...
Nie stosowałem dotychczas więc nie wiem czy pomoże ale poczytaj o INPUTBIN, INPUTHEX
Panowie, Panie potrzebuję pomocy bo siedzę i siedzę i nie mogę sobie dać rady z kodem BASCOM. Jestem początkujący, a raczej raczkujący w AVR, programowaniu itd. :( Próbuję zbudować sterownik do pokoju który ma wykonywać: -sterowanie światłem (8x) -sterowanie piecem/kotłem gazowym (temperatura noc i dzień-dwie różne temperatury) -każdy przycisk ma dwie...
Witam, Wiem, że może to nie najlepszy pomysł, aby zakładać taki temat, ale chciałbym zrozumieć pewne rzeczy dotyczące bascoma i jego instrukcji, mam nadzieję, że ktoś będzie miał ochotę pomóc. Mianowicie : [syntax=Bascom]$regfile = "m8def.dat" $crystal = 1000000 'Konfiguracja przetwornika analog-cyfra (ADC) Config Adc = Single , Prescaler = Auto 'Konfiguracja...
Czy jest możliwość obsłużenia tego w Bascomie? Funkcja GETADC() Przeznaczenie: Pobiera wynik przetwarzania z wbudowanego przetwornika ADC na wybranym kanale. Składnia: zmienna = GETADC( nr_kanału , offset ] ) gdzie: zmienna - zmienna typu Word do której wpisana będzie przetworzona wartość, nr_kanału - numer kanału przetwornika ADC. Zwykle z zakresu...
Mam jeszcze 2 pytanie związane z Bascomem. Zrobiłem program przykładowy przedstawiony poniżej. Dim Nr As Byte Dim Nr2 As Byte Dim Koniec As Bit Skocz: Koniec = 0 Do Input "Podaj nr" , Nr If Nr > 0 Then If Nr < 20 Then Koniec = 1 End If End If Loop Until Koniec = 1 Do Print "pętla 2" Input "Podaj nr 2" , Nr2 If...
$regfile = "m128def.dat" $crystal = 16000000 $baud = 9600 'set the baud rate for the first hardware UART. $baud1 = 9600 'set the baud rate for the second hardware UART. 'when CONFIG COMx is not used, the default N,8,1 will be used Config Pinb.7 = Output Config Com1 = Dummy ,Synchrone = 0 ,Parity = None ,Stopbits = 1 ,Databits = 8 ,Clockpol...
Witam Potrzebuje jakiś gotowych procedur kodowania transmisji CYFROWEJ na x51 dla BASCOMA chodzi mi o to by mudz przesyłać transmisję CYFROWĄ na poziomie 9600 bps Jeżeli któryś z kolegów wie jak to napisać proszę o pomoc I proszę NIE imieczczać linków od postów BO umiem kożystać z funkci SZUKAJ A porady typu wyślij pare paczej "pyustych" mnie nie bawią...
Witam. Poniżej zamieszczam program napisany w bascomie. To jest menu do termostatu. Ma za zadanie ustawienie temp dolnej - włączenia i górnej - wyłączenia. Działa tak, że w czasie wykonywania programu po wciśnięciu klawisza pojawia się na ekranie wybór którą temp ustawiamy (+ lub -). po wciśnięciu odpowiedniego klawisza ustawiam jedną z temperatur....
Witam Mam taki problem, napisałem program w bascomie, w którym również korzystam z przerwania na INT0 (atmega8-16pu). Ale: Po włączeniu zasilania program przechodzi do obsługi przerwania i zostaje tam na amen - w czym jest błąd. Proszę o jakieś wskazówki. Płytka jest wykonana prawidłowo, na int0 jest stale 5V (podciągnięte do VCC zew, z wyjątkiem kiedy...
Witam. Dopiero się uczę bascoma i mam taki mały problem. napisałem taki mały programik : $regfile = "m16def.dat".dat " $crystal = 8000000 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portb.4 , Db5 = Portb.5 , Db6 = Portb.6 , Db7 = Portb.7 , E = Portb.3 , Rs = Portb.2 Wait 10 Config Pinc.0 = Output Config Pinc.1 = Output Config Pinc.2 = Input Config...
Witam! Napisałem sobie obsługę klawiatury matrycowej 3x4 w bascomie. Nie używam umieszczonej tam funkcji getkb(), ponieważ podłączona jest do różnych portów. Sprawdzanie wciśniętych przycisków chcę przeprowadzić w przerwaniu od wewnętrznego zegara TIMER0. Na ATmega32 wszystko bez problemu działa. Płytka, pod którą to robię działa niestety na ATmega8515....
1) Po ifach nie masz end if 2) Warto dopisać Start timer0 bo z bascomem różnie to bywa 3) Zrobić tak jak ci pisali poprzednicy- licznik przenieść do przerwania 4) Skonfigurowałes sobie portd jako input i nie właczyłes podciągnięć do vcc (może nie potrzebujesz), ale pamiętaj o tej niedoróbce żeby zaraz nie było że ci przycisk jakiś nie działa 5) Dodałem...
Potrzebuję pomocy przy zamianie kodu "RFID Reader", tzn. żeby zamiast wyświetlania kodu karty na LCD uzyskiwać odpowiedni poziom na wyjściu 1z10 i czy jest to możliwe do zrealizowania na atmega8? Chciałbym użyć 8 ostatnich cyfr kodu karty. Posłużyłem się gotowcem, który był już na elektrodzie (dopiero uczę się bascoma i nie wiem jak się do tego zabrać):...
Witam, Szukałem podobnych tematów, gdzieniegdzie coś znalazłem. Ale potrzebuje konkretu. Zakupiłem sobie moduły: nadajnik odbiornik (RTFQ2, RTFQ1) pracujące na 433 MHz I teraz ogólnie rzecz biorąc mam DWA pytania: *Jak je podłączyć do mikrokontrolerów avr (jedna płytka z nadajnikiem, druga z odbiornikiem). (Czy wystarczy sama nóżka Tx dla nadajnika...
Od początku, orłem z programowania nie jestem, ale coś tam stworzę. Kilka lat temu stworzyłem dość proste urządzonko na Attiny13A w trzech egzemplarzach. Teraz powstało zapotrzebowanie na jeszcze kilka sztuk i mam problem z kompilacją w Bascom. Oczywiście program bez zmian(ewentualnie wyłączona jedna funkcja). Bascom 2.0.7.8 wyrzuca błąd; Error : 22...
Witam, mam procesor ATMEGA128 16AI zasilany z 5V i podłaczony do niego LCD i MMC zasilane 3.3V. Magistarla SPI została do nich podpięta przez rezystory poza klinią DO (data out karty MMC). Po włczeniu układ nie reaguje na odczyt zapis do karty MMC, może 3,3V z DO mmc nie jest rozróżniany przez AVRa jako stan wysoki? Wyświetlacz LCD działą dobrze i ma...
witam, mam maly problem, nie bede podawal szczegolow projektu, gdyz nie sa istotne. chodzi mi o przekazanie informacji w JEDNYM kiedrunku z jednego AVRa do drugiego. polaczenie mialoby byc zrealizowane przez UARTa. jakie dane? w programie pierwszego AVRa wystepuja 4 zmienne typu byte, ktorych wartosci chcialbym przetransportowac do drugiego AVRa. wysylam...
Witam, Jak byś zobaczył do HELPa Bascoma to byś dużo się dowiedział :) $regfile = "m128def.dat" $crystal = 16000000 $baud = 9600 'set the baud rate for the first hardware UART. $baud1 = 9600 'set the baud rate for the second hardware UART. 'when CONFIG COMx is not used, the default N,8,1 will be used Config Pinb.7 = Output Config Com1 = Dummy...
Witam zacząłem bawić się mikrokontrolerami i do tego zamówiłem sobie programator STK200/STK300 oraz ściągłem pakiet BASCOM-AVR, kupiłem atmega8 no i dobra podłączyłem wszystko tak jak powinno byc, Uruchomiłem program wykonałem wszystko po kolei jak jest napisane w książce "Programowanie mikrokontrolerów AVR w języku BASCOM" ale gdy przeszłem do momentu...
witam wszystkich jestem początkujący w programowaniu uC i dla tego mam mały problem a mianowicie chciałbym aby na wyświetlaczy pokazywała mi sie temperatura a przy okazji można był sterować różnymi urządzeniami za pomocą pilota RC5 podczas kompilacji w bascom-avr wersja demo program wywala mi błąd error: 61 line: 176 label not found $regfile = "m8def.dat"...
Witam. Chcę napisać program w Bascomie AVR, który po wpisaniu słowa z klawiatury w PC (symulacja) będzie za pomocą IF.....THEN.......END IF rozpoznawał wyraz i wykonywał czynność, dla jasności chodzi o coś takiego: (...) input a If a = wykonaj then print OK end if (...) ale bascom nie chce przyjąć "If a = wykonaj", spodziewam się, że chodzi o jakiś...
Witam Jako ze to moj pierwszy post chcialbym z gory napisac ze jestem laikiem jesli chodzi o uC. Bawie sie tym od 2 tygodni, probowalem programowac w C ale niestety za wysokie progi. 2 dni temu zabralem sie za bascoma i wymodzilem programik do sterowania solarami, na dwoch czujkach ds1820. Mam prosbe do Was, czy jest cos w kodzie co mozna poprawic (zapewne...
Witam serdecznie! To jest mój pierwszy post na elektrodzie. Jestem początkującym Bascomowcem. Szukałem długo w necie rozwiązań typu "Tap tempo" dla AVR pod Bascom. Niestety nie było. Napisałem własny programik i działa. 'mój pierwszy program typu "metronom" 'z "nabijaniem tempa 1 przyciskiem 'Działa, ale czy da się prościej? $regfile...
1. źle konfiguracja pinów, poprawnie powinno być Config PINx.n = Input/Output 2. po co potem drugi raz konfigurujesz za pomocom Config PORTn = &Bxxxxxxxx ?? niepotrzebne to jest. 3. Włączaj podciągania tylko na potrzebnych pinach, tzn: Set PORTD.0 Set PORTD.1 4. wszystko fajnie w pętli głównej, ale źle konstruujesz ify, ogólna składania wygląda tak:...
Witam. Od paru dni uczę się programować w języku bascom. Trafiłem na błąd podczas kompilacji którego nie rozumiem. O to kod [syntax=basic4gl][/syntax] $regfile = "m8adef.dat" $crystal = 16000000 Config Portc = Output Config Portb = Output Config Portd.0 = Input Config Portd.1 = Input Config Portd.3 = Input Config Portd.4 = Input Pind.4 = 1 Pind.1 =...
Wiem o tym, czytałem te wszystkie wywody na temat jaki to Bascom jest plugawy, ale nie mam wyboru - z przyczyn ode mnie niezależnych muszę go jakoś okiełznać... (a przynajmniej w stopniu podstawowym) Jeśli chodzi o Rotate, to na początku modyfikowałem program z książki autorstwa Marcina Wiązania o Bascomie. Program ma działać tak, że diody zapalają...
No coś w ten deseń :P Ten reaguje kiedy na końcu pojawi się znak 13 [syntax=vbnet]$regfile = "m644pdef.dat" $crystal = 16000000 $hwstack = 64 $swstack = 100 $framesize = 200 $baud = 38400 $baud1 = 38400 Config Submode = New Open "COM1:" For Binary As #1 Open "COM2:" For Binary As #2 Config Serialin0 = Buffered , Size = 100 , Bytematch = 13 ' from ESP8266...
Cytuję: "Ustawia się to w zależności od skomplikowania programu. (...)" O co tutaj chodzi i o jakie wartości tutaj chodzi? Dokładnie chodzi o ilość bajtów jaką początkowo zajmie każdy ze stosów. Stos jest elementem rozrastającym i kurczącym się dynamicznie. Może dojść do sytuacji gdzie jeden zajdzie na drugi - stack overleap - i kłopot gotowy. Dlatego...
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...
oto kawalek prostego programu, ktory nie dziala tak jak trzeba: Dim X As Byte Config Pind.7 = Output Gosub Czekaj Config Pind.7 = Input End Czekaj: For X = 1 To 255 Next X Return po wykonaniu petli program wraca do poczatku (chyba) oczywiscie wszystko sie dzieja po zaprogramowaniu procka, symulacja przeprowadzona w baskomie jest wporzadku. jeszcze...
Witajcie. Mam kilka w chyba podstawowych pytań związanych z niektórymi rzeczami w BASCOMie. 1. Pętla DO LOOP. Czy musi być użyta zawsze w programie i co powinno być objęte ta pętla ? 2. WachDog wbudowany w ATMEGA 8. Jak jest ustawiony fabrycznie i w jaki sposób objawia się jego działanie kiedy jest uruchomiony tzn kiedy się włącza i co robi ? 3. Które...
Witam. Poniżej przedstawiam program do procesora Attiny2313 oraz schemat sterowania bramą. Układ ma działać na czterech przekaźnikach - dwa do otwierania i zamykania oraz jeden do domykania oraz jeden do wolnego otwierania w fazie początkowej. Dodatkowo układ ma zabezpieczenie do bezpiecznika przeciwprzeciążeniowego C8 oraz podłączenie do bariery optycznej....
Witam. Na znanym serwisie aukcyjnym zaopatrzyłem się w wyświetlacze LCD 2x16 znaków które miałybyć kompatybilne z HD44780 jednak nie są. Wyświetlacze to PC1602V-P8 firmy Powertip. Na stronie $regfile = "m8def.dat" 'procesor mega 8 $crystal = 8000000 '8mhz Wait 1 Config Adc = Single , Prescaler = Auto , Reference = Avcc ' ustawienie adc Dim...
Przede wszystkim w komunikacji po Usarcie to przeszedł bym na przesyłanie ASCII, a wyrażenie kończyłbym znakiem CR (13). Wtedy możesz wysyłać odebrane ciągi na wyświetlacz, bez używania stałych. Używaj do tego zwykłego Print zamiast printbin. Tak swoją drogą nie wiem czemu większość początkujących próbuje komunikować się poprzez Printbin zamiast używać...
Witam. Mam problem z napisaniem programu w Bascomie. Chcę, żeby przyciskami S1 i S2, po naciśnięciu przycisku S3 zmieniać zmienną (Praca) typu Byte i wyświetlać ją na LCD. Później chcę, żeby dioda (D1) świeciła przez tyle sekund ile wynosi zmienna i gasła na sekundę (w pętli nieskończonej). Dla wyjaśnienia: S1 - Dodanie do zmiennej 1. S2 - Odjęcie od...
Witam, od 3 dni posiadam płytkę testową z procesorem avr i próbuję nauczyć się bascoma. Problem dotyczy switch case. mam oto taki kod: [syntax=basic4gl] $regfile "m32def.dat" $crystal = 16000000 '16Mhz Config Lcdpin = Pin , Rs = Portb.0 , E = Portb.1 , Db4 = Portb.2 , Db5 = Portb.3 , Db6 = Portb.4 , Db7 = Portb.5 Config Lcd = 16 * 2 Config Portc = Input...
1) PinB.5 poprzez rezystor 10K podłączasz do VCC. Do PinB.5 podłączasz też kondensator 100nF do GND. 2) PortB.0 INT0 podłącz przez opornik 200 omów do przycisku (druga nóżka przycisku do GND) to będzie twój przycisk do zmiany efektów 3) Pozostają ci tylko 4 wolne nóżki dla ledów. Możesz dodać ekspander I2C->8 bit PCF8574 i sterować 8 ledami lub zostawić...
Podejrzewałem to jednak nie umiem zrobić detekcji 0 a mam jeszcze 4k wolne Coś bym zaadaptował z tego jednak nie rozumiem w pełni tego kodu a jak czegoś nie rozumiem nie stosuje Gdyby ktoś wypowiedzieć się mógł tak dla głąba jak to działa. Kod z tego forum nie mój. Pomoże mi jakaś dobra osoba , mogę się odwdzięczyć w dziedzinie diagnostyki aut. Bardzo...
Hej, pisanie w C nie wypaliło to przeszedłem do Bascoma. Prosiłbym o sprawdzenie kodu, wytknięcie błędów. Mam wątpliwości co do And w funkcji Select case (nie wiem czy to jest poprawnie) oraz co do logiki kodu... [syntax=basic4gl] $regfile = "m8def.dat" $crystal = "8000000" Config Pinc.0 = Input 'Przycisk Set Pinc.0 Switch Alias Pinc.0 Config Pinc.2...
Rzeczywiście zapomniałem o programie, poniżej w całości. Jest obsługa pilota z nauką, obsługa impulsatora i sterowanie przekaźnikami. Dodam że to pukanie słychać przy sterowaniu pilotem i impulsatorem. To błąd chyba jest w części dotyczącej zapisania danych do DS-a. [syntax=basic4gl]$regfile = "m8def.dat" $crystal = 4000000 $hwstack = 32 $swstack =...
Witam wszystkich serdecznie. Właśnie zacząłem zabawę z modelarstwem i chciałbym sobie zrobić prosty regulator do silników szczotkowych. Znalazłem w necie kilka schematów. Poskładałem sobie układ wg schematu Przerobiłem kod z noty katalogowej bascoma [code:1] $regfile = "ATtiny2313.dat" $hwstack = 32 ' default use 32 for the hardware stack $swstack =...
Witam Do istniejącego i działającego "urządzenie" chciałem dodać możliwość odbioru, parsowania i odesłania SMS'a zwrotnego z danymi. Cały kod: Linia1 - to wyświetla Uart_numer - Linia1 Linia2 - to wyświetla Komanda - Linia2 czyli działa OK Ale jak podepnę modem GSM ( SIM900D ) to Uart_numer jest puste, a Komanda pokazuje ( czasem ) jakieś teksty z pierwszej...
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. Liniały są bardzo drogie, więc pomyślałem o bardzo tanim rozwiązaniu,...
Witam serdecznie Bazuję na dostępnym w sieci kodzie Pana Piotra Rzeszuta, służącym do obsługi modułu ENC28J60 w Bascomie. Wszystko działa jak należy, jednak chciałbym zmodyfikować kod tak, aby po włączeniu diody wyświetlał się aktualny stan jej działania ("stanled1")... Czyli po kliknięciu w przeglądarce przycisku ON przy diodzie, obok wyświetli się...
Temat ostatecznie zmieniłem. Program działa, jeśli wywalę / "zaremuję" obsługę Wyświetlania baterii-nie napięcia. To jest dziwne, bo adc i reszta jest ok. Ale jek tylko dołożę obsługę wyświetlania ikonek IF-ELSE to procesor nie budzi się. Dodam że automatyczne wyłączanie zrealizowałem na transoptorze, bo inaczej miałem problemy z wybudzaniem. Program:...
Zbudowałem sobie taki oto układ termometru i zegara oparty na atmega16 i wyświetlaczu lcd. I wszystko działa jak należy ale nie do końca. Temperatura wyświetlana na lcd strasznie skacze po różnych wartościach w przeciągu paru sekund tzn. jak np. w pokoju jest 20 stopni to on wskazuje raz właśnie te 20 raz 19 czasami 21 albo 14 15 czy 16 stopni celcjusza....
Sprawdzilem jeszcze raz wszystkie instrukcje i wygląda ze są dobrze zakończone. Program faktycznie może być nie kompletny, zajmuje 802 linie. kod początek: '------------------------------ $regfile = "M8DEF.DAT" $crystal = 8000000 Config Adc = Single , Prescaler = 16 , Reference = Avcc '------------------------------- Config Pinb.3 = Output Config Pinc.6...
Witam. Czy ktoś z Was mógłby napisać gdzie tkwi błąd w tym kodzie?. Problem w tym że w pętli do-loop nic się nie chce wykonywać czyli na wyświetlaczu mam cały czas wynik 001 tak jakby pętla ruszyła tylko jeden raz.A może błąd nie tkwi w pętli? $regfile = "attiny2313.dat" $crystal = 8000000 Config Timer0 = Timer , Prescale = 256 On Timer0 Multiwyswietl...
Dzieki ksz o to mi właśnie chodziło ! Mam tylko jeszcze jedno pytanko jak napisac programik aby np na dany kod przycisku ( 0x00000000000009F6) zmieniał stan portu ! Niezabardzo mam pomysł jak to zrobic w bascomie ! myśle nad podpięciem pod int0 tylko niewiem jak program ma mniej więcej wyglądac ! Robiłem niedawno odbiornik podczerwieni (w C), użyłem...
Witam wszystkich,dzisiaj mam nastepujacy problem mam program który mierzy temperature z 4 ds1820 i bascomie 51 nie mam z nim problemu kompiluje sie ok i działa przerobiłem go na bascoma avr i chciałem wgrac do atmegi 8535 i nici wywala mi błędy których nie rozumiem co jest nie tak?? Oto program który chce wgrac do atmegi: $regfile = "m8535.dat" $crystal...
Miałem niedawno problem jak rozwiązać problem wielu hardware'owych uartów. Przychyliłem się do rozwiązania, w którym połączę parę układów AtTiny2313 przez SPI. Próbowałem nawiązać transmisję. Wszystko byłoby ok, gdyby nie to, że gdzieś gubią się bajty... Kod wygląda tak: SLAVE $regfile = "m32def.dat" $crystal = 16000000 $baud = 31250 Dim Cosik...
Witam. Poniżej zamieściłem program w bascomie który właśnie pisze (jeszcze nie skończony) i mam taki oto problem: po sprawdzeniu składni wywala takie oto błędy: 1.Error 7 Line: 327 IF THEN expected 2.Error 222 Line: 327 illegal character '----KONFIGORACJA WYSWIETLACZA----.' Config Lcdpin = Pin , Db4 = Pa.5 , Db5 = Pa.4 , Db6 = Pa.3 , Db7 = Pa.2 , E...
Zrób sobie 6 element tablicy który będzie np znakiem ENTER (żeby rozpoznawać koniec tablicy) natomiast w Bascomie możesz wtedy użyć nawet polecenia INPUT, które po otrzymaniu znaku ENTER wpisze ci twoich 5 elementów tablicy do stringa (też jakby tablicy) - a ze stringa możesz to przełożyć do normalnej tablicy bascomowej - zrobić z tym co ci się żywnie...
01, można też wysłać 1A, 2F, a maksymalnie FF, czyli całą "paletę" liczb HEX. Popołudniu sprawdzę co napisałeś, może się udać okiełznać Bascoma. PS. Input też wymaga znaku <CR> więc odpada, jedynie inputbin, czyta znaki bez konieczności wysyłania <CR>.
Witam ! Kiedy piszemy skomplikowany program należy sprawdzić poszczególne fragmenty programu jeśli to jest możliwe. Ja sprawdziłem w symulacji Bascoma AVR, jak działa zamiana liczby czterocyfrowej na pojedyncze cyfry, aby można je było wpisać do poczwórnego wyświetlacza LED. I oto co mi wyszło : w miejscu Licznik = dla symulacji można wpisać dowolną...
nie jestem dobry z bascoma, prawdę mówiąc to mi bliżej do analogówki rzeczywistość jednak zmusza ludzi do różnych rzeczy Mogę prosić o prosty przykład w bascomie potrzebuje przesłać dwie zmienne typu byte do drugiego procka bez zatrzymywania pętli głównej w odbiorniku PIOTR
Na wstępie zaznaczę, że jestem raczej laikiem w temacie programowania, miałem na studiach przedmioty temu poświęcone, ale prywatnie napisałem tylko kilka programów (wydział mechaniczny). Od dłuższego czasu przerabiałem samochód, żeby sterować radiem z kierownicy. Wszystko fizycznie jest poskładane, interface zbudowany. Problem leży jeszcze po stronie...
Witam. Mam problem z odczytem karty mmc, miałem już działający układ z dobrym kodem ale gdzieś się zawieruszył w gąszczu plików i musiałem się za to wziąść od nowa. Jednak niechce mi działać. Karty mam 2 (32mb mmc sanyo i siemens, obie w fat 16). Na jednej dostaje error init file system 229 a na drugiej error during drivie init 225 Co najciekawsze wczesniej...
Witam proszę o sprawdzenie oraz prze kompilowanie programu program nie jest mój tylko został przerobiony na moje potrzeby. Przy portach adc jest 5 pinów jednak wykorzystam tylko ADC4,ADC3,ADC2 Schemat: Program: [syntax=basic4gl]$regfile = "m8def.dat" $crystal = 16000000 'Konfiguracja przetwornika analog-cyfra (ADC) Config Adc = Single , Prescaler =...
Witam Starałem się wyjaśnić platforma AVR lub zadania jaki ma wykonać NIE JEST TAK WAŻNE jak zorganizowanie komunikacji na RS232 za pomocą paczek HEX! Mogę wykorzystać dowolną większą kość AT! AT90s2313 Akurat tą kość mam gotową do pracy i kompletną do komunikacji na RS232. Czy jest możliwe zorganizowanie takiej komunikacji.? Potem wykona zadania......
Piszę ten post szybko przed szkołą, więc jeśli się wyrobię wstawię schemat, jeśli nie, to po szkole. Postanowiłem zrobić pierwszy eksperyment z mostkiem h. Zakupiłem więc 2 sztuki L293d. Spiąłem układ według schematu narysowanego w zeszycie, i napisałem program. Efekt - nic. Żadnej reakcji. Sprawdzam ręką, Atmega zimna, mostek wytwarza trochę ciepła....
Witam Robię sterownik do bramy, przerobiłem kod "pod siebie" Sterownik steruje silnikiem, lewo, prawo, sprawdza jaki prąd pobiera silnik i wyłącza go gdy prąd będzie za duży. Funkcja która porównuje wielkość prądu to: If Rez >= Pot_max Then ..... Problem jest w tym, że silnik na starcie pobiera za duży prąd i trzeba by wstrzymać wykonywanie tej funkcji...
HELP powie CI wszystko... PRINT to PRINT Do odbierania masz INPUT plus jego odmiany INPUTBIN i INPUTHEX
Witam. Proszę o podpowiedź jak najprościej odebrać i okiełznać ramkę danych po uarcie. Ramka ma stałą długość 32 bajtów, niestety nie występuje w niej znak końca linii, nie ma CR i nie ma LF. Doczytuję sobie tą ramkę tak: [syntax=vbnet] Do Loop Until Waitkey() = Chr(66) Do Loop Until Waitkey() = Chr(77) Inputbin A1 , A2 , A3 , A4 , A5 , A6 , A7 , A8...
Shift jest od przesuwania bitów. Ty musisz przesuwać całe bajty w tablicy Buffer_in. Użyj sobie mojej metody odbierania: [syntax=vbnet]Inputbin Dana Buffer_in(in_pos) = Dana Incr In_pos If In_pos = 9 Then 'Jak zmieści się co najmniej jedna cala ramka danych If Buffer_in(1) = &H01 Then 'To sprawdzamy czy jest prawidłowo rozpoczęta If Buffer_in(2) = &H10...
Witam jak mogę zmienić wyjścia pinów na stan niski . Program napisany w BASCOM. [syntax=vbnet]$regfile = "m16adef.dat" ' specify the used micro ' generated. Take care that the chip supports all fuse bytes. $crystal = 8000000 $baud = 19200 ' used crystal frequency ' generated. Take care that the chip supports all fuse bytes. Config Lcd = 16 * 2 Config...
Witam, Próbuję odpalić taki wyświetlacz po SPI: Posiada on sterownik ILI9341, znalazłem bibliotekę glcd-ILI9341_2R8_240x320.lib i taki przykład: [syntax=vbnet] ' ' *********************************** ' * 2.8inch 65K full color LCD * ' * 240 x 320 dot [ILI9341] SPI * ' * Touch screen (XPT2046) test * ' * O-Family 2019. 9.26 * ' ***********************************...
nie wnikam w sens... ale to by było jakoś tak : Config Pind.4 = Output reset Portd.4 Config Pind.2 = Input reset Pind.4 dim a as bit dim b as bit a=0 portd.4=a do if pind.2=1 then <-- sprawdza czy jest nacisniete waitms 100 if pind.2=1 then <-- jeszcze raz sprawdza b=not a <-- zmienia stan zmiennej przypisywanej do wyjscie przekaznikowego na...
Można, a w BASCOM-ie przerwanie od portu szeregowego nazywa się "serial" i to jego obsługą musisz się zainteresować. Przykładowy kod w BASCOM-ie 51: $crystal = 11059200 ' czestotliwosc kwarcu $baud = 2400 ' predkosc transmisji Dim X As Byte ' deklaracja zmiennych Enable Interrupts ' wlaczenie przerwan Enable Serial ' wlaczenie przerwania portu RS232...
Witam ! Mam pytanie do Bascom-owców czy w symulatorze programu zamiast terminala można faktycznie użyć łącza COM ? Chodzi mi o to że w programie jest np instrukcja <Input #1, A > w czasie symulacji czeka aż mu coś klepnę w okienku symulatora i nacisnę ENTER a chciałbym aby pociągnął sobie zmienną bezpośrednio z COM1. Niby jes funkcja "check to...
Udało mi się zrobić sinusa. Niestety programik jest troche zagmatwany no ale w miarę działa. Liczy z dość dużą dokładnością jeśli podamy mu kąt w zakresie od -180 do 180: $large 'Sin(x) Dim X As Single Dim Wynik As Single Dim Liczba As Integer Dim Silnia As Long Dim Sin As Single Declare Sub Silnia(liczba As Integer) Declare Sub Sin(x...
Witam Mam mały problem o którym kiedyś już pisałem. Układzik na Atmedze8, MAX485 całość taktowana kwarcem 16 MHz. Fabryczny konwerter 232/485 GV-COM podlaczony 2 kabelkami, a do kompa przez USB (zainstalowany USB-to-Serial Bridge jako COM9) W Bascomie napisałem: $regfile = "m8def.dat" $crystal = 16000000 $baud = 9600 Dim Znak As String * 6...
Analizowałem dla innego kolegi mój program w którym stosuję UART. Widzę, że na początku odblokowałem globalne przerwania z adnotacją jak niżej. Enable Interrupts 'Przerwania od UART zaszyte w Bascomie Wstaw może tą linię w swój program. Poczytaj help'a - CONFIG SERIALIN
chcial bym poprosic o pomoc w udoskonaleniu kodu. zrobilem zegarek binarny (13 diod, sa one osobno podlonczone do portow mikrokontrolera. Dziala on na zegarku rtc) Jak sie nadusi przycisk/przalacznik: pinb.5 ma byc wyswietlana godzina pinb.4 ma byc wyswietlana data pinb.3 + pinb.5 dodaje godzine pinb.3 + pinb.4 dodaje minute pinb.2 + pinb.5 dodaje dzien...
Witam, Po nieudanych próbach programowania w BASCOMIE komunikacji pomiędzy mikroprocesorami poprzez SPI(bascom sobie nie radzi, tzn ja sobie w basomie z tym nie poradziłem, a po licznych nieudanych próbach i po braku odpowiedzi, sugesti na ten watek wnioskuje że chyba to jest niewykonywalne w bascomie, a przykładów bardzo skąpo) jak również i2c (twi)...
Witam. Wpadłem na pomysł zrobienia zamka cyfrowego na uP. Jako, że to mój pierwszy tego typu projekt to pojawiło się kilka problemów. Głównie z programem. Kupiłem sobie książkę "Programowanie mikrokontrolerów AVR w języku BASCOM". Zaprojektowałem układ i napisałem jakiś tam program. Umieszczam to tutaj: A) Schemat: Pytanie nr1. Czy to w ogóle ma prawo...
$regfile = "m8def.dat" $crystal = 16000000 $baud = 57600 $framesize = 32 $hwstack = 32 $swstack = 32 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portc.2 , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5 , E = Portc.1 , Rs = Portc.0 Config Debounce = 30 'Długość naciśnięcia przycisków Config Timer0 = Timer , Prescale = 256 On Timer0 Odmierz_1s...
Tak jak w temacie. Od kilku dni próbuje połączyć się przez RS'a z modemem w telefonie siemens c35 próbowałem już róznych prędkości transmisji nic nie dawało tyle że na najniższych prędkościach działało jakby echo czyli taką komendę jaką wysyłaliśmy taka wracała przez polecenie input. Na wyższych prędkościach program stoi na poleceniu input. Juz nie...
Witam Moja Atmega 16 wiesza się w pętlach Uszczenianie i Paletyzacja poniższego programu: 'Listing programu obsługującego symulator procesów. Program został napisany ' i skompilowan w programie BASCOM-AVR 1.11.9.8. $regfile = "m16def.dat" 'określenie typu procesora $crystal = 8000000 'określene szybkości zegara 'Watchdog Wdtcr = &B00011111...
Mam taki problem, że zrobiłem projekt Odbiornika Morsa na ATmedze8. W oryginalnym projekcie jest kwarc 10 MHz, a ja użyłem 10.240 MHz gdyż taki miałem w domu, a sklepu elektronicznego w mojej okolicy nie ma. Jak podłącze ten odbiornik do komputera i z programu morsik coś wysyłam to np. "adrian" dekoduje poprawnie, a "jarek" już nie, tylko na LCD pojawia...
Witam Tak jak w temacie mam napisałem program w bascomie który ma za zadanie zapalać cztery diody led po odebraniu po RS232 cyfr od 1-4 i chodzi to bez problemu ,ale teraz gdy uczę się języka C postanowiłem ten sam program przenieść na C i już nie jest tak dobrze.Objaw jest taki gdy wyśle 1-Zapalają się i gasną diody "STROBO I KULA" gdy 2-Tak sama 3-Też...
Witam. Dawno nie pisałem w BASCOM-ie a zdecydowałem się na niego bo myślałem, że tak będzie szybciej i prościej. Nic bardziej błędnego. Do napisania był dwu-trybowy program uśredniający do nieco przerobionego radiometru SOSNA. Ale nie w tym rzecz. O ile kod który zamieszczam powstał w miarę szybko o tyle błędu nie potrafię wyeliminować 3 dzień. Po krótce...program...
Witam mam problem odbiorem rc5 w bascomie. Napisałem program i on niby działa ale nie wiem czy napewno tak powinno być. Gdy naciskam przycisk na pilocie to wykonuje to co jest w kodzie ale czasami zanim zadziała trzeba kilka razy nacisnąć przycisk w pilocie żeby zadziałało a czasem wystarczy raz. I nie wiem czy jest to jakiś problem w kodzie czy może...