regfile attiny13

Jak skonfigurować Bascom dla Attiny13 bez dedykowanego wsparcia?

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ć.

[bascom] Jak obsłużyć microswitch w Bascom na ATtiny13, by dioda mrugała?

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ć.

Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

ATtiny13 - [Bascom] Przerwanie INT0 od syg. z generatora

Aktualnie program wygląda następująco: Bo taki masz program.... To co zamierzasz osignąc, musiałbyś zmienic na: Config Portb.2 = Output 'triac Triac Alias Portb.2 Poza tym jeden 'return' na końcu subrytyny "Pin_change_isr: . e marcus

ATtiny13, bascom - nieregularne miganie diody, ustawienia $crystal?

Witam ! Spróbuj ten program wgrać do Tinki13 z fusami fabrycznymi, powinno być ok. $regfile = "ATtiny13.DAT" $crystal = 1200000 '9600000 / 8 = 1200000 Config Pinb.0 = Output Portb.0 = 0 Led Alias Portb.0 Do Led = 0 Waitms 500 Led = 1 Waitms 500 Loop End Pozdrawiam. Stefan amator GG6293398 http://obrazki.elektroda.net/58_12350502...

[BASCOM] Jak napisać program w BASCOM dla termostatu z microswitchem?

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...

[Attiny13][Bascom] - Sterowanie jednym przyciskiem kilkoma funkcjami.

Zmiana stanów led po przytrzymaniu przycisku ma jedną zaletę, otóż jeśli chcę szybko przejść do stanu gdzie świecą się oba ledy. W niczym mi to nie przeszkadza. Jeśli tak, to nie ma problemu. Możesz jeszcze zebrać opóźnienia w jednym miejscu: [syntax=basic4gl] $regfile = "attiny13.dat" $crystal = 1000000 Config Portb = &B111100 Portb = &B000010 Dim...

BASCOM AtTiny85 - Początki, programy, problemy, pytania...

Zajętość flash`a z 46% na 38% :P Tak bym się nie bawił, ale w Tiny13 to ma znaczenie bo można coś jeszcze upchnąć ahahaha :D [syntax=vbnet]$regfile = "attiny13.dat" $crystal = 9600000 $hwstack=20 $swstack = 8 $framesize = 16 'Declare Sub Zmiana Config Pinb.2 = Input Set Portb.2 Config Portb. 4 = Output Config Servos = 1 , Servo1 = Portb.4 , Reload =...

[Attiny13] Attiny13 BASCOM - Procesor nie przechodzi w tryb power down, co robić?

Diody migają po dwa razy, kolejne dwa razy zawsze po naciśnięciu przycisku, tak w kółko. Jak nie naciskam to nic się nie dzieje. Zdaje się że taki zamiar był tego programu... Niemniej jednak spróbuj ten code: [syntax=basic4gl][/syntax ... $regfile = "attiny13.dat" $crystal = 9600000 Config Portb = &B011000 Portb = &B000010 $hwstack...

Jak zbudować układ liczący zwarcia styków z blokadą po 30 naciśnięciach?

_-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...

[Bascom] Jak napisać program w Bascom do sterowania przekaźnikami K1 i K2?

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...

Projektowanie zaawansowanego timera SOS na układzie NE555 - jak to zrobić?

Mnej więcej tak by wyglądał program: [syntax=basic4gl] $regfile = "ATtiny13.DAT" $crystal = 1200000 Config Pinb.0 = Output Portb.0 = 0 Led Alias Portb.0 $hwstack = 8 $swstack = 8 $framesize = 8 Do Led = 1 : Wait 1 : Led = 0 : Wait 1 Led = 1 : Wait 1 : Led = 0 : Wait 1 Led = 1 : Wait 1 : Led = 0 : Wait 1 Led = 1 : Wait 3 : Led = 0 : Wait 1 Led = 1 :...

[bascom] - Program na ATtiny13: If...then, sterowanie pinami z opóźnieniem

No masz moją wersje rozwiązania tego problemu. W symulatorze działa. Na uP nie testowałem. [syntax=basic4gl][/syntax] $regfile = "attiny13.dat" $crystal = 1000000 Dim Fp1 As Bit Dim Fp2 As Bit Config Pinb.3 = Input Config Pinb.4 = Input Config Pinb.1 = Output Config Pinb.2 = Output Set Portb.3 'podciagniecie do +5V Set Portb.4 Do If Pinb.3 = 0 And Fp1...

Programowanie ATTiny w Bascom: Wybór modelu i konfiguracja pinów

Simple how it`s look but should work ;) Set Freq manually but 1,2MHz is a oryginal value [syntax=basic4gl]$regfile = "attiny13.dat" $hwstack = 24 $swstack = 8 $framesize = 24 $crystal = 1200000 '$lib "mcsbyteint.lbx" ' <-option Config Portb = &B00100011 : Portb = &B11000000 Config Adc = Single , Prescaler = 8 , Reference = Avcc Start Adc...

BASCOM - Attiny13 - 2 wejścia i jedna zmienna - na różne sposoby.

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...

Budowa i kalibracja czujnika światła z wykorzystaniem BASCOM i m328p

Nie widziałem wcześniej, że już na to wpadłaś. Twój się kalibrował tylko w jedną stronę a ten powinien w obydwie (ale nie testowałem) ;) [syntax=vbnet]$regfile = "attiny13.dat" $crystal = 9600000 $hwstack = 2 $swstack = 0 $framesize = 22 Config Adc = Single , Prescaler = Auto , Reference = Avcc Dim Mem_adc As Word , New_adc As Word Dim Krok As Byte...

[ATTINY13] BASCOM - PWM do sterowania 3 diod LED przez driver tranzystorowy

Też mi pomoc :) Piszę właśnie programik na attiny13 więc proszę : $regfile = "ATTINY13.DAT" $crystal = 9600000 Config Adc = Single , Prescaler = Auto , Reference = Avcc Config Pinb.0 = Output Config Timer0 = Pwm , Prescale = 8 , Compare A Pwm = Clear Down Dim A As Byte Do Incr A Pwm0a = A Waitms 10 Loop End

Jak zbudować układ z opóźnieniem do chwilowego włącznika przekaźnika 12V?

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]

attiny13 - dioda LED świeci ciągle zamiast migać, co ustawić?

Ja w programie z pierwszego postu zmieniłem tylko linijke $crystal na 1200000 i u mnie dioda miga co 1s. $regfile = "attiny13.dat" $crystal = 1200000 Config Pinb.3 = Output Do Set Portb.3 Wait 1 Reset Portb.3 Wait 1 Loop End

Grzałka sterowana 70 - 150 st. Celsjusza - szukam schematu

Ja to zrobiłem na Attiny13, temperatura jest określona na stałe, taka byłą specyfika mojego projektu laminatora (do folii UV). Kod był zaczerpnięty z sieci, lekko go zmodyfikowałem. Pamiętam, że teoria nie pokrywała się z praktyką i musiałem wpisać temperaturę z przesunięciem o kilka stopni. [syntax=vbnet]' Uk³ad z sam¹ diod¹ dzia³ao...

[ATTiny13] [ATTiny13][BASCOM] Jak zmierzyć obroty i zapalić LED po osiągnięciu RPM?

$regfile = "attiny13.dat" $crystal = 12000000 $hwstack = 8 $swstack = 8 $framesize = 8 Głupek ze mnie zapomniałem, że fuse bity się zmienia. Ustawiłem na 1,2MHz. Dalej coś nie teges. 04 marca podajesz ,że poprawiłeś na 9,6MHz. $crystal = 96000000 = 96MHz $crystal = 12000000 = 12MHz . A nie 1,2MHz .:cry:

attiny13 - Problem z kompilacją kodu PWM w Bascom przy dzieleniu zmiennej

Skasuj te słowa "Iram" - w wersji 2075 ten numer nie przejdzie w ten sposób. Pod deklaracją procesora powinieneś też określić wielkości stosów i ramki. Na przykład: [syntax=vbnet] $regfile = "attiny13.dat" 'typ proca $crystal = 1200000 $hwstack = 8 $swstack = 8 $framesize = 24[/syntax] Musisz też wiedzieć że nowy Tiny13 jest taktowany predkością 1,2MHz...

Attiny13 Timer0 przerwanie w Bascom – dioda nie miga, co poprawić w kodzie?

OK później zaprogramuje ale wyszło to tak: $regfile = "attiny13.dat" Config Portb.4 = Output $hwstack = 32 $swstack = 16 $framesize = 8 Dim A As Byte Config Timer0 = Timer , Prescaler = 64 On Timer0 Przerwanie Enable Interrupts Enable Timer0 Start Timer0 Do Loop end Przerwanie: Timer0 = 106 Toggle Portb.4 Return

Sterowanie LED na ATtiny13 przez TSOP36kHz nie działa z pilotem

Wklepałem coś takiego: $regfile = "attiny13.dat" $crystal = 1200000 Config Portb.0 = Output Config Portb.4 = Input do PortB.0 = PortB.4 Loop End Wcześniej to samo tylko z adres i comand Nadal martwy... Dodano po 1 Dlaczego pin a nie port? Dodano po 4 Niestety zmiana na pin nic nie dała, dalej martwy...

[BASCOM] Jak obliczyć rzeczywistą częstotliwość PWM dla Attiny13A w BASCOM?

$regfile = "attiny13.dat" $crystal = 9600000 $hwstack = 8 $swstack = 8 $framesize = 8 Dim I As Byte Config Pinb.0 = Output Config Timer0 = Pwm , Prescale = 64 , Compare A Pwm = Clear Down Do I = 128 Pwm0a = I Loop End W fusebitach włączony jest wewnętrzny oscylator 9,6 Mhz. W czasie pracy dioda błyska, miernik mój pokazuje 0,03 kHz

ATtiny13 - błąd 22 out of SRAM space przy deklaracji zmiennej byte

witam czy był by ktoś tak dobry i powiedział mi dlaczego kiedy zadeklaruję choć jedną zmienną byte wyskakuje mi błąd 22 out of sram space nie dzieje się tak gdy deklaruję zmienną jako bit czyżby coś "zjadało" mi te 64 bajty sram-u ???? $regfile = "ATtiny13.dat" $crystal = 9600000 Config Portb = Output Dim X As Byte Dim Y As Byte Dim Z As Bit...

[Bascom] Czy kod w Bascom dla włącznika RC5 na ATTiny13 jest poprawny?

Gdyby ktoś był zainteresowany. Sprawdzony i działa. [syntax=basic4gl]$crystal = 8000000 $regfile "attiny13.dat" Config Portb.4 = Output Portb.0 = 0 Config Rc5 = Pinb.0 Dim Address As Byte , Command As Byte Enable Interrupts Do Getrc5(address , Command) Command = Command And &B01111111 If Address = 0 And Command = 13 Then Toggle Portb.4 Waitms 100 End...

[AVR] Jak ustawić programator Combo 3 dla Attiny13 w Bascom? Rezonator wewnętrzny vs zewnętrzny

Poniżej kod programu migania diody Led podłączonej do pinu nr5 ATTiny13 przez rezystor około 1k do +5V. Fuse bity ustawione fabrycznie. Port zmienia stan co około jedną sekundę. $regfile = "attiny13.dat" $crystal = 1200000 Config Pinb.0 = Output Portb.0 = 0 Led Alias Portb.0 Do Toggle Led Wait 1 Loop End Powodzenia życzę. Stefan

[Bascom] Attiny 13 - mała rzecz duży kłopot, sterowanie LED

To fragment kodu (konfiguracja PWM), który działa u mnie w sterowniku na 100% [syntax=basic4gl]$regfile = "attiny13.dat" $crystal = 1200000 $hwstack = 32 $swstack = 8 $framesize = 16 Config Portb.0 = Output Config Timer0 = Pwm , Compare A Pwm = Clear Down , Compare B Pwm = Disconnect , Prescale = 1 Dim X As Byte '--- Do Pwm0a = X 'parametr 0-255 Loop...

Restarter urządzeń (Attiny13)

Prąd, prąd, prąd... A nikt się przerośniętego programu nie czepia ;) Ja jestem słaby w optymalizacji, kto da mniej?! :D [syntax=vbnet]$regfile = "attiny13.dat" $crystal = 9600000 $hwstack = 16 $swstack = 8 $framesize = 8 Config Pinb.4 = Output Reset Portb.4 Config Pinb.0 = Output Reset Portb.0 Przekaznik Alias Portb.4 Led Alias Portb.0 Dim Sekundy As...

Attiny13 BASCOM – przerwanie INT0 nie wywołuje procedury, kod nie reaguje

witam mam mały problem napisałem taki program ma byc on na attiny13 :) $regfile = "attiny13.dat" Config Portb.2 = Output Config Int0 = Falling Enable Interrupts Enable Int0 On Int0 Czekaj Set Portb.2 Do Loop End Czekaj: Reset Portb.2 Waitms 5 Set Portb.2 Return Kiedy na wejscie podamy 0 to na wyjsciu ma sie pojawić 0 przez 5ms i po tych 5ms stan wyjscia...

ATTINY13 i BascomAVR - brak reakcji LED po wgraniu programu

A spróbuj w ten sposób ja tak mam i działa: $regfile = "attiny13.dat" $crystal = 9600000 Ddrb = &B00000111 Reset Portb.1 Set Portb.2 Do Reset Portb.0 Waitms 500 Set Portb.0 Waitms 200 Loop End Nigdy nie lubiłem korzystać z procedury config wole samemu ustawiać rejestry procesora. A rejestr Ddrb jest odpowiedzialny za konfiguracje pinów portu B. A z...

ATTINY13A-PU Bascom - Jak uruchomić dwie pętle jednocześnie?

Zastosuj przerwanie od Timer'a. ps. Nie ma czegoś takiego jak ATTiny16. Chodzi Ci o 15 czy 26 ? Tak na szybko (sprawdź): $regfile = "attiny13.dat" $crystal = 1000000 'częstotliwość taktowania $hwstack = 20 $swstack = 10 $framesize = 10 Const Div_t0 = 125 '1 ms Config Timer0 = Timer , Prescale = 8 On Timer0 Int_t0 Enable Timer0 Enable Interrupts...

ATMEGA8 - dlaczego kod na powolne rozjaśnianie LED nie działa?

$regfile = "attiny13.dat" $crystal = 8000000 Ddrb.3 = 1 Config Pinb.0 = Output Config Timer0 = Pwm , Pwm = 8 , Compare A Pwm = Clear Up , Prescale = 1 Dim I As Byte Do For I = 1 To 255 Pwm0b = I Waitms 50 Next I For I = 255 To 1 Step -1 Pwm0b = I Waitms 50 Next I Loop End Pomoże mi ktoś z tym czasem?:(

[Attiny13] [Attiny13][BASCOM] Jak dodać diody prostownicze do obwodu światła na pilota?

Taki napisałem program, przetestowany. Jak dla mnie to działa dobrze. Może jakieś poprawki, sugestie? [syntax=basic4gl] $regfile = "attiny13.dat" $crystal = 1000000 Config Portb.2 = Input Portb.2 = 1 Config Portb.1 = Output Portb.1 = 0 Do If Pinb.2 = 0 Then Waitms 100 Toggle Portb.1 Waitms 500 End If Loop End[/code] [/syntax] Chciałbym zrobić płytkę...

[Attiny13v] Attiny13v Bascom - Jak obejść brak pamięci sRAM dla zmiennej Byte?

Na początek dodam prosty program z wykorzystaniem zmiennej typu "byte" $regfile = "attiny13.dat" $crystal = 8000000 Config Pinb.0 = Output Config Pinb.1 = Output Config Pinb.5 = Input Reset Portb.5 Dim A As Byte Declare Sub Led Do If Pinb.5 = 1 Then Gosub Led Else Portb.1 = 1 End If Loop End Led: For A = 0 To 10 Portb.0 = 1 Waitms 100...

[BASCOM] Sterowanie przyciskiem podłączonym do VCC.

Robiłem tak (attiny13): POTRB.4 podciągnięty 10k rezystorem do GND, od tego kabel do microswitcha, od niego do VCC PORTB.3 - dioda led - VCC (dla testu) program: $regfile "attiny13.dat" $crystal = 4800000 Config Portb.3 = Output Config Portb.4 = Input Led Alias Portb.3 S1 Alias Portb.4 Do Debounce S1 , 0 , Pr1 , Sub Loop End Pr1: Toggle...

Attiny13 - Powolny ruch serwa, szarpanie i mało pamięci.

Mam inny kod, który działa i zajmuje tylko ~40%, ale już łeb mi pęka dzisiaj żeby kombinować... [syntax=vbnet] $regfile = "attiny13.dat" $crystal = 9600000 $hwstack = 16 $swstack = 8 $framesize = 16 Declare Sub Lewo Declare Sub Prawo Config Pinb.4 = Input Set Pinb.4 Config Portb.3 = Output Dim A As Word Dim Krok As Byte Dim Lock As Bit Do If Lock =...

[ATtiny13] [ATtiny13][Bascom] Opóźniacz - Dlaczego przekaźnik nie zmienia stanu?

Zrozumiałem swój błąd Mea culpa maxima więc teraz program wygląda tak: $regfile = "attiny13.dat" $crystal = 4800000 Config Pinb.0 = Output Portb.0 = 1 Wait Portb.0 = 0 End i nawet zapala i gasi diodę na B.0 ale... rusza po ok 2 min, i wait 3 nie ma nic wspólnego z 3 sek. - jest ich ok 40 - fusebity ustawione na 4,8MHz i nie wiem dlaczego -...

Sprawdzenie kodu oraz doradzenie w razie konieczności.

Do Saabotaz Dziękuje za podanie przykładu. Ale chodzi mi o coś mnie skąplikowanego. Posiłkując się siecią napisałem coś takiego: ' mryganie led + switch $regfile = "attiny13.dat" $crystal = 9600000 Config Pinb.0 = Output Config Pinb.3 = Input Do Debounce Pinb.3 , 0 , Tryb1 , Sub Loop Tryb1: Wait 1 Toggle Portb.0 Wait 2 Return End Tryb2: Wait 2 Toggle...

Bluetooth HC-05 i brakujący sygnał o wysyłaniu (jak TXDEN w FT232)

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...

[BASCOM,AVR] BASCOM AVR attiny13 – błąd kompilacji Assignment error przy Cofing Pinb Output

Witam! wszystkich. Napisałem program węża świetlnego w Bascomie i przy kompilacji pokazuje mi error : Assignment error $regfile = "attiny13.dat" $crystal = 9600000 Cofing Pinb = Output Portb = $b010101 Do Rotate Portb , Left Waitms 300 Loop End Proszę pamiętać o używaniu znaczników code . - arnoldziq Przeniesiono z Programowanie Ogólne. -...

Jak odblokować ATmega8 po zmianie ustawień Fuses na Ext. Crys.?

Witam Do ATtiny13 wgrałem taki kod $regfile = "ATtiny13.dat" $crystal = 1200000 $hwstack = 32 $swstack = 18 $framesize = 8 Config Pinb.4 = Output Portb.4 = 0 Led Alias Portb.4 Do Set Led Waitms 40 Reset Led Waitms 40 Loop End Podłączyłem diodę LED i wszystko działa :) Teraz mam pytanie czy zostawić 40 ms. czy może zwiększyć lub zmniejszyć...

Jak zbudować układ do załączania przekaźników co 5 sekund?

Fakt, niespodziewane resety mogą się zdarzyć :) Ale są sposoby by zapobiec, choćby odpowiednio filtrując zasilanie, np. filtrem CLC. Tu przykąłdowy listing, przekaźniki włączają sie i pozostają włączone. $regfile = "attiny13.dat" $crystal = 1000000 Config Portb = Output Portb.4 = 0 Portb.3 = 0 Portb.2 = 0 Portb.1 = 0 Do Set Portb.1 Wait 5...

ATtiny13 Bascom - dwie funkcje w jednym przycisku jedna zależna od drugiej

Łap. Napisałem w przerwie między... Zajmuje połowę mniej niż Twój a działa :D [syntax=vbnet]$regfile = "attiny13.dat" $crystal = 9600000 $hwstack = 8 $swstack = 8 $framesize = 8 Config Portb = &B01110 : Portb = &B10001 Sw Alias Pinb.0 D1 Alias Portb.1 : Set D1 D2 Alias Portb.2 D3 Alias Portb.3 Config Timer0 = Timer , Prescale = 1024 , Clear...

Attiny13 BASCOM: Jak skonfigurować ADC dla poprawnego odczytu?

Próbuję odpalić programik na Attiny13, ale nie mogę dojść do ładu z ADC. Może ktoś mógłby podpowiedzieć? $regfile = "attiny13.dat" Config Adc = Single , Prescaler = Auto , Reference = Internal Config Pinb.1 = Output Config Pinb.2 = Output Config Pinb.0 = Output Dim Wart_ac As Iram Byte 'zmienna na wartość odczytaną z przetwornika Dim V As...

[ATtiny13] Jak ustawić FUSE BIT w ATtiny13 dla mrugającej diody?

Witam Zablokowałem już kiedyś przez przypadek atmegę8 więc więc wole się zapytać zanim coś zaprogramuję. Można powiedzieć, że jest to moje drugie starcie z mikroprocesorem. Zakupiłem ATtiny13-20PU i jako pierwsze postanowiłem wykonać mrugająca diodę i mam program: $regfile = "attiny13.dat" $crystal = 1200000 Config Pinb.3 = Output Do Set Portb.3...

[Attiny13] [Attiny13][BASCOM] Włącznik światła na pilota RC5 nie reaguje

Witam, projektuje wlasnie sobie wylacznik swiatla na pilota. Oto programik: $regfile = "attiny13.dat" $crystal = 4000000 Config Portb.4 = Output Config Rc5 = Portb.1 Dim Address As Byte , Command As Byte Do Getrc5(address , Command) Command = Command And &B01111111 Waitms 100 If Address = 0 And Command = 1 Then Portb.4 = 1 End If If...

[attiny13][bascom] - dodawanie i odejmowanie od licznika

W twoim kodzie żeby 2 i 3 warunek został w ogóle sprawdzony musi być cały czas wciśnięty przycisk, zrób porządna obsługę przycisku a dopiero reszte. Być może po tej modyfikacji kod zadziała według twoich założeń: [syntax=basic4gl]$regfile = "attiny13.dat" $crystal = 1000000 $hwstack = 16 $swstack = 16 $framesize = 16 Config Pinb.1 = Input Config Portb.2...

ATTINY 13 - LED nie gaśnie całkowicie po naciśnięciu przycisku na Pinb.1

Uczę się programować,i mam problem z attiny 13. Napisałem prosty program: $regfile = "attiny13.dat" $crystal = 9600000 Config Portb = &B111100 Portb = &B100000 Do If Pinb.0 = 1 Then Portb.3 = 1 Elseif Pinb.1 = 1 Then Portb.3 = 0 End If Loop End Pod Port b.3 podłączyłem diodę, lecz ona cały czas świeci. Gdy wcisnę przycisk podpięty pod port...

Jak zmierzyć wypełnienie impulsu w Bascomie? Szukam przykładowego kodu

Idę w jakimś kierunku czy zacząć od nowa ? $regfile = "attiny13.dat" $crystal = 10000000 $baud = 19200 $hwstack = 32 $swstack = 10 $framesize = 40 Config Timer0 = Counter , Edge = Rising Dim A As Byte Enable Timer0 While Pinb.0 = 0 : Wend Timer0 = 0 Start Timer1 While Pinb.0 = 1 : Wend Timer0 = A Stop Timer1 If A < 100 Then Set...

Miniaturowy wyłącznik czasowy - jakieś proste i praktyczne rozwiązanie

Zainstalowałem Proteus do testowania, gdzie w nim działa tak jak powinno, a jak wgram do uC i zmontuję na płytce stykowej nie działa dioda zamiast migać świeci. Nie mam pojęcia gdzie jest problem ale wychodzi na to, że w czasie wgrywania. Tak wygląda schemat w Proteus http://obrazki.elektroda.pl/3139351300_1... A tak wygląda kod jaki...

ATTiny13 Bascom - Timer0 nie działa poprawnie w przerwaniu, co robię źle?

Witam, nie mogę sobie proradzić z obsługą timer0 w przerwaniu. Zamiast wł/wył port po początkowym opóźnieniu co 0,5s ustawia się w stan wysoki i tak sobie świeci w nieskończoność. Co jest nie tak? Kod poniżej: $prog &HFF , &H73 , &HFF , &H00 $regfile = "ATtiny13.DAT" $crystal = 128000 Wyj Alias Pinb.1 'wyjście Config Wyj = Output 'ustawienie...

Programowanie ATtiny13, avrdude nie wykrywa mikrokontrolera

Prędkość 1MHz ustawiam w programie: $regfile = "ATtiny13.DAT" $crystal = 1000000 '... Dzięki za schemat, przejrzałem oczywiście. Więc na schemacie mam zewrzeć zworkę JP3 , czyli pin 25(PC2) do masy. U mnie w programatorze wszystko jest poskładane na płytce SMD dodatkowo z soldermaską. Więc po ścieżkach nie dojdę do prawidłowego połaczenia....

Attiny13 ADC + PWM - niestabilne odczyty napięcia przy sterowaniu silnikiem

Witam! Chce stworzyć sterownik obrotów silnika. Działa to na zasadzie że ADC odczytuje wartość z potencjometru i przypisuje ją PWM. Wszystko ładnie, ale nie rozumiem dlaczego gdy już wszystko podłącze to na multimetrze pokazują mi się wyniki rozbiegające się z rzeczywistością. Chodzi o to że po delikatnym przekręceniu wartość czasami zmieni sie o 1V...

Attiny13 [BASCOM] - Joystick + ADC + Silnik krokowy

A jakbyś napawdę sporo zmiennych miał to można wpisać jeszcze inne wartości: (to fragment działającego programu) [syntax=basic4gl]$regfile = "attiny13.dat" $crystal = 9600000 $hwstack = 10 $swstack = 10 $framesize = 28 '----------- Dim Zasilanie As Word Dim Aku1 As Word Dim Aku2 As Word Dim Pwm1 As Byte Dim Pwm2 As Byte Dim Lpwm As Byte Dim Xw As Word...

Attiny13, Bascom - Kompilacja prostego programu, SRAM

Witajcie Mam idiotycznie prosty program, mianowicie [syntax=basic4gl] 'przerzutnik T' $regfile = "attiny13.dat" $crystal = 1000000 Config Portb.3 = Input Config Portb.4 = Output Portb.3 = 0 Portb.4 = 0 Do If Portb.3 = 1 Then Toggle Portb.4 End If Loop End [/syntax] Powinien działać, testy pokarzą... Mój problem polega na tym, że dodając funkcję "toggle"...

Attiny 13 - Niska częstotliwość PWM przy kwarcu 8MHz, zamiast 15.6kHz

[syntax=vbnet] $regfile = "attiny13.dat" $crystal = 8000000 ' 'ustawienie PB2 jako wejscie ADC1 i PB0 jako wyjscie PWM Config Pinb.0 = Output Config Pinb.2 = Input Config Pinb.5 = Input Portb.5 = 0 Config Adc = Single , Prescaler = Auto , Reference = Internal 'konfiguracja przetwoenika ADC Vref=1.1V Config Timer0 = Pwm , Prescale = 1 , Compare A Pwm...

Attiny 13 i zmienne, bascom avr, nie mogę użyć zmiennej.

Witam Wlasnie pierwszy raz zainstalowalem bascoma avr (v. 1.11.9.1 demo) i jesli zadeklaruje na poczatku programu procesor : attiny13 to nie moge uzyc nawet 1 zmiennej tzn np program "ktory nic nie robi": $regfile = "attiny13.dat" 'najpierw określamy typ proca $crystal = 1000000 'z jakim taktowaniem będzie pracował Config Portb = Output 'pprt...

Selektor wejść do wzmacniacza.

Cześć. https://obrazki.elektroda.pl/1280991700_... Kuzyn poprosił mnie o zbudowanie tego ustrojstwa, bo posiada jedno wolne wejście we wzmacniaczu, a do podłączenia jeszcze trzy źródła dźwięku. Projekt powstał w dwa dni. Czterokanałowy selektor wejść do wzmacniacza. Nic szczególnego... Płytka - termotransfer. Program - BASCOM. https://obrazki.elektroda.pl/9048297700_...

AtTiny13: Jak zliczać 3 naciśnięcia przycisku w 2 sekundy w Bascom?

Chyba sam nie dam rady - spore braki ... $regfile = "attiny13.dat" $crystal = 4800000 Config Pinb.1 = Input Config Pinb.2 = Output Config Debounce = 30 Pk Alias Portb.2 Dim Przycisk As Byte At &H62 Dim Czas As Byte At &H63 Pk = 1 Do Waitms 25 Debounce Pinb.1 , 0 , Licz , Sub Przycisk = 3 , Gosub , On_off If Portb.1 , 0 , Then Incr Czas If...

atiny 13 - połączenie kilku modułów w sterownik oświetlenia

Dobrze rozumiem, wiem ze trochę to namieszało, ale cóż zdarza się niestety nie pierwszy i pewnie nie ostatni raz. To jak już wiadomo o co chodzi, to trzeba program napisać, tak jak już pisałem uczę się i na razie tylko próbuje napisać kod udzielnie do każdej funkcji. Jak na razie udało mi się rozjaśniać powoli diodę i nie mogę zrobić tak by gasła także...

Zawieszanie się radiotelefonu przy nadawaniu: Jak zresetować po 1 min. nadawania?

Witam! Schemat na szybko tak wygląda: https://obrazki.elektroda.pl/7068240200_... Na R2 dajesz sygnał z układu "wykrywania nośnej", to musi być +5 V do +12 V. Stykami przekaźnika 2, 6 układ rozłączy zasilanie "Pyrlandii" po wykryciu nośnej powyżej jednej minuty na kilka sekund. Czasy można zmieniać w programie. Zawsze zachęcam osoby...

Bascom - generowanie 3 impulsów na ATtiny13 bez użycia WAIT

Tak ale impulsy mają być sygnalizowane i widoczne na diodzie LED , a w ten sposób chyba nie zobaczę . Może by to zrobić przez PULSEOUT tylko między nimi musi być WAIT ? Dodano po 3 Zrobiłem coś takiego ale proszę o sprawdzenie i poprawki , Nie wiem też jak zrobic podprogram Generator aby zrobił 3 razy taki impuls jak w programie Odmierz . Ma to sens...

attiny13 i rc5 - błąd out of sram space przy kompilacji kodu

Witam.Z natury jestem człowiekiem leniwym więc postanowiłam zrobić sobie wyłącznik oświetlenia rc5.Wybór padł na attiny13 (bo mam pod ręką) i tsop1736.Całość ma być sterowana z pilota uniwersalnego za pomocą rc5.Napisałem kod i pojawił cię problem przy sprawdzeniu programu: błąd: "error:22 line:23 out of sram space " program: [syntax=basic4gl]$regfile...

[Bascom] attiny13 - błąd 'Out of SRAM' przy kompilacji kodu PWM

Witam, Próbuję skompilować dla attiny13 taki kod: $regfile = "attiny13.dat" Config Portb = Output Dim Pwmr As Byte Dim Pwmg As Byte Dim Pwmb As Byte Dim Licznik As Byte Pwmr = 255 Pwmg = 255 Pwmb = 255 Portb.0 = 0 Portb.1 = 0 Portb.2 = 0 Do For Licznik = 1 To 255 If Licznik <= Pwmr Then Portb.1 = 1 Else Portb.1 = 0 End If If Licznik <=...

Błędy kompilacji programu ściemniacza na ATtiny13 po przeniesieniu z ATmega8515

Oki $tiny rozwialo sprawe ze zmiennymi. Rozwiało :?: , zapewne Twoją czuprynę :D Po pierwsze , coś kręcisz , bo nawet takie cuś nie da się skompilować dla ATMega8515 :!: $regfile = "m8515.DAT" Config Timer0 = Pwm , Pwm = 8 , Compareb Pwm = Clear Down , Comparea Pwm = Disconnect , Prescale = 64 A nie da się również na wiele innych proców ,...

ATtiny13 termometr z LM13 - pytanie o zmiany w programie

Ja zrobiłbym to tak: [syntax=basic4gl] 'Wskaźnik temperatury $regfile = "attiny13.dat" $crystal = 1200000 '$sim Config Portb.0 = Output Config Portb.1 = Output Config Portb.2 = Output 'pin pomiaru adc z LM35 'Config Portb.4 = Input Dim Temp As Word Config Adc = Single , Prescaler = Auto , Reference = Internal Start Adc Do Set Portb.0 : Set Portb.1 :...

Attiny13 - Jak napisać program do załączania przekaźnika na 7 godzin?

Witam Potrzebuje program na mikrokontroler Attiny 13 który po wciśnięciu przycisku załączy przekaźnik na 7 godzin. Nie potrafie go sam napisać a jest mi bardzo potrzebny. Pozdrawiam Sprawdź ten program, nie sprawdzałem nie mam Attiny13. [syntax=basic4gl]'Timer 7godzin $regfile = "attiny13.dat" $crystal = 128000 'ustawić w Fuse Bitach 'wyłączyć bit...

[ATtiny13] ATtiny13 Bascom – dioda na PB5 świeci mimo braku programu, obsługa przerwań PB1

Witam, chciałem zbudować lampę sygnalizacyjną do roweru, która mogła by służyć równocześnie jako latarka z kilkoma efektami świetlnymi, diody podłaczyłem przez rezystory 200 om do portów B 0,2,3,4,5 port B1 chcę wykorzystać do obsługi przerwań zewnętrznych do zmiany efektów. Pierwszy problem jaki napotkałem to to że dioda podpięta do portu B5 cały czas...

attiny13 - jak dodać obsługę włącznika do włącznika światła RC5?

mój błąd,miał być PORTB.1 [syntax=basic4gl]$regfile = "attiny13.dat" $crystal = 8000000 Config Pinb.1 = Input Config Pinb.4 = Output Config Rc5 = Portb.0 $hwstack = 20 $swstack = 10 $framesize = 40 Dim Address As Byte , Command As Byte Enable Interrupts Do 'pętla nieskończona If Pinb.1 = 1 Then 'jeżeli przycisk 1 wciśnięty Toggle PORTB.4 'zmień stan...

Attiny 13 - jak poprawić kod generujący impuls 3 sekundy?

Witam wszystkich. Jeśli to nie ten dział to proszę o przeniesienie. Spędziłem juz kilka godzin nad banalną sprawą i nic mi nie wychodzi. Chodzi o wygenerowanie przez Attiny 13 impulsu 3 sek. na porcie po przyciśnięciu przycisku ( podanie stanu niskiego na port). Nie jest dla mnie ważne na który port go podam, ani na którym wystawiony będzie impuls 3...

[ATiny13][BASCOM] Przełącznik na trzech przyciskach

Mam taki niezrozumiały dla mnie problem . Nie działa mi konfiguracja output na PINB.1 . Mogę ustawić na pinie komendą set lub reset 1 lub 0 ale ale program testowy nie działa . Sprawdzone na dwóch procesorach. 'attiny 13 test $regfile = "attiny13.dat" $crystal = 9600000 $hwstack = 32 $swstack = 12 $framesize = 8 Config Pinb.0 = Output Config...

[Bascom/ATmega8] Przycisk i odliczanie czasu dla LED

Dziękuję szun działa bardzo dobrze. Jeszcze mam pytanie czy da się przerobić tak aby wrzucić to na procek attiny13? bo akurat taki mam a szkoda atmega8 na taki czasowy układ Gdy zmienię po prostu procka to wywala error 22 line 38 Out of SRAM space [syntax=basic4gl]$regfile = "attiny13.dat" $crystal = 9600000 'Config Pinb.0 = Input 'Config Pind.1 = Output...

[Attiny13][Bascom] - Prosty termometr oparty o termistor NTC i kilka diod led.

Mogę ustawić, ale jak? Próbowałem z dzielnikiem 1K termistor i 10K rezystor, napięcie wewnętrzne 1,1V. Nie działa. Ciągle podaje wartość 1023. W Attiny13 nie doszukałem się pinu AVCC. Datasheet tutaj Dodano po 11 Wklejam kod testowego programu: [syntax=basic4gl]$regfile = "attiny13.dat" $crystal = 1000000 Config Portb = &B111011 Config Adc = Single...

Przetwornica 12V na 24V z attiny13 - czy kod Bascom jest poprawny?

Witam wszystkich! mam zamiar zrealizować przetwornice http://www.elportal.pl/pdf/k04/37_05b.pd... na attiny13 tzn. końcówka mocy ma pozostać ale sterowanie na mikrokontrolerze. Według obliczeń wyszło, że generator na bramkach w tym układzie z kitu AVT ma ok 2,5kHz sprzężenie zwrotne nie wchodzi w grę. Napisałem taki kod w bascomie: [syntax=basic4gl]$regfile...

Bascom Attiny13 - Led pwm i serwo - jak oszukać program?

oryginalnie wygląda to tak: [syntax=vbnet] $regfile = "attiny13.dat" $crystal = 9600000 $hwstack = 16 $swstack = 8 $framesize = 16 Config Timer0 = Timer , Prescale = 1 Enable Timer0 On Timer0 Pwm Enable Interrupts Start Timer0 Declare Sub Miganie Config Pinb.3 = Input Set Pinb.3 Config Portb.4 = Output Przycisk Alias Pinb.3 Config Portb.0 = Output Config...

Jak używać bitu 5 (nóżka 1) w ATtiny13/45 jako wyjście?

Witam. Chciałbym użyć bitu nr 5 w attiny (próbowałem 13 i 45 kilka egzemplarzy). To nóżka 1 scalaka , na której jest również sygnał reset. Skonfigurowałem ten bit na output i prostym programem zmieniam stany wysoki, niski ...... - tak jest to w bascomie: $regfile = "attiny13.dat" $crystal = 9600000 Config Portb.4 = Output Config portb.5 = output reset...

Sterowanie miganiem LED na pilota w Bascomie - jak napisać procedurę?

Witam Ostatnio usiadłem trochę do Bascoma i coś naskrobałem, oto wynik mej pracy: $regfile = "attiny13.dat" $crystal = 9600000 Config Timer0 = Timer , Prescale = 8 Enable Timer0 : On Timer0 Prztimer0 Enable Interrupts dioda Alias Portb.3 Config Rc5 = Portb.4 Dim dioda As Byte Dim Licznik As Byte Do Dim .... Getrc5.... Command = Command ..... If Command...

[ATtiny13] Jak poprawić kod w Bascom dla ATtiny13 do wyłącznika czasowego?

Faktycznie, zapomniałem o tym. Teraz działa: $regfile = "attiny13.dat" $crystal = 1200000 Config Portb = &B001000 Portb = &B110111 $hwstack 16 $swstack 8 $framesize 8 Dim X As Integer X = 0 Do Debounce Pinb.0 , 0 , Czas1 , Sub Debounce Pinb.1 , 0 , Czas2 , Sub Debounce Pinb.2 , 0 , Czas3 , Sub Loop End Czas1: Portb.3 = 1 Do Incr X If X...

Jak poprawić kod Bascom dla przełącznika audio na Attiny13?

Jestem zielony jeżeli chodzi o programowanie mikrokontrolerów, próbuję zrobić przełącznik, jednym przyciskiem przełączanie trzech wejść. Napisałem program w bascomie ale nie działa, proszę o pomoc w poprawieniu błędów. $regfile = "attiny13.dat" $crystal = 9600000 Config Portb.0 = Output Config Portb.1 = Output Config Portb.2 = Output Config Portb.3...

Powerdown i watchdog - cykle dłuższe niż 8 s Attiny13

$regfile = "ATtiny13.DAT" $crystal = 4800000 Config Watchdog = 4096 Ired Alias Portb.0 Config Ired = Output start watchdog Reset Ired Waitms 255 Set Ired Waitms 255 Powerdown I wszystko działa :-) Mikrokontroler ATtiny13 ma jeszcze coś takiego jak fuse bit CKDIV8 co znaczy, że zegar wewnętrzny dzielony jest przez 8. Pytanie tylko z jakiego...

Sterowanie triakiem Z0107 1A bez optotriaka z AVR 5V - czy to bezpieczne?

1. Attiny ma fuzy ustawione na L7A HFF czyli bez podzialu na 8 2. Po podłączeniu Attiny spada do 4.8V 3. Przy włączonym triaku i załączonym elektrozaworze spada do 4.4V 4. Nie zgadza się deklarowany czas jest 10 sekund a faktyczny wynosi 22 sekundy 5. LM78L05 ma tylko 100mA może to za mało? z data shitów wychodzi ze powinno wystarczyć, grzeje się trochę...

Jak sterować wentylatorem łazienkowym z ATTINY13 i DHT11?

No niestety dalej nic. Zawiesza się tu: If Wejscie = 1 Then 'pin dalej w stanie wysokim? (brak odpowiedzi) Blad = 1 Return End If Napisałem też program z wykorzystaniem funkcji 1wire BASCOMa. Tam tak jakby odczytał jeden bajt o wartości &H40 i tyle. Dodano po 1 W desperacji napisałem taki program do sprawdzenia czy czujnik cokolwiek robi: [syntax=vbnet]...

[bascom] Konfiguracja powerdown i wybudzanie attiny25 przez INT0 po podaniu VCC – Bascom

Przykładowy program. Nie robi nic ciekawego tylko wybudza procesor z power-down przez int0 i miga diodami. $regfile = "attiny13.dat" $crystal = 9600000 Config Portb = &B011000 Portb = &B000010 $hwstack = 24 $swstack = 8 $framesize = 24 Dim X As Bit Dim Y As Byte Config Int0 = Low Level Enable Interrupts On Int0 Go Nosave Set X Do If X = 1...

Jak zaświecić LED przy ujemnej temperaturze na Attiny13 i DS18B20 w Bascom?

Znalazłem kilka innych kodów źródłowych na elektrodzie i każdy jest inny jeśli chodzi o samo rozpoznawanie czujnika przez procesor i odczytywanie temperatury. Jak mogę sprawdzić czy poprawnie to piszę a czy nie? Może to głupie pytanie, ale gdzie mogę znaleźć podstawy, bo mam książkę P. Górecki - Mikrokontrolery dla początkujących i tam nie ma podstaw....

[BASCOM] - Program pomiaru temperatury pętluje się, zamiast mierzyć temperaturę

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...

Jak napisać program na ATtiny13 do zliczania impulsów i generowania sygnału?

No więc wymyśliłem coś takiego: $regfile = "attiny13.dat" $crystal = 1000000 Config Pinb.3 = Output Config Pinb.4 = Output Dim A As Byte Dim B As Byte Config Timer0 = Counter , Edge = Rising Do Timer0 = 0 Start Timer0 wait 1 Stop Timer0 Timer0 = A If A > 3 Then For B = 1 To 20 Pulseout Portb , 3 , 250000 Waitms 250 Pulseout Portb , 4 ,...

Attiny13 - Jak uniknąć problemów z częstym włączaniem zasilania?

Program ma być wykonany jednorazowo po włączeniu zasilania, da sie prościej? [syntax=basic4gl]$regfile = "attiny13.dat" $crystal = 1200000 $hwstack = 16 $swstack = 8 $framesize = 8 Config Pinb.1 = Output 'ST2 Config Pinb.2 = Output 'ST1 Config Pinb.3 = Output 'LED ST1 Config Pinb.4 = Output 'LED ST2 Portb.1 = 0 Portb.2 = 1 Portb.3 = 0 Portb.4 = 1 Config...

Line follower na ATtiny13 z KTIR0711S - brak reakcji czujników

No to od czasu gdy tu jeszcze bogdan_p nie napisał. To trochę doczytałem i powstał taki kod '***** konfiguracja portów ***** $regfile = "attiny13.dat" Config Pinb.7 = Input Config Pinb.3 = Input Config Pinb.2 = Input Config Pinb.5 = Output Config Pinb.6 = Output Do If Pinb.7 = 1 Then Pinb.5 = 1 If Pinb.7 = 1 And Pinb.3 = 1 Then Pinb.5 = 1...

BASCOM - Zawieszanie się RND przy losowym generowaniu przerw w Attiny13

Dziwny problem mi się pojawił z RND przy okazji prostej procedurki, która miała generować losowe tony (strach na kuny): [syntax=basic4gl] $regfile = "attiny13.dat" $crystal = 9600000 Config Portb.3 = Output Config Portb.4 = Output Speaker Alias Portb.3 _speaker Alias Portb.4 Dim Ton As Byte Dim A As Word Dim B As Word Do Ton = Rnd(50) Ton = Ton + 25...

Zmiana prędkości transmisji RX-TX z 1800 bps na 9600 bps w komunikacji 433MHz?

Po latach trochę dziwnie się czyta te opisy. Teraz już chyba lepiej władam angielskim ahahahahaha :D [syntax=vbscript]$regfile = "ATtiny13.dat" $crystal = 1200000 $hwstack = 4 $swstack = 2 $framesize = 24 '***************************************... '* WIRELESS THERMOMETER * '* WITH CIRCULAR BUFFER * '* TRANSMITTER PART Tiny13 * '* bartek.niveasoft(at)gmail.com...

PWM + gaszenie diody przyciskiem na płycie testowej atmega32

rozwiązałem problem i aż wstyd się przyznać co było główną przyczyną moich niepowodzeń. Mianowicie diodę podłączałem pod portb.1 a timer0 działał na OC0A. Teraz mój kod w uproszczeniu wygląda tak: [syntax=basic4gl]$regfile = "attiny13.dat" $hwstack = 32 $swstack = 18 $framesize = 8 ' tiny13 $crystal = 10000000 Config Pinb.1 = Output Config Pinb.0 =...

[Atmega8] [Atmega8][bascom] Jak zaprogramować uniwersalny włącznik RC5 na pilota?

Witam ! Przetestuj sobie ten program na ATtiny13, mam nadzieję że przerobisz go na ATmega8. 'RC5 2007.10.24 'ATtiny13 'Wlacznik/wylacznik oswietlenia 'lub Wlacznik/wylacznik, 2 LEDy naprzemian 'dowolnym klawiszem pilota RC5 'BASCOM AVR 1.11.8.1 $regfile = "attiny13.dat" '$crystal = 9600000 'generator wewnŕrzny 9,6mhz 14ck + 64ms $crystal =...

[attiny13] [attiny13][bascom] Regulacja fazowa - wolne obroty wentylatora, brak opóźnienia

witam zaciekawił mnie temat regulacji fazowej więc na płytce stykowej zmontowałem prosty układ gdzie attiny13 ma za pomocą transoptora pc814 podłączonego do sieci ma wykrywać zero i odpowiednio sterować triakiem bt136 przez optotriak moc3042, napisałem taki prosty program: $regfile = "attiny13.dat" $crystal = 9600000 Config Portb.1 = Input...

Jak skonfigurować przerwanie PCINT4 na Attiny13? Problem z PCMSK0 i PCINT0

Witam, dopiero wczoraj ogarnąłem przerwanie PCINT0 a już dziś potrzebuję PCINT4. Poniżej zamieszczam program testowy na którym pracuję. Przerwanie PCINT0 działa bez problemu niestety PCINT4 już w ogóle. Wpisanie w konfiguracji PCINT4 kończy się błędem "unkown interrput source" więc doczytałem, że wektor przerwania jest jeden i jest nim PCINT0 tylko...

Sprawdzenie poprawności sch.-programu na podstawie Attiny13

Czarna magia, mój kod sie nie chciał kompilować bo za mało pamięci, a twój sie kompiluje i działa w symulatorze (sprawdzałem ;p) czyli gotowy kod wygląda tak :) $regfile = "attiny13.dat" $crystal = 1200000 $hwstack = 16 $swstack = 16 $framesize = 16 Config Rc5 = Pinb.2 Config Portb.1 = Output Config Portb.0 = Output Portb.0 = 0 Dim Adres As...

[AVR] Budowa woltomierza i amperomierza na ATtiny z wysyłaniem danych do Raspberry Pi

Hej, Chciałbym sobie zbudować mini woltomierz i amperomierz na ATtiny (do dyspozycji mam ATtiny 13, 25 i 45) i dane wysłać do Raspberry pi-najlepiej byłoby co minutę wysłać dane. Pomiary chciałbym robić dla kilku ogniw 18650 połączonych równolegle. Myślę, że zakres pomiarów 0-5V i 0-3A będzie bardzo wystarczający. Nie bardzo wiem jak to wszystko zrobić,...

Attiny13 i TSOP1136 - problem z odbiorem sygnału RC5 z pilota Philips

Panowie, pomóżcie, bo już mi ręce opadają. Procek Attiny13 taktowany wewnętrznym oscylatorem 9,6Mhz. Do PB.2 dołączony układ TSOP1136 (próbowałem również z TFMS5360), połączenia zgodnie z notą katalogową (zasilanie przez 150R podparte elektrolitem 22uF, wyjście podciągnięte do zasilania przez opornik 10K) Na wyjściu PB.3 mam LEDa. I do tego taki programik:...

[bascom] dioda ir 36kHz +odbiornik ir TFM 5360 nie reaguje

O wielkie dzięki. A jeszcze takie małe pytanko przerwanie zachodzi dopiero wtedy gdy pind.3 dostanie sygnał w tym wypadku ten nasz odbiornik czy dobrze to rozumiem ?? Napisałem taki program ale kurde jest straszny mały zasieg max do 3cm co w nim mozna byłoby zmienic ?? $regfile = "attiny13.dat" $crystal = 9600000 Config Pinb.4 = Output Portb.4...

Zdalne sterowanie na podczerwień (RC5)

Nie bardzo wiem o co chodzi. Wyświetlenie tego kodu nic mi nie da. Z programowania jestem noga, a właściwie to mój pierwszy zaprogramowany procek. Nie miałem tego tiny więc użyłem tiny13 i skleciłem taki kod wzorując się na szanownych forumowiczach. $regfile = "attiny13.dat" $crystal = 1200000 $hwstack = 16 Config Rc5 = Pinb.1 Config Pinb.0...