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

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

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

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

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

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

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

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

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] [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:

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

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

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

[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

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

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

Attiny13: Czy zabezpieczony FLASH pozwala na dostęp do EEPROM?

Jeślii masz wolny pin to możesz sobie na nim otworzyć port COM. Taki programik wciągający cztery bajty po serialu zajmuje w Bascom 288 B a to pewnie dlatego że jeszcze musiał się zająć stosem i tablica przerwań co Ty juz pewnie tez masz zrobione więc to by odpadło. Zapisujesz to sobie do Eeproma przy starcie i gotowe. [syntax=vbnet]$regfile = "attiny13A.dat"...

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

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] [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ę...

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

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

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

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

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

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

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

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

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

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

Sprawdzenie kodu oraz doradzenie w razie konieczności.

Witam Zgodnie z wczorajszym tekstem końcowym, dziś podjąłęm dalszą walkę, ale chyba jestem za słaby w te klocki, coś tam napisałem ale chyba to nie to: ' mryganie led + switch $regfile = "attiny13.dat" $crystal = 9600000 Config Pinb.1 = Output Config Pinb.3 = Input Dim Petla As Word Dim Tryb As Byte For Petla = 1 To 1000 Waitms 1 Petla = 1 Program:...

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