Blíží se vánoce a tak by se hodila nějaká vánoční ozdoba do okna. 

Chtěl jsem vymyslet něco, s čím se zabavím na víkend, kromě ledek půjdou použít součástky ze šuplíku a budu si moct pohrát s programováním. Pro konstrukci vánoční hvězda jsem použil univerzální plošný spoj, průměr hvězdy je 35cm, aby byla vidět z ulice. Univerzální pl. spoj moc stříhat nejde, tak jsem vzal pilku a nařezal pásky, ze kterých bude sestavena hvězda. Spoje pásků jsou zpevněny drátěnými sponkami a ze zadní strany pásku je přivázán svazek vodičů, kterým jsou propojeny jednotlivé diody. Nakonec je hvězda docela pevná, se svazkem šestnácti drátů z LPT kabelu. Hvězdu jsem páskou nalepil na okno a ovládací destičku o kousek dál na rám okna. Celé je to napájeno z nabíječky pro mobilní telefon, která má USB konektor.

Ledky jsem zapojil do matice, jednotlivé sloupce jsou spínány dekodérem 74138. Proud tekoucí jednotlivými diodami je omezen rezistory R1 – R8, jejichž hodnota je spočítána na proud 14mA. Pokud svítí všechny diody ve sloupci, je potřeba proud 112mA, který je spínán tranzistory. Vstup G2A dekodéru otevírá celý multiplexer. Když jej připojím na PWM kanál procesoru, bude možné plynule řídit jas hvězdy. Celé to ovládá procesor ATmega8.

Popis programu

Obsluhu multiplexeru zajišťuje program přerušení od časovače T1. Inkrementuje proměnnou Anoda_counter od 0 do 7. Tato hodnota je zkopírována na port C a tím se postupně spínají jednotlivé sloupce anod ledek. Zároveň je na port D vyslána hodnota z pole dat.

ISR(TIMER1_COMPA_vect) // podprogram preruseni casovace 1<br /> {<br /> LED_74138 = Anoda_counter; // nove nastaveni dekoderu anod<br /> LED_Katoda = Array[Counter_blik][Anoda_counter];<br /> // nastavi odpovidajici stav Katod<br /> Anoda_counter++; // pocitadlo anod od 0 do 7<br /> if (Anoda_counter==8) Anoda_counter = 0;<br /> }<br />
Pole dat je dvojrozměrné, je uspořádáno jako 80 skupin 8 čísel. Hlavní program určuje skupinu v poli, ze které program časovače vybírá data pro ovládání katod. Takže je postupně vybíráno 80 kombinací, kterými hvězda svítí. Podprogram časovače prostřednictvím ukazatele Anoda_counter vybírá data pro multiplexer.

while(1)<br /> {<br /> for(Counter_blik=0; Counter_blik<80; Counter_blik++) // posouva zobrazovani po poli dat<br /> {<br /> if(Counter_blik==0)<br /> {<br /> _delay_ms(100);<br /> for(i=0; i<2; i++)<br /> {<br /> PWM_Blik(800, 40); // 10us pro kroky PWM, 10ms prodlevy<br /> _delay_ms(1500);<br /> }<br /> PWM_Blik(800, 40); // 10us pro kroky PWM, 10ms prodlevy<br /> _delay_ms(100);<br /> }<br /> if ((Counter_blik>0) && (Counter_blik<7)) PWM_Blik(10, 40);<br /> // ovlada rychlost rozsveceni a zhasinani pro ruzne obrazce<br /> if ((Counter_blik>6) && (Counter_blik<43)) PWM_Blik(20, 40);<br /> if (Counter_blik>42) PWM_Blik(10, 40);<br /> }<br /> }<br />
Podprogram PWM_Blik průběžně mění hodnotu registru ORC1A, takže jednotlivé obrazce z diod se postupně rozsvěcují a zhasínají.
void PWM_Blik(unsigned int time, unsigned int del) // ridi PWM<br /> {<br /> int i;<br /> for (PWM_a=0; PWM_a<4000; PWM_a++) // rozsveceni<br /> {<br /> OCR1A = PWM_a; // nastavi stridu PWM<br /> for (i=0; i<time; i++) _delay_us(10); // rychlost zmeny<br /> }<br /> LED_R_Set;<br /> for (i=0; i<del; i++) _delay_ms(10); // sviti 100%, ceka<br /> LED_R_Clr;<br /> for (PWM_a=0; PWM_a<4000; PWM_a++) // zhasina<br /> {<br /> OCR1A = 4000 – PWM_a; // nastavi stridu PWM<br /> for (i=0; i<time; i++) _delay_us(10); // rychlost zmeny<br /> }<br /> }<br />
Nastavení portů procesoru:
// * * * * * * * * * * * * * * * * * * * * * * * * * Aktivace vystupnich portu<br /> PORTD = 0b11111111; // H-pull up, L vysoká impedance<br /> DDRD = 0b11111111; // H-output, L-input<br /> PORTB = 0b00000110;<br /> DDRB = 0b00000110; // LEDred a Enable 74HC138<br /> PORTC = 0b00000111;<br /> DDRC = 0b00000111; // adresove vodice 74HC138</p> <p> Anoda_counter = 0;</p> <p> // * * * * * * * * * * * * * * * * * * * * * * * * * Aktivace casovace<br /> TCCR1A = 0b11110010; // casovac T1 Frekvence / 1024<br /> TCCR1B = 0b00011001; // rezim PWM 14<br /> TIMSK = 0b00010000; // preruseni pri preteceni<br /> OCR1A = 1000;<br /> ICR1 = 4000; // 100% strida PWM regulace<br /> SREG |= 0x80; // nastavi globalni preruseni<br />
Deklarace proměnných programu:
volatile unsigned char Anoda_counter; // pocitadlo anod obvod 74138<br /> volatile unsigned char Counter_blik; // ukazatel v poli dat<br /> unsigned int PWM_a; // aktualni hodnota PWM<br /> unsigned char i;<br />

Projekt vánoční hvězda pro AVR studio 6.0 Hvezda.

• O autorovi
• Najnovšie príspevky

ok2jnj

Najnovšie články od ok2jnj (zobraziť všetky)

• Výpočet a výroba transformátoru pro blokující spínaný zdroj - 21. augusta 2023
• TFT display s řadičem SSD1963 a ATmega162 - 15. septembra 2016
• Laboratorní zdroj – 7. část - 29. júna 2016