TavIR-AVR oldal

Ez ugye vicc !
Nekem nincs benne a Bascom - ban.
Na de van honnan letölteni ha valami hiányzik .

Köszi a példát

Sziasztok!
PCINT lekezéléséről nem tudna valaki 1 mintaprogit ?
Mert én (láma) nem találtam semmit róla.
Vagy csak nem kerestem eléggé , vagy nincs is .
Pontosan azt sem tudom , képes e igazi megszakítást generálni ?
Ha valaki tud segíteni azt megköszönöm .

Köszönöm
Pont ezt tettem , hogy legyen órám 2313-ban.
Kicsit másképp de az alapja ez .
Ez a project 1 digitális termosztát extra funkciókkal.
Az óra csak 1 plussz funkció.
Még lehet szerepe a vezérlésben is......
Ez már más topic.

Sziasztok.
2313 adatlapjában nem találok utalást az 'óra funkcióra.
Ezek szerint nincs is benne?

Szerk. : angol tudásom =0

Nem tudom miért de a start-stop timer x utasítást nem szabad használni.
A nélkül működik a program
Winnerbt azzal elvileg nem zárhatod magad ki a chipből , hacsak nem túl gyors a géped.
Próbáld meg az options programmer fülön a port delay értéket mondjuk 100 on.
Kissebb chip órajelnél ez kell!

Na igen , csak sajnos már ott tatok hogy ez sem megy: $regfile = "ATtiny13.dat" $crystal = 9600000 Config Portb.0 = Output Config Portb.1 = Input Config Portb.2 = Output Config Portb.3 = Output Config Portb.4 = Input Config Timer0 = Timer , Prescale = 256 Stop Timer0 Enable Interrupts Enab...

Sziasztok. Adott egy egyszerű kód : $regfile = "ATtiny13.dat" $crystal = 9600000 Config Portb.0 = Output Config Portb.1 = Input Config Portb.2 = Output Config Portb.3 = Output Config Portb.4 = Input Config Timer0 = Timer , Prescale = 1024 Config Int0 = Falling Config Adc = Single , Prescal...

Arra gondoltam , ki kellene emelni az 1wire Slave oldali kezelését .
Közérthetővé tenni .
Sajnos ez a képességeimet meghaladja.
Pedig néha jó lenne az '1 vezetéken oda vissza kommunikáció' - két avr közt .

Sziasztok.

Azt hiszem jó hírrel szolgálhatok .

Bascom-ba 1wire emuláció

A Dallas 1wire ad konverterét emulálja egy tiny45-ös chippel

http://bascom.at.ua/publ/1-1-0-1

Ott van a kód is .

Nekem kicsit bonyolultnak tűnik , de működik.
Hihi , és az adc kezelés....

Szóval lehet vesézgetni

igen igaz.
Mivel hosszú a kód csak a lényeget akartam leírni , és kimaradt egy fontos momentum.
program *16 +lépés

Na így már jó

Kár hogy ezt nem lehet a simán data sorokkal hasonlóan .( akár ha a kódtól még fér 1k is lehet)
Legalább is nekem nem sikerült .
Ott több lenne lényegesen a hej. (nem csak 128 bit )

Marad a külső eprom

Nahh igen , ez az .

Közben én is így oldottam meg , ahogy kapu48 oldotta meg.
Aztán variáció :

diszkófény vezérlő

8 program
programonként 16 lépés

pr a program száma
lepes ahányadik lépés
kiir megy a kimetre

szam=pr+lepes
kiir=program(szam)

Ahh
Ez az eredeti :
B = Eep_label1(i)

Itt sincs pont köztük

Nem tudom mi a roszz.

Köszi az ötletet

Sziasztok ! Felbuzdulva az olvasottakon elkezdtem 1 kód írását.. Először data sorokba a változókkal , amim működik . Viszont ezt szeretném attenni eepromba A fentebb olvasottak alapján elkezdtem , de hibába ütköztem . Dim Program(7(16)) As Eram Byte C = Program(a(b)) hibaüzenet :nem összeegyeztethet...

Igen ez kellett , köszönöm.