ATNEL tech-forum

Re: IMITACJA PŁOMIENIA

2013-03-01T00:43:39+01:00

Dzięki; wychodzi na to, że napisałem poprawny program.
W związku z tym, zezwalam kolegom na stosowanie mojego kodu nawet do celów komercyjnych

Statystyki: Napisane przez kicajek — 1 mar 2013, o 00:43

Re: IMITACJA PŁOMIENIA

2013-02-28T16:09:50+01:00

kicajek napisał(a):

Ja tylko pytałem jak prawidłowo zadeklarować to nieszczęsne OCR1A bo pisane po mojemu jest wykonywalne ale chyba nieprawidłowe.

Dlaczego nieprawidłowe? Normalna inicjacja wartości początkowych zmiennych/rejestrów jak w każdym innym programie.

A po wyrzuceniu tej linijki pierwsza pętla trochę trwała, bo najprawdopodobniej rejestr OCR1A jest domyślnie ustawiany na największą możliwą wartość. Jeżeli takie działanie jest dla ciebie nieakceptowalne to ja nie widzę innej możliwości pozbycia się tej linijki.

Statystyki: Napisane przez barney — 28 lut 2013, o 16:09

Re: IMITACJA PŁOMIENIA

2013-02-28T01:31:42+01:00

Quote:

możesz wyrzucić to OCR1A = m;

- jeśli wyrzucam to z tego miejsca to za pierwszym razem, po uruchomieniu "coś tam liczy " i startuje dopiero po jakimś czasie.
Co do pwm6 to faktycznie niepotrzebnie mi się zawieruszył.
Jeśli chodzi o składnię [syntax=c]if (n == 20) n=0 ,m = rand()%1500+50 ;[/syntax] - to wyliczenia są prawidłowe i program działa; ja tylko pytałem jak prawidłowo zadeklarować to nieszczęsne OCR1A bo pisane po mojemu jest wykonywalne ale chyba nieprawidłowe.
Dzięki za zainteresowanie - jeszcze nie śpicie ?

[syntax=c]if (n == 20) {n=0; m = rand()%1500+50 ;}[/syntax] - taki zapis tak samo (przynajmniej w moim przypadku) działa.

Statystyki: Napisane przez kicajek — 28 lut 2013, o 01:31

Re: IMITACJA PŁOMIENIA

2013-02-28T00:40:21+01:00

No faktycznie, trochę mogłoby to potrwać
A tak btw po co jest deklarowane pwm6 ? Nie widzę, aby coś było z nim robione...

Statystyki: Napisane przez barney — 28 lut 2013, o 00:40

Re: IMITACJA PŁOMIENIA

2013-02-28T00:35:22+01:00

Niestety taka konstrukcja:

PORTB |= (1<
zamiast takiej

PORTB |= (1 << PB0);

i to w pętli - może się okazać gwoździem do trumny jeśli chodzi o długość czasu trwania przerwania. O ile ta druga operacja będzie przetłumaczona praktycznie na jeden rozkaz asemblerowy to ta druga będzie rozwinięta do dość sporego kodu - więc już o czasie nie muszę nic dodawać hmm ?

Statystyki: Napisane przez mirekk36 — 28 lut 2013, o 00:35

Re: IMITACJA PŁOMIENIA

2013-02-28T00:32:51+01:00

Według mnie w tym miejscu [syntax=c] TCCR1B |= (1 << CS12) | (1 << CS10); // preskaler - 1024
OCR1A = m;[/syntax]możesz wyrzucić to OCR1A = m;

Co oznacza ten zapis ?[syntax=c]if (n == 20) n=0 ,m = rand()%1500+50 ;[/syntax]Jeżeli pod if-em mają się wykonać 2 warunki to chyba powinno być [syntax=c]if (n == 20) {n=0; m = rand()%1500+50 ;}[/syntax]

Ten zapis [syntax=c] if (cnt >= pwm1) PORTB |= (1 << PB0); else PORTB &= ~(1 << PB0); //dioda żółta
if (cnt >= pwm2) PORTB |= (1 << PB1); else PORTB &= ~(1 << PB1); //dioda pomarańczowa
if (cnt >= pwm3) PORTB |= (1 << PB2); else PORTB &= ~(1 << PB2); //dioda czerwona
if (cnt >= pwm4) PORTB |= (1 << PB3); else PORTB &= ~(1 << PB3); //dioda pomarańczowa
if (cnt >= pwm5) PORTB |= (1 << PB4); else PORTB &= ~(1 << PB4); //dioda żółta[/syntax] osobiście zapisałbym w ten sposob (ideowo) [syntax=c]uint8_t pwm[5];
for (uint8_t popo=0; popo<=4; popo++) if (cnt>=pwm[popo]) PORTB |= (1<Statystyki: Napisane przez barney — 28 lut 2013, o 00:32

IMITACJA PŁOMIENIA

2013-02-28T00:18:31+01:00

Witam
Zainspirowany "Niebiańską Książeczką" - PWM prog., oraz wątkiem http://forum.atnel.pl/topic2002.html (podpowiedź kol.SunRiver-a) postanowiłem "wyprodukować" coś podobnego:

[syntax=c]/*
* main.c
*
* Created on: 2013-02-24
* Autor: Andrzejek
*
* ATMEGA 8
* osc. wew. 8MHz
* podłączenie diod ANODA - Vcc
*/

#include
#include
#include // biblioteka do funkcji RAND

volatile uint8_t pwm1, pwm2, pwm3, pwm4, pwm5, pwm6, n; // n - zmienna pomocnicza dla m
int m = 500; // m - zmienna wartości dla OCR1A

int main(void)

{
DDRB |= (1<PORTB = 0;

DDRD |= (1<PORTD |= (1<
TCCR2 |= (1 << WGM21); // tryb CTC multipleksera
TCCR2 |= (1 << CS20) ; // preskaler - 1
OCR2 = 30;

TCCR1B |= (1 << WGM12); // tryb CTC wyliczenia pwm
TCCR1B |= (1 << CS12) | (1 << CS10); // preskaler - 1024
OCR1A = m;

TIMSK |= (1 << OCIE2);

sei();

while (1)

{

if (TIFR & (1 << OCF1A)) // obsługa pwm efektu

{
OCR1A = m;
n++;

PORTD = ~PORTD;
pwm1 = rand() % 196 + 60;
pwm2 = rand() % 246 + 10;
pwm3 = rand() % 216 + 40;
pwm4 = rand() % 246 + 10;
pwm5 = rand() % 196 + 60;

if (n == 20) n=0 ,m = rand()%1500+50 ;

TIFR = (1 << OCF1A);

}
}

}

ISR(TIMER2_COMP_vect) // obsługa pwm programowy

{

static uint8_t cnt;

if (cnt >= pwm1) PORTB |= (1 << PB0); else PORTB &= ~(1 << PB0); //dioda żółta
if (cnt >= pwm2) PORTB |= (1 << PB1); else PORTB &= ~(1 << PB1); //dioda pomarańczowa
if (cnt >= pwm3) PORTB |= (1 << PB2); else PORTB &= ~(1 << PB2); //dioda czerwona
if (cnt >= pwm4) PORTB |= (1 << PB3); else PORTB &= ~(1 << PB3); //dioda pomarańczowa
if (cnt >= pwm5) PORTB |= (1 << PB4); else PORTB &= ~(1 << PB4); //dioda żółta

cnt++;

}

[/syntax]

Moje pytanie do szanownych kolegów brzmi: jak "po ludzku" (czyt. prawidłowo)zadeklarować OCR1A=m, żeby nie trzeba było pisać tego dwa razy ( co widać w moim godnym uśmiechu programie).
Zdaję sobie sprawę, że pytanie jest banalne ale wizualnie nie podoba mi się mój produkt.
Dla ścisłości działa toto dobrze ale napisane....
Diody na PB efekt wizualny, dioda na PD - sprawdzałem, czy zmienia się częstotliwość zmian ( ale wyszło )
Pomocnym dziękuję, urażonych przepraszam.

Statystyki: Napisane przez kicajek — 28 lut 2013, o 00:18