regfile attiny13

Znaleziono około 232 wyników dla: 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ć.

    Mikrokontrolery   18 Lip 2007 23:21 Odpowiedzi: 7    Wyświetleń: 2894
  • REKLAMA
  • [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ć.

    Mikrokontrolery AVR   06 Sie 2010 20:26 Odpowiedzi: 7    Wyświetleń: 1902
  • Nie znalazłeś odpowiedzi? Zadaj pytanie Sztucznej Inteligencji

    Czekaj (1min)...
  • 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

    Mikrokontrolery AVR   11 Sie 2013 17:29 Odpowiedzi: 12    Wyświetleń: 3381
  • 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...

    Mikrokontrolery AVR   20 Lut 2009 10:43 Odpowiedzi: 14    Wyświetleń: 2306
  • [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...

    Mikrokontrolery AVR   27 Gru 2010 19:57 Odpowiedzi: 8    Wyświetleń: 2880
  • REKLAMA
  • [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...

    Mikrokontrolery Początkujący   26 Paź 2014 09:58 Odpowiedzi: 28    Wyświetleń: 3534
  • 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 =...

    Mikrokontrolery Początkujący   30 Maj 2021 07:01 Odpowiedzi: 79    Wyświetleń: 7125
  • [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...

    Mikrokontrolery AVR   29 Paź 2011 18:38 Odpowiedzi: 22    Wyświetleń: 5330
  • 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...

    Początkujący Elektronicy   04 Sty 2009 14:41 Odpowiedzi: 21    Wyświetleń: 3655
  • [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...

    Mikrokontrolery AVR   23 Paź 2009 17:18 Odpowiedzi: 3    Wyświetleń: 1257
  • 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 :...

    Projektowanie Układów   22 Lis 2012 06:36 Odpowiedzi: 14    Wyświetleń: 1932
  • [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...

    Mikrokontrolery Początkujący   20 Lip 2012 14:50 Odpowiedzi: 2    Wyświetleń: 1309
  • REKLAMA
  • 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...

    Mikrokontrolery AVR   24 Kwi 2015 10:44 Odpowiedzi: 6    Wyświetleń: 1833
  • 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...

    Mikrokontrolery AVR   19 Lut 2024 09:17 Odpowiedzi: 12    Wyświetleń: 657
  • 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...

    Mikrokontrolery AVR   22 Kwi 2021 19:40 Odpowiedzi: 38    Wyświetleń: 1779
  • [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

    Mikrokontrolery   25 Gru 2008 22:19 Odpowiedzi: 18    Wyświetleń: 10915
  • 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]

    Projektowanie Układów   09 Lis 2012 18:53 Odpowiedzi: 17    Wyświetleń: 5916
  • 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

    Mikrokontrolery AVR   09 Cze 2010 16:41 Odpowiedzi: 25    Wyświetleń: 5630
  • 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...

    Początkujący Elektronicy   09 Sty 2016 21:52 Odpowiedzi: 15    Wyświetleń: 1086
  • [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:

    Mikrokontrolery AVR   07 Gru 2011 18:40 Odpowiedzi: 37    Wyświetleń: 8194
  • 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...

    Mikrokontrolery AVR   27 Maj 2016 18:05 Odpowiedzi: 4    Wyświetleń: 1605
  • 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

    Początkujący Naprawy   24 Lut 2011 14:19 Odpowiedzi: 9    Wyświetleń: 1977
  • 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...

    Mikrokontrolery Początkujący   01 Sie 2013 12:03 Odpowiedzi: 41    Wyświetleń: 5037
  • [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

    Mikrokontrolery AVR   29 Lip 2014 21:53 Odpowiedzi: 12    Wyświetleń: 2358
  • 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...

    Mikrokontrolery   06 Mar 2008 13:26 Odpowiedzi: 2    Wyświetleń: 2551
  • [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...

    Mikrokontrolery AVR   12 Sty 2013 13:23 Odpowiedzi: 9    Wyświetleń: 3081
  • [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

    Mikrokontrolery AVR   27 Lut 2011 12:25 Odpowiedzi: 6    Wyświetleń: 3845
  • [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...

    Mikrokontrolery AVR   24 Lip 2011 22:59 Odpowiedzi: 40    Wyświetleń: 7980
  • 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...

    DIY Konstrukcje   20 Gru 2018 19:43 Odpowiedzi: 92    Wyświetleń: 8658
  • 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...

    Mikrokontrolery   06 Lip 2007 09:51 Odpowiedzi: 1    Wyświetleń: 1182
  • 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...

    Mikrokontrolery   27 Gru 2006 11:12 Odpowiedzi: 19    Wyświetleń: 2661
  • 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...

    Mikrokontrolery AVR   30 Lip 2010 06:13 Odpowiedzi: 3    Wyświetleń: 2196
  • 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?:(

    Mikrokontrolery AVR   09 Maj 2011 10:34 Odpowiedzi: 18    Wyświetleń: 3936
  • [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ę...

    Początkujący Elektronicy   25 Wrz 2012 19:06 Odpowiedzi: 5    Wyświetleń: 1437
  • [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...

    Mikrokontrolery AVR   21 Gru 2008 15:29 Odpowiedzi: 5    Wyświetleń: 1361
  • [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...

    Mikrokontrolery   03 Wrz 2008 22:25 Odpowiedzi: 4    Wyświetleń: 1669
  • 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 =...

    Mikrokontrolery AVR   15 Kwi 2023 06:38 Odpowiedzi: 8    Wyświetleń: 639
  • [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 -...

    Mikrokontrolery AVR   07 Lip 2008 22:16 Odpowiedzi: 18    Wyświetleń: 3242
  • 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...

    Mikrokontrolery Początkujący   05 Cze 2013 08:04 Odpowiedzi: 31    Wyświetleń: 4002
  • 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...

    Mikrokontrolery Początkujący   17 Lip 2018 12:27 Odpowiedzi: 11    Wyświetleń: 969
  • [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. -...

    Mikrokontrolery AVR   01 Cze 2010 18:42 Odpowiedzi: 8    Wyświetleń: 2375
  • 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ć...

    Mikrokontrolery   20 Lip 2009 23:01 Odpowiedzi: 21    Wyświetleń: 3514
  • 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...

    Projektowanie Układów   23 Mar 2008 09:21 Odpowiedzi: 20    Wyświetleń: 3448
  • 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...

    Mikrokontrolery Początkujący   22 Kwi 2016 21:04 Odpowiedzi: 39    Wyświetleń: 4200
  • 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...

    Mikrokontrolery AVR   19 Paź 2011 12:44 Odpowiedzi: 4    Wyświetleń: 3924
  • [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...

    Mikrokontrolery AVR   05 Sie 2010 21:08 Odpowiedzi: 30    Wyświetleń: 5230
  • [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...

    Mikrokontrolery AVR   27 Sty 2010 11:12 Odpowiedzi: 14    Wyświetleń: 4830
  • [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...

    Mikrokontrolery AVR   04 Sie 2013 13:21 Odpowiedzi: 10    Wyświetleń: 2118
  • 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...

    Początkujący Elektronicy   26 Lut 2009 14:02 Odpowiedzi: 10    Wyświetleń: 1968
  • 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...

    Mikrokontrolery   24 Sty 2014 19:22 Odpowiedzi: 8    Wyświetleń: 2713
  • 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...

    Projektowanie Układów   09 Mar 2016 22:29 Odpowiedzi: 50    Wyświetleń: 6438
  • 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...

    Mikrokontrolery   20 Sie 2006 01:37 Odpowiedzi: 3    Wyświetleń: 2580
  • 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....

    Mikrokontrolery AVR   29 Gru 2010 13:21 Odpowiedzi: 21    Wyświetleń: 8282
  • 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...

    Mikrokontrolery AVR   01 Kwi 2016 18:20 Odpowiedzi: 7    Wyświetleń: 2184
  • 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...

    Mikrokontrolery AVR   22 Wrz 2014 08:40 Odpowiedzi: 20    Wyświetleń: 4746
  • 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"...

    Mikrokontrolery   11 Maj 2015 18:51 Odpowiedzi: 2    Wyświetleń: 741
  • 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...

    Mikrokontrolery   03 Sty 2016 19:31 Odpowiedzi: 4    Wyświetleń: 1176
  • 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...

    Mikrokontrolery AVR   17 Cze 2009 20:03 Odpowiedzi: 6    Wyświetleń: 3586
  • 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_...

    DIY Akustyka   28 Paź 2020 11:45 Odpowiedzi: 55    Wyświetleń: 10530
  • 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...

    Mikrokontrolery AVR   18 Lut 2011 13:14 Odpowiedzi: 15    Wyświetleń: 2900
  • 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...

    Mikrokontrolery AVR   14 Paź 2012 12:48 Odpowiedzi: 99    Wyświetleń: 9669
  • 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...

    Radiotechnika Serwis   17 Paź 2022 06:20 Odpowiedzi: 9    Wyświetleń: 543
  • 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...

    Mikrokontrolery AVR   22 Lut 2010 16:56 Odpowiedzi: 6    Wyświetleń: 1689
  • 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...

    Mikrokontrolery   30 Sty 2012 17:53 Odpowiedzi: 5    Wyświetleń: 1382
  • [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 <=...

    Mikrokontrolery AVR   03 Kwi 2010 17:23 Odpowiedzi: 1    Wyświetleń: 2049
  • 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 ,...

    Mikrokontrolery   08 Wrz 2006 22:38 Odpowiedzi: 36    Wyświetleń: 5837
  • 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 :...

    Mikrokontrolery AVR   31 Paź 2011 22:31 Odpowiedzi: 20    Wyświetleń: 3435
  • 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...

    Programowanie Początkujący   25 Lut 2015 09:27 Odpowiedzi: 5    Wyświetleń: 1233
  • [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...

    Mikrokontrolery AVR   17 Lut 2012 13:25 Odpowiedzi: 7    Wyświetleń: 1919
  • 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...

    Mikrokontrolery Początkujący   02 Cze 2014 17:44 Odpowiedzi: 9    Wyświetleń: 1833
  • 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...

    Mikrokontrolery   03 Wrz 2013 20:55 Odpowiedzi: 3    Wyświetleń: 1127
  • [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...

    Mikrokontrolery AVR   04 Lut 2012 23:20 Odpowiedzi: 17    Wyświetleń: 1987
  • [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...

    Mikrokontrolery Początkujący   26 Cze 2012 23:30 Odpowiedzi: 7    Wyświetleń: 2198
  • [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...

    Początkujący Elektronicy   02 Paź 2012 21:55 Odpowiedzi: 23    Wyświetleń: 8436
  • 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...

    Początkujący Elektronicy   11 Gru 2012 23:28 Odpowiedzi: 5    Wyświetleń: 1479
  • 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...

    Mikrokontrolery AVR   14 Sty 2024 06:22 Odpowiedzi: 16    Wyświetleń: 873
  • 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...

    Mikrokontrolery   02 Gru 2006 22:06 Odpowiedzi: 10    Wyświetleń: 1920
  • 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...

    Mikrokontrolery Początkujący   12 Sie 2013 12:34 Odpowiedzi: 16    Wyświetleń: 2868
  • [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...

    Mikrokontrolery AVR   17 Sie 2010 13:36 Odpowiedzi: 17    Wyświetleń: 4046
  • 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...

    Mikrokontrolery Początkujący   01 Mar 2012 20:48 Odpowiedzi: 10    Wyświetleń: 1826
  • 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...

    Mikrokontrolery AVR   19 Paź 2011 10:50 Odpowiedzi: 13    Wyświetleń: 3196
  • 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ę...

    Mikrokontrolery AVR   12 Cze 2011 22:54 Odpowiedzi: 122    Wyświetleń: 17162
  • 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]...

    Mikrokontrolery Początkujący   17 Kwi 2020 08:56 Odpowiedzi: 12    Wyświetleń: 870
  • [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...

    Mikrokontrolery AVR   13 Mar 2012 19:31 Odpowiedzi: 8    Wyświetleń: 3660
  • 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....

    Mikrokontrolery Początkujący   05 Mar 2013 13:34 Odpowiedzi: 7    Wyświetleń: 1614
  • [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...

    Mikrokontrolery   25 Cze 2015 23:12 Odpowiedzi: 7    Wyświetleń: 1005
  • 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 ,...

    Mikrokontrolery AVR   01 Maj 2010 21:38 Odpowiedzi: 10    Wyświetleń: 2080
  • 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...

    Mikrokontrolery AVR   26 Lut 2013 17:18 Odpowiedzi: 16    Wyświetleń: 2316
  • 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...

    Mikrokontrolery AVR   24 Sty 2011 15:03 Odpowiedzi: 20    Wyświetleń: 2980
  • 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...

    Mikrokontrolery   29 Wrz 2013 12:42 Odpowiedzi: 4    Wyświetleń: 1092
  • 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...

    Mikrokontrolery AVR   10 Sie 2024 19:25 Odpowiedzi: 23    Wyświetleń: 678
  • 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 =...

    Mikrokontrolery AVR   10 Sty 2012 20:37 Odpowiedzi: 6    Wyświetleń: 3060
  • [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 =...

    Mikrokontrolery   16 Lis 2009 17:13 Odpowiedzi: 6    Wyświetleń: 3933
  • [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...

    Mikrokontrolery AVR   08 Lis 2010 18:40 Odpowiedzi: 7    Wyświetleń: 6150
  • 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...

    Mikrokontrolery Początkujący   28 Wrz 2013 19:52 Odpowiedzi: 5    Wyświetleń: 1680
  • 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...

    Mikrokontrolery AVR   08 Mar 2010 20:39 Odpowiedzi: 15    Wyświetleń: 2702
  • [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ć,...

    Mikrokontrolery Początkujący   02 Cze 2018 07:31 Odpowiedzi: 40    Wyświetleń: 5676
  • 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:...

    Mikrokontrolery Początkujący   25 Wrz 2013 10:06 Odpowiedzi: 5    Wyświetleń: 1422
  • [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...

    Robotyka Modelarstwo i CNC   25 Paź 2009 20:00 Odpowiedzi: 14    Wyświetleń: 4059
  • 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...

    DIY Konstrukcje   17 Sie 2012 18:05 Odpowiedzi: 59    Wyświetleń: 26056