ATNEL tech-forum

Re: ATmega8 "Inteligętne schody"

2015-12-15T20:57:26+01:00

Nie wiem który testowałeś ten pierwszy mój czy drugi, bo pierwszy nie działa, spróbuj zrobić tak:
[syntax=c]/*
* Zapalanie diód od góry do dołu
*/
void DownDiodeOn()
{
for(int8_t n = 4; n >= 0; n--) // mysle ze tu jest blad
{
for(uint8_t i = 0; i < 255; i++)
{
pwm[n] = i;
_delay_ms(DELAY_PWM);
}
}
}

/*
* Wygaszanie diód od góry do dołu
*/
void DownDiodeOff()
{
for(int8_t n = 4; n >= 0; n--) // i tu też
{
for(uint8_t i = 255; i > 0; i--)
{
pwm[n] = i;
_delay_ms(DELAY_PWM);
}
}
}[/syntax]
Jak nie działa to już nie mam pomysłu. Możesz spróbować jeszcze popatrzyć co się dzieje w programie na podstawie zapalenia diody i np warunku if i wtedy dowiesz się gdzie dokładnie leży problem. Sprawdziłem u siebie tę pętlę i mi dobrze działa(nie zapętla się). Sprawdziłem samą pętle a nie cały kod.

Statystyki: Napisane przez Bartek123 — 15 gru 2015, o 20:57

Re: ATmega8 "Inteligętne schody"

2015-12-15T14:01:27+01:00

Rozwiązanie użytkownika Bartek123 już testowałem i powoduje ono zapętlenie programu tak samo jak w przypadku użytkownika sz4t4n

Na szybko rozwiązałem ten problem w ten sposób
[syntax=c]/*
* Zapalanie diód od góry do dołu
*/
void DownDiodeOn()
{
for(uint8_t n = 5; n > 0; --n)// mysle ze tu jest blad
{
for(uint8_t i = 0; i < 255; i++)
{
pwm[n] = i;
_delay_ms(DELAY_PWM);
}
}

// tymczasowe naprawienie błędu
for(uint8_t i = 0; i < 255; i++) {
pwm[0] = i;
_delay_ms(DELAY_PWM);
}
}

/*
* Wygaszanie diód od góry do dołu
*/
void DownDiodeOff()
{
for(uint8_t n = 5; n > 0; --n)// i tu też
{
for(uint8_t i = 255; i > 0; i--)
{
pwm[n] = i;
_delay_ms(DELAY_PWM);
}
}

// tymczasowe naprawienie błędu
for(uint8_t i = 255; i > 0; i--) {
pwm[0] = i;
_delay_ms(DELAY_PWM);
}
}[/syntax]

i działa prawidłowo tylko razi w oczy ten dodatkowy for
mimo wszystko dziękuję za zainteresowanie

Statystyki: Napisane przez lukaszc27 — 15 gru 2015, o 14:01

Re: ATmega8 "Inteligętne schody"

2015-12-14T21:47:27+01:00

Ile programistów tyle rozwiązań . Zmiennej n (nie jestem pewien na 100%) trzeba na początku dać 4 nie pięć taka mała uwaga.

PS: Poprawiłem kod który wstawiłem, bo dopiero w szkole zauważyłem, że jest zły.

Statystyki: Napisane przez Bartek123 — 14 gru 2015, o 21:47

Re: ATmega8 "Inteligętne schody"

2015-12-14T21:23:44+01:00

Ja bym jednak zmienił to w ten sposób

[syntax=c]void DownDiodeOn()
{
for(int8_t n = 5; n > -1; --n)
{
for(uint8_t i = 0; i < 255; i++)
{
pwm[n] = i;
_delay_ms(DELAY_PWM);
}
}
}[/syntax]

Statystyki: Napisane przez sz4t4n — 14 gru 2015, o 21:23

Re: ATmega8 "Inteligętne schody"

2015-12-15T13:27:08+01:00

A sprawdź czy tak będzie działać:
[syntax=c]/*
* Zapalanie diód od góry do dołu
*/
void DownDiodeOn()
{
for(int8_t n = 4; n >= 0; --n) // mysle ze tu jest blad
{
for(uint8_t i = 0; i < 255; i++)
{
pwm[n] = i;
_delay_ms(DELAY_PWM);
}
}
}

/*
* Wygaszanie diód od góry do dołu
*/
void DownDiodeOff()
{
for(int8_t n = 4; n >= 0; --n) // i tu też
{
for(uint8_t i = 255; i > 0; i--)
{
pwm[n] = i;
_delay_ms(DELAY_PWM);
}
}
}[/syntax]
powinno działać. Problem był w tym, że na górze masz tablice pwm[5] czyli jest 5 pwmów od 0 do 4 a ty w pętli masz warunek n>0 więc n nigdy nie będzie miało wartość zero i zaczynasz liczyć od pięciu a piąty pwm ma indeks w tablicy pwm 4 a nie 5.

Statystyki: Napisane przez Bartek123 — 14 gru 2015, o 21:12

Re: ATmega8 "Inteligętne schody"

2015-12-14T21:01:24+01:00

Dzięki za odpowiedź, ale to nie jest rozwiązanie mojego problemu
To co ty zaprezentowałeś pochodzi z funkcji UpDiodeOn i UpDiodeOff a one działają prawidłowo

Problem mam przy funkcjach DownDiodeOn i DownDiodeOff, już nie zapętlają programu ale ostatnia dioda się nie zapala reszta idzie jak powinno

[syntax=c]/*
* Zapalanie diód od góry do dołu
*/
void DownDiodeOn()
{
for(uint8_t n = 5; n > 0; --n)// mysle ze tu jest blad
{
for(uint8_t i = 0; i < 255; i++)
{
pwm[n] = i;
_delay_ms(DELAY_PWM);
}
}
}

/*
* Wygaszanie diód od góry do dołu
*/
void DownDiodeOff()
{
for(uint8_t n = 5; n > 0; --n)// i tu też
{
for(uint8_t i = 255; i > 0; i--)
{
pwm[n] = i;
_delay_ms(DELAY_PWM);
}
}
}[/syntax]

tu wstawiam same funkcje i w oznaczonych miejscach prawdopodobne miejsca błędnych warunków (pętla robi za 1 obieg za mało)

Ale dziękuję za zainteresowanie użytkownika sz4t4n i życzę wesołych świąt

Statystyki: Napisane przez lukaszc27 — 14 gru 2015, o 21:01

Re: ATmega8 "Inteligętne schody"

2015-12-14T20:45:53+01:00

Cześć,

to powoduje że n kończy się na 4
[syntax=c]for(uint8_t n = 0; n < 5; n++)[/syntax]

zrób tak :

[syntax=c]for(uint8_t n = 0; n < 6; n++)[/syntax]

powinno zadziałać.

Statystyki: Napisane przez sz4t4n — 14 gru 2015, o 20:45

Re: ATmega8 "Inteligętne schody"

2015-12-14T18:37:48+01:00

Po poprawce zaproponowanej przez pana Mirka wstawiłem nową wersję kodu, funkcje działają prawidłowo tylko w funkcjach DownDiodeOn() i DownDiodeOff() pętla for(sterowania zmienna n) wykonuje się jeden krok za mało i jedna dioda się nie zapala bardzo bym prosił o wskazówki

Statystyki: Napisane przez lukaszc27 — 14 gru 2015, o 18:37

ATmega8 "Inteligętne schody"

2015-12-14T16:33:04+01:00

Witam! Programuję koledze mini sterownik "Inteligętnych schodów" ich inteligecja ma polegać na tym że kiedy wchodzimy to czujnik ruchu PIR HC-SR501 uruchamia schody po kolei do góry a kiedy idziemy w dół to czujnik zamontowany na górze uruchamia światło na dół, wszystko proste do oprogramowania tylko mam pewien problem funkcje zapalające światło działają tylko raz a puźniej blokują program i nie wiem dla czego

Tutaj kod:
[syntax=c]#include
#include
#include
#include

#include "main.h"

void Setup();// Initializacja Atmegi
void UpDiodeOn();// zapalanie diód od dołu do góry
void UpDiodeOff();// wygaszenie diód od dołu do góry
void DownDiodeOn();// zapalanie diód od góry do dołu
void DownDiodeOff();// wygaszenie diód od góry do dołu

volatile uint8_t pwm[5];// 5 programowych kanałów PWM
volatile uint8_t sensorDownActive;// 1 - znaleziono ruch, 0 - brak ruchu
volatile uint8_t sensorUpActive;// 1 - znaleziono ruch, 0 - brak ruchu

// mini RTC ;-)
volatile uint8_t time;
volatile uint8_t timeFlag;

/*
* Główna funkcja
*/
int main()
{
Setup();

sei();// zeswolenie na przerwania
while(1)
{
if(!(PIND & SENSOR_UP))
{
UpDiodeOn();
UpDiodeOff();
}

if(!(PIND & SENSOR_DOWN))
{
DownDiodeOn();
DownDiodeOff();
}

#ifdef USE_WDT
wdt_reset();
#endif // USE_WDT
} // while

#ifdef USE_WDT
wdt_disable();
#endif // USE_WDT
return 0;
}

/*
* Ustawienie portów I/O
* uruchomienie timerów
*/
void Setup()
{
// wyjscia dla diod na schodz
DDRC |= LED1 | LED2 | LED3 | LED4 | LED5;

// ustawienie czujników (podciągnięcie do VCC)
PORTD |= SENSOR_UP | SENSOR_DOWN;

DDRB |= (1 << PB1);// dla testów Timera

//Timer/Counter2 -> CTC
TCCR2 |= (1 << WGM21);// Tryb CTC
TCCR2 |= (1 << COM21) | (1 << COM20);// Set OC2 on Compare Match
TCCR2 |= (1 << CS20);// Brak preskalera
OCR2 = 156;

TIMSK |= (1 << OCIE2);// włączenie przerwania Timera2 trybu CTC

// Timer/Counter0 -> Normal
TCCR0 |= (1 << CS02) | (1 << CS00);// preskaler 1024
TCNT0 = 78;// dodatkowy podział przez 78 ( ~40Hz )
TIMSK |= (1 << TOIE0);// włączenie przerwania przepełnienia

#ifdef USE_WDT
wdt_enable(WDTO_2S);// uruchomienie WotchDog (1s)
#endif // USE_WDT
_delay_ms(10);// ustatkowanie napięć na portach
}

/*
* Przerwanie CTC
* realizacja programowego PWM
*/
ISR(TIMER2_COMP_vect)
{
static volatile uint8_t PWMcount;// licznik impulsów PWM

// kanał 1
if((PWMcount > 0) && (PWMcount < pwm[0]))
PORTC |= LED1;
else PORTC &= ~LED1;

// kanał 2
if((PWMcount > 0) && (PWMcount < pwm[1]))
PORTC |= LED2;
else PORTC &= ~LED2;

// kanał 3
if((PWMcount > 0) && (PWMcount < pwm[2]))
PORTC |= LED3;
else PORTC &= ~LED3;

// kanał 4
if((PWMcount > 0) && (PWMcount < pwm[3]))
PORTC |= LED4;
else PORTC &= ~LED4;

// kanał 5
if((PWMcount > 0) && (PWMcount < pwm[4]))
PORTC |= LED5;
else PORTC &= ~LED5;

PWMcount++;
if(PWMcount > 255)
PWMcount = 0;
}

/*
* Timer/Counter0 Overflow innterupt
* odczytywanie stanów czujników
*/
ISR(TIMER0_OVF_vect)
{
static uint8_t count = 0;
static uint8_t sensorDownLock;// pomocnicze podczas usuwania nierównoci w napięciach
static uint8_t sensorUpLock;//

if(++count > 10)
{
timeFlag = 1;

time++;
if(time > 59)
time = 0;

count = 0;
}

// sprawdzenie stanów czujników
if(timeFlag)
{
// ruch na dole
if(!sensorDownLock && !(PIND & SENSOR_DOWN))
{
sensorDownLock = 1;
sensorDownActive = 1;
}
else if(sensorDownLock && (PIND & SENSOR_DOWN))
sensorDownLock++;

// ruch na górze
if(!sensorUpLock && !(PIND & SENSOR_UP))
{
sensorUpLock = 1;
sensorUpActive = 1;
}
else if(sensorUpLock && (PIND & SENSOR_UP))
sensorUpLock++;

timeFlag = 0;
}
}

/*
* Zapalanie diód podczas wychodzenia do góry
*/
void UpDiodeOn()
{
for(uint8_t n = 0; n < 5; n++)
{
for(uint8_t i = 0; i < 255; i++)
{
pwm[n] = i;
_delay_ms(DELAY_PWM);
}
}
}

/*
* Wygaszenie diód po wyjciu do góry
*/
void UpDiodeOff()
{
for(uint8_t n = 0; n < 5; n++)
{
for(uint8_t i = 255; i > 0; i--)
{
pwm[n] = i;
_delay_ms(DELAY_PWM);
}
}
}

/*
* Zapalanie diód od góry do dołu
*/
void DownDiodeOn()
{
for(uint8_t n = 5; n > 0; --n)
{
for(uint8_t i = 0; i < 255; i++)
{
pwm[n] = i;
_delay_ms(DELAY_PWM);
}
}
}

/*
* Wygaszanie diód od góry do dołu
*/
void DownDiodeOff()
{
for(uint8_t n = 5; n > 0; --n)
{
for(uint8_t i = 255; i > 0; i--)
{
pwm[n] = i;
_delay_ms(DELAY_PWM);
}
}
}[/syntax]

Bardzo prosiłbym o sugestie z jakich powodów dzieją się te dziwne anomalie
Z góry dziękuje i życzę wesołych świąt

------------------------ [ Dodano po: 9 minutach ]

Tak teraz zauważyłem (po dodatkowych testach ) że funkcje UpDiodeOn() i UpDiodeOff() działają prawidłowo, problemy pojawiają się przy funkcjach DownDiodeOn() i DownDiodeOff()

Statystyki: Napisane przez lukaszc27 — 14 gru 2015, o 16:33