e ale tu mamy blad taki : Config Portc.5 = Input Config Portc.4 = Output Config Portb.0 = Output co jest zle! dobrze : Config Pinc.5 = input Config Pinc.4 = output Config Pind.0 = output
Spróbuj tak: ściągnij help by zbeegin. W nawigatorze odczytaj instrukcje config-config serwos- czytanie ze zrozumieniem. Potem zamiast "Config Porta.7 = Output" napisz: Config pina.7=output.
heheh Dzięki kolego "Config Portb.7 = Output" wystarczyl , chodzi z pwm1c jak i z ocr1c :D ...dzięki jeszcze raz ...wiedziałem że banał ..bo przy innych pwm nie trzeba było pisać config .....=output
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.
Witaj :) Bez problemu możesz je ustawić jak wyjścia lub wejścia. Np. cały port b jako wyjście / wejście Config portb = output / input Albo pojedynczo poszczególne wyprowadzenia Config portb.5 = output Config portb.6 = output Config portb.7 = input itd... Pozdrawiam
I jak teraz ? no widać że fuski są ustawione ok na wewn. oscylator 4MHz tylko jeszcze zdaje się trzeba ustawić pin diody LED jako wyjście, to było w bascomie zdaje się jakoś tak: Config pind.6 = output
Witam ! Może brakuje konfiguracji portu ? Config PortA = Output Wesołych Świąt życzy Stefan
Nie jestem specem, ale wydaje mi się (na podstawie Helpa), że należy najpierw zadeklarować piny lub porty - jeden jako wejście, drugi jako wyjście. przykład: Config Pind.5 = Input Config Pind.6 = Output lub Config Portd=Input Config Portb=Output
Konfiguracja całego portu B jako wyjście lub wejście: Config Portb = Output ' cały port B jako wyjście Config Portb = Input ' cały port B jako wejście Lub to samo na każdym pinie osobno: Config Pinb.0 = Output ' pin PB0 portu B wyjściem Config Pinb.1 = Output Config Pinb.2 = Output Config Pinb.3 = Output a komenda: pinb.0 = 1 'wysoki stan logiczny pinu...
No dobrze, sprawdziłem. Płytka EVBavr05. Bascom 1.11.9.5 Port A, Twój kod. Chodzi. W pierwszej linijce napis test. w drugiej 12345678. Nie trzeba ustawiać config output. Bascom sam to robi. Dodano po 6 Może to nie jest 16*2 ? Może ma trochę inaczej wyprowadzone piny? Ponieważ Twój kod skopiowałem to raczej nie ma błędów w przecinkach itp.
To do kazdego pinu przypisac . [syntax=vbnet] Config Pinc.2 = Output RESET PORTC.2 Config Pinc.3 = Output RESET PORTC.3 Config Pinc.4 = Output RESET PORTC4 Config Pinc.5 = Output RESET PORTC.5[/syntax]
daj częstotliwość na 8000000. Gdzie podłączasz diodę? btw Config Portb = Output Config Portc = Output Config Portd = Output to jest nie potrzebne
Zmień : Config Pinb.3 = Output na : config portb.3 = output
zmien konfiguracje portu 'Konfiguracja portów Config Portd.4 = Output 'Aliasy Enter Alias Pind.4 i powinno dzialac
Ustaw ten pin jako wyjście np: Config portx.0=output
Witam. Mam problem, Napisałem program ale nie działa tak jakbym tego oczekiwał. :cry: Config Portd.1 = Output , .... ........ Config Portd.1 = 0 , ..... Zauważ że cytowana wyżej linia druga zmienia wcześniejszą konfigurację portu z OUTPUT na INPUT. e marcus
Piszesz: 'instrukcja SPIINIT dla układu SLAVE nie konfiguruje jej wcale, tylko pozostawione jest to użytkownikowi." Przyznam, że jest to stwierdzenie niezrozumiałe. Myślę, że nie powinieneś już ciagnąć tematu, bo brniesz coraz głębiej-niepotrzebnie. Ponawiam prosbę do splawik00. Czy przeniesienie instrukcji konfigurującej MISO jako wyjście dla Slave...
Bo w programie musisz zmienić ustawienie częstotliwości, gdyż 1wire jest protokołem opartym na podstawie czasowej. $crystal = 1000000 na $crystal = 8000000 Poza tym to jest niepotrzebne: Config Pinc.0 = Output Config Pinc.4 = Output Config Pinc.5 = Output
Generator podepnij do PINB.1 i config PINB.1=input
Config Portb = Output?
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...
Jaką częstotliwość zegara masz podaną w ustawieniach Bascoma, tak samo jaki uK masz podany? Zawsze lepiej użyć dyrektyw REGFILE i CRYSTAL. Czy poprawnie masz ustawione źródło sygnału zegarowego w bitach konfiguracyjnych? Poprawiony kod: $regfile = "attiny2313.dat" $crystal = 1000000 Config pind.6 = output Config pind.4 = output portd.4 = 0...
Config Porta = Output nie ma wpływu na późniejsze działanie instrukcji Set Porta.2 Set Pina.3 po prostu.
sorki miałem plik o takiej samej nazwie juz wczesniej sciągnięty i nie ten co trzeba wgrałem do Bascoma :( mój błąd sory czy mógłbyś mi napisać pod które z tych wyprowadzeń : Config Pinb.0 = Output Config Pinb.2 = Output Config Pinb.1 = Output Config Pinb.3 = Output Config Pinb.5 = Output mam podpiąć odpowiednie końcówki wyświetlacza Pozdro i dzięki...
Config Pinb.1 = Output czy Config Portb.1 = Output ? tak jak pisano pwm jest gdzie indziej :)
Ps. Tu wg mnie powinno być nie : Config Pinc.0 = Output tylko: Config PORTC.0 = Output itd Jeśli chodzi o Config to bascom traktuje tak samo pin jak i port. Najlepiej jest operować na DDRn.
Witam. Tak, masz racje powinno być tak jak opisałeś "config portd.0=output ' pin sterujący diodą LED'' Tak samo jak zapis warunków o których piszesz i jest prawidłowy. Przetestuj te zmiany i zobaczymy.
np tak: Config Pinc.5 = Output Config Servos = 1 , Servo1 = Portc.5 , Reload = 4 a potem w kodzie wpisujesz odpowiednie wartości do : Servo(1) = wartość wychylenia to na szczęście w Bascomie proste jak poezja ;) zesztą zajrzyj sobie do helpa Bascom'a - config servos
Ustaw to: $crystal = 400000 tak: $crystal = 8000000 I fuse do tego. Poza tym podałem ci program który podaje PWM na 2 porty, nie musisz stosować 2 tranzystorów, wybierz 1 port na którym będzie ci to działać. Kolejna sprawa, to wielkość WAITMS musisz dobrać eksperymentalnie, ponieważ zależy od tego prędkość rozjaśniania i gaszenia lampki. Jeśli chcesz...
Config Portb.0 = Output to mi się nie podoba... dlaczego Bascom pozwolił na skompilowanie tego? Nie jestem geniuszem, ale tam chyba powinno być config pinb.0 = output
Proszę, napisz mi co to jest ten "bit fuse M103C" i jak go sprawdzić. Dodano po 1 Zrobiłem tak: http://obrazki.elektroda.pl/7670144900_1... I dalej nie czyta karty. Proszę o pomoc.
, 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...
config portd = output jeśli wyjście config portd = input jeśli wejście
w każdym uC można zastosować rezystor podciągający , w AVR z powodu dużej rozbieżności wewnętrznych rezystorów jest to zalecane szczególnie jeżeli pin / port pracuje jako wejście MirekCz ma rację nawet nie zauważyłem tego config portx odnosi się dla całego portux , natomiast config pinx.y dla konkretnego pinu portu zastosuj lepiej taki sposób konfiguracji...
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...
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...
Do autora - przyjrzyj się [syntax=vbnet]Config Portd.5 = Output : Dc_wlacz Alias Portd.5 Config Portd.1 = Input : S12_wolniej Alias Portd.1 Config Portd.2 = Input : S11_szybc Alias Portd.2 Config Pina.0 = Output : Kier_lewo Alias Pina.0 Config Pina.1 = Output : Kier_prawo Alias Pina.1 Config Pina.4 = Input : S10_start Alias Pina.4 Config Pina.5 = Input...
Jesli konfigurujesz pojedynczą końcówke to nalezy napisac Config PIN.X =input/output Config PORTX configuruje cale porty. Moze tu tkwi problem.
Nie wszędzie, tylko tam gdzie trzeba, czyli w warunkach. Config Pinc.0 = Output Config Pinc.0 = 0 To bez sensu.
Witam ! Ponawiam prośbę o schemat. Pozdrawiam. Stefan Może trzeba dodać przy konfiguracji LCD literkę "a" Config Lcd = 16 * 1a zaremuj te linie: $lcd = &HC000 $lcdrs = &H8000 Config Portb = Output Kod umieszczamy w znacznikach
A co tam chcesz ustawić w tym timerze? Coś dostrzegłem. Co nto ma być Config portb.1=1? Czytelniej chyba = input lub output. Dodano po 16 A masz helpa do bascoma po polsku?
Config Portb.0 = Output Config Portb.1 = Output Config Portb.2 = Output Config Portb.3 = Output Config Portd.7 = Output Config Portd.6 = Output Config Portd.5 = Output Config Portd.4 = Output zastąp: DDRD=255 Zastąp IFy case'ami, dodaj procedurę zerującą Portd7-4 i kod będzie zgrabniejszy. Przypisanie logiczne zastąpi 4 instrukcje sbi/cbi warte 8 taktów...
Przy czym jeśli robisz set lub reset, to dajesz zawsze set port, nigdy nie set pin. Niezależnie od tego, czy masz config pinb.0 = input czy config portb.0=output
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
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
no przecież Config Portb.1 = Output ustawia pin jako wyjście
A jak piszesz program ? podaj przykład. Używasz polecenia konfiguracyjnego config P1 = output ?
... Problem błahy, ale rozkładam ręce, pewnie zapomniałem o jakiejś oczywistej rzeczy ... Witam Tak, problem jest błahy i wynika ze specyficznego sposobu konfigurowania portów w bascom-ie. O ile instrukcje: Config Pinc.2 = Output Config Portc.2 = Output dają równoważne wyniki (chociaż poprawny zapis w/g helpa to PINx.y dla konfiguracji pojedynczego...
AVR po resecie ustawia kierunek portow na wejscia wiec tylko ustawienie jedynek na porcie podciagnie je do plusa zasilania i bedzie mozna odczytywac, tu akurat nie ma bledu. Natomiast takie wyrazenie jest zle: Config Pind.2 = Output Pind to rejestr wejsciowy i nie mozna do niego wpisywac mozna tylko odczytywac. Domyslam sieze powinno tam byc Config...
tyle to wiem, ale czy ustawiles je jako output wpisz na poczatku programu: config portA = output i teraz probij zmieniac stan na porcie A
A nie lepiej zamiast Config Pinb.1 = Output dać Config Portb.1 = Output? Możliwe że BASCOM łyknął by i to pierwsze, ale nie wiadomo czy każdy. Jednak nawet jak nie łyknie, to nie wyjaśniało by to załączania się tranzystora. Bez schematu raczej nie pomożemy. EDIT. Nie zauważyłem że napisałeś nowy post. No więc wychodzi na to że BASCOM to łyka i ustawia...
taki program się nie kompiluje po zmianie Config Portd.1 = Output na Config Portd = Output ... Config Portd = Output nie może być , bo wtedy pin RXD ustawiasz jako wyjście.Sprawdziłem , na Bascom 1.11.7.4 Config Portd.1 nie kompiluje się , ale można użyć "zamiennika" Ddrd.1=1 lub Set Ddrd.1 . Sprawdź. Piotrek
Sprawdziłem ten kod przed chwilą i jeśli na PD6 jest przycisk.. to jego kolejne naciskanie włącza lub wyłacza naprzemiennie diode LED na pinie PORTD.7 100% tested [syntax=vbnet]$regfile = "m644pdef.dat" $crystal = 8000000 $hwstack = 40 $swstack = 16 $framesize = 32 Pcmsk3 = &B01000000 Enable Pcint3 : On Pcint3 Pcint3_isr Config Portd.6 = Input : Set...
Ja bym radził żeby może tak Config PORTC = Output Config Pinc.6 = Input Pozdro
Można dopisać takie funkcje żeby niepotrzebnie nie ustawiał wartości portów jeśli te się nie zmieniły, ale to chyba gra nie warta świeczki :D Pominąłem PORTD bo widzę tam jakąś transmisje RS w configu. [syntax=vbnet]$regfile = "m128def.dat" $hwstack = 80 $swstack = 80 $framesize = 160 $crystal = 8000000 $baud = 19200 Config Porta = Output Config Portb...
W Bascom to parę linijek. Proszę bardzo: [syntax=vbnet] $regfile = "m32def.dat" 'wybor typu procesora $crystal = 8000000 'ustalenie czestotliowsci taktowania Config Pina.1 = Output ' diody Config Pina.2 = Output ' diody Config Pina.3 = Output ' diody Config Pina.4 = Output ' diody Config Pina.5 = Output ' diody Dioda_1 Alias Porta.1 'Wygodne aliasy...
przykład : Config Debounce = 30 Config Portd.1 = Output 'tx do vfd Config Portd.6 = Input 'enkoder Config Portd.7 = Input Set Portd.6 Set Portd.7 Config Portd.0 = Input 'przyciski po koleji : -v , +v , +/-a , wyświetlacz Config Portd.2 = Input Config Portd.3 = Input Config Portd.4 = Input Set Portd.0 Set Portd.2 Set Portd.3 Set Portd.4
Po pierwsze. Nie ma znaczenia czy przy konfiguracji portu użyjesz PIN czy PORT bo pod uwagę brany jest tylko numer pinu a operacja w obydwu przypadkach dzieje się na rejestrze DDR. Na dowód tego przedstawiam program i wygenerowany kod asm który jest identyczny dla obydwu zapisów. Napisałem autorowi, by zmienił Port na Pin, bo któraś wersja Bascoma...
nie wiem czy zadzial pisze z pamieci $regfile "m8def.dat" $crystal = 8000000 Do If Pinc.1 = 0 Then Config Portb = Not Portb End If Loop i chyba jeszcze trzeba skonfigurowac port jako wyjscie Config PORTB = Output
Set Portd.5 - będzie stan wysoki albo: Pind.5= 1 Toggle zmienia stan Pinu, u ciebie nie był ustawiony żaden stan.
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ć.
$crystal = 8000000 Config Lcd = 16 * 1a Config Int0 = Falling Config Timer0 = Timer , Prescale = 256 Config Watchdog = 2048 Config Pind.0 = Input Config Pind.1 = Input Config Pind.3 = Output Config Pind.4 = Output Config Pind.5 = Output Dim Regulation_counter As Byte Dim On_off_flag As Bit Dim Regulation_type_flag As Byte Dim Int_counter As Byte Dim...
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...
Z tego, co pamietam, nie w każdej wersji Basoma działała tak napisana konfiguracja. Może spróbuj zamiast tego: Dodano po 3 Pracując z płytkami Arduino (różnego wydania i versji) musisz pamiętać że zasadniczą częścią ich funkcjonalności jest wpisany tam bootloader Kolega autor już skasował bootloader. Jeśli będzie potrzeba użycia tego badziewnego bootloadera,...
"Bascom nie radzi sobie z maleństwem" A mnie się widzi , że to programiści nie radzą sobie z Bascomem ;) Po pierwsze Ty chyba również zumek :D Tak deklaracja we/wyj powinna wyglądać Config Pinb.3 = Output Config Pinb.2 = Output Config Pinb.4 = Input zamiast wait3 spróbój waitms 3000 Bascom przy wywołaniu instrukcji Wait używa pamięci RAM, chociaż nie...
Zamierzam w swoim projekcie wykorzystać funkcję "config KBD" gdyż będę potrzebował użycia dużej liczby przycisków do obsługi at32. Proszę o podpowiedź czy praca takiej funkcji, a szczególnie "debounce" i "delay" w niej zawarte nie zatrzymają timerów pracujących cały czas w przerwaniu. Z góry dziękuję za pomoc.
Dzisiaj akurat potrzebowałem rejestru HC595 do rozszerzenia liczby wyjść użytecznych. Poniżej fragment kodu w bascomie. Przypisane nazwy odpowiadają katalogowym. Zmienną Portx traktujemy jak zwykły 8 bitowy port wyjściowy. Kod z pod etykiety 'obsługa rejestru' wstawiamy w pętli głównej programu, aby rejestr był na bieżąco odświeżany. [syntax=basic4gl]...
Działaj na pojedynczych pinach: config portc.1= output portc.1=1 albo set portc.1
Powinno być CONFIG PINA.4=OUTPUT, a nie PORT.
Co jest grane mianowicie w programie BASCOM AVR po napisaniu i skompilowaniu programu który (takiego głupiego) wysyła np. liczbę 234 w emulacji programowej te "światełka" symbolizujące stany pinów procesora wogule się nie zmieniają ?? jakie mogą być przyczyny Config Portb = Output Portb =234 pomórzcie :cry:
Witam. Mam problem z uruchomieniem Proszę o pomoc co mam dalej robić . Czy problem jest z programem czy z schematem? Problem jest w dalszym ciągu z programem... Widzę że naniosłeś poprawki w programie "hurtem" zamiast analizowac każdą linię konfiguracji pojedynczo(!)... Ta uwaga z poprzedniego postu dotyczyła tylko konfiguracji wejśc Wyjścia , zarówno...
Nie co Ci pomogę , poprawiłem deklaracje portów oraz cześć programu ,wystarczy napisac wlasne procedury ;) Config Portb.0 = Output 'Konfiguracja portów Config Portb.1 = Output Config Portb.2 = Output Config Pinb.3 = Input Config Pinb.4 = Input Wzmacniacz Alias Portb.0 Mixery Alias Portb.1 Swiatlo Alias Portb.2 Declare Sub Wlacz Declare Sub Wylacz Sw_on...
Z tym "po drugie" to trochę się zdublowało, a poprawna składnia to: Config pinb.7 = output Chociaż kompilator Bascom "lyka" też nieporawną konstrukcję: Confg portb.7 = Output A w helpie mamy: CONFIG PORTx = state - dla całego portu CONFIG PINx.y = state - dla poszczególnych pinów Z tym po trzecie to zupełnie nieprawda, bo timer zlicza od chwili kiedy...
W bascomie to masz tak: [syntax=basic4gl] config pind.6=output ' wyprowadzenie PD6 jako wyjście set portd.6 'stan spoczynkowy-1[/syntax]
ok, tylko najpierw uporam się z przyciskami i nastawami :P Dodano po 28 $regfile = "m8def.dat" $crystal = 8000000 Config Portd = Output 'podłaczony wyświetlacz 'Config Pinb.0 = Output ' anoda 1 źle! nazwa pin służy do odczytu wartości 'Config Pinb.1 = Output 'anoda 2 źle! aby ustawić należy się posłużyć nazwą Portb.x 'Config Pinb.2 = Input...
Dioda płynnie się zapala,kiedy uzyka maksymalną jasność gaśnie i program sie powtarza.100% dobry program wersja dla wewnętrzengo rezonatora RC 1MHZ $regfile = "m8def.dat" $crystal = 1000000 Config Pinb.1 = Output Config Pinb.2 = Output Dim I As Byte Config Timer1 = Pwm , Pwm = 8 , Compare A Pwm = Clear Up , Compare B Pwm = Clear Down , Prescale...
Potestuj bo tak na szybko przy poobiedniej kawie klapałem jedną ręką :D Może coś przeoczyłem i trzeba prześledzić. Te złożone operacje w jednej linii dla stałych Bascom robi bez problemu. Osobiście bym tego tak nie napisał. Nie wiem po co to ciągle obliczać jak można raz... [syntax=vbnet]$regfile = "m328pdef.dat" $crystal = 16000000 $hwstack = 64 $swstack...
Jak to mówią diabeł tkwi w szczegółach... $crystal = 8000000 $regfile = "m16def.dat" Config Portb = Output Config Pina.1 = Input Do If Pina.1 = 1 Then Reset Portb.6 End If If Pina.1 = 0 Then Set Portb.6 End If Loop End
Spróbuj tak: $regfile = "m8def.dat" $crystal = 8000000 Config Portd.7 = Output Portd.7 = 0 Config Clock = Soft Time$ = "12:40:00" Enable Interrupts Do If _min = 41 Then '60s później włącza przekaźnik Portd.7 = 1 End If Loop End
Pisz raczej Config a nie Cofing.
Kod programu: '$tiny $regfile = "attiny13.dat" 'plik z definicjami procesora attiny13 $crystal = 1000000 'częstotliwość taktowania procka 1Mhz Config Portb.0 = Input 'Wejście REM Config Portb.4 = Output 'Przekaźnik GŁOŚNIK Config Portb.3 = Output 'Przekaźnik REM Set Portb.0 Reset Portb.3 Reset Portb.4 Dim Znacznik As Iram Byte Znacznik = 1...
do tego dochodzi złą konfigóracja portu. jak ustawiasz pojedynczy pin to robisz przez pinx.y a jak cały port to portx Config Pinb.0 = Output
$regfile = "m8def.dat" $crystal = 8000000 Config Pind.0 = Output Portd.0 = 0 Config Pind.3 = Input Set Portd.3 Config Int1 = Low Level On Int1 Ir Enable Interrupts Enable Int1 Do Loop End Ir: Disable Int1 Toggle Portd.0 Enable Int1 Return Jeszcze najlepiej jakies opoznienie dodac. Zapraszam do czytania podstaw o odbiornikach i nadajnikach...
spróbuj : Config PORTC = output
No fakt bascom 8051 jest do tych procesorów dzięki za podpowiedz ale jeszcze jeden mam problem ponieważ jestem zaczynającym dopiero.Podpowie mi ktoś jak napisać coś takiego by kompilator błędami nie sypał dla AT89C51 a więc: config P1.0 = input config P2.0 = output
Najpierw "mikroswłicz" który po wciśnięciu drga. Czyli przełącza wielokrotnie- a nie wiesz jaki stan procesor bada na wejściu- po są drgania. Najprostsza metoda: If Pinb.3 = 0 Then waitms 20 If Pinb.3 = 0 Then ......... end if end if To oznacza że po wciśnięciu mikroprzełącznika odczekujesz 20ms i jeśli po tym czasie masz taki sam stan to się "uspokoił"...
...Coś nie tak jest z programem: wykonywana jest cały czas pętla rc51, chociaż nie zwieram nic do masy. Gdybyś zamiast ... Config Portd.2 = Input Config Portd.3 = Input Config Portd.4 = Input Config Portd.5 = Input Config Portb.3 = Output Dim Togbit As Byte , Command As Byte , Adress As Byte S1 Alias Portd.2 S2 Alias Portd.3 S3 Alias Portd.4 S4 Alias...
$regfile = "m8def.dat" $crystal = 1000000 Config Pinc.0 = Output Config Pinc.5 = Output Dioda1 Alias Portc.0 Dioda2 Alias Portc.5 Config Int1 = Low Level Config Rc5 = Pind.2 On Int1 Przzew0 Dim Komenda As Byte , Adres As Byte Dim Odebrano As Bit Enable Interrupts Enable Int1 Do If Odebrano = 1 Then If Adres = 0 Then 'pilot o adresie 0 toggle...
Sprawdziłem to dla sportu bo taki prosty kodzik od czasu do czasu to jak zjedzenie cukierka :D i to nawet działa. Oświetlone słońcem czy tam nawet żarówką LED`ową się nie wzbudza a przy zbliżeniu i owszem. Tiny85 ma juz wbudowany wzmacniacz dla ADC i tam mozna więcej nawet zadzaiałać, ale Tiny13 nie ma więc dla czułości użyłem wewnętrznego napięcia...
Witam, pozwoliłem sobie na drobną modyfikacje Twojego kodu. Dobrze się przyglądnij, porównaj działanie w symulatorze a zobaczysz gdzie jest błąd. Powodzenia!!! $regfile = "m8def.dat" $crystal = 8000000 Config Lcd = 16 * 2 Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = Portc.1 , Db7 = Portc.0 , E = Portc.4 , Rs = Portc.5 Config...
Tu jest błąd: Config Portd.4 = Output Jesli konfigurujesz pojedyncze piny to nie PORT a PIN. Czyli: Config Pind.4 = Output
To jest tylko schemat! do tych nóżek co on ma diody i switche ja mam podpięty programator isp. Czy konfiguracja pinow (Config Pind.7 = Output ) jest poprawna ? powinno to tak działac?
Działa bez problemu : Config Porta = Input Config Portb = Output Config Lcdpin = Pin , Db4 = Portb.1 , Db5 = Portb.2 , Db6 = Portb.3 , Db7 = Portb.4 , E = Portb.5 , Rs = Portb.6 Config Lcd = 20 * 4 Deflcdchar 0 , 31 , 31 , 31 , 31 , 31 , 31 , 31 , 31 Deflcdchar 1 , 31 , 17 , 17 , 17 , 17 , 17 , 17 , 31 Do Locate 4 , 3 If Pina.0 = 0 Then Lcd Chr(0);...
Nie jest dobrze. Przy takim zapisie masz skonfigurowane jedynie wejście na końcówce C.1 co ustawiłeś rozkazem Config pinC.1 = Input Powinieneś mieć jeszcze jedno wejście jeśli piszesz: "mamy dwa sygnaly z silnika 1. sygnal zaplonu ( 4 impulsy na cykl pracy) 2 sygnal pierwszego cylindra ( jeden impuls na cykl pracy , pomiedzy impulsami zaplonu) program...
5 config pina.1 = output | pin a skonfigurowany jako wyjściowa config pina.1 = input |pin a skonfigurowany jako wejście proste
Napisałem taki program i sprawdziłem go z ATTiny13 (nie mam ATTiny25): $regfile = "ATtiny13.DAT" $crystal = 1000000 Config Pinb.0 = Input Portb.0 = 1 Przycisk Alias Pinb.0 Config Pinb.1 = Output Portb.1 = 1 Led Alias Portb.1 Do If Przycisk = 0 Then Waitms 100 Bitwait Przycisk , set Gosub Praca End If Loop End Praca: Led = 0 Wait 1 Led...
Błąd kompilatora, że pozwolił nadać alias zadeklarowanej zmiennej. A działa tak: $regfile = "m32def.dat" ' specify the used micro $crystal = 8000000 ' used crystal frequency Config Pina.0 = Output Config Pina.1 = Output Przekaznik Alias Porta Dim X As Byte X = 1 Set Przekaznik.x end
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...
Jeśli założyć, że przycisk podpięty do PORTD.1 i jeśli założyć, że dobrze zrozumiałem Twoją idee programu, bo namieszałeś okropnie, to... $regfile = "m8def.dat" $crystal = 1000000 Led Alias Portb.0 Config Pinb.0 = Output config Pinb.0 = input : Portb.0=1 Do if Pinb.0= 0 then Set Led Waitms 400 Reset Led Waitms 700 else Set Led Waitms 1000 Reset Led...
Poczytaj tematy i uzyj szukaj. Attiny2313 nie posiada adc wiec potencjometrem nie dasz rady tego sterowac. Domyslam sie ze robisz do w bascomie. Tu masz kawalek kodu jak konfigurowac timery zebys mial 4 pwm. '******* procek ******* $regfile = "attiny2313.dat" $crystal = 8000000 $hwstack = 30 $swstack = 30 $framesize = 30 '****** dioda R/G...
zbocze bascom config bascom config serialin bascom config input
unifi kamera instalacją firefox filtr elektromechaniczny
flash extractor flash extractor
Czyszczenie klap wirowych Audi A6 C5 163KM Punkt strojenia zero detektora w Menuet UKsrf