ATNEL tech-forum 2016-05-12T00:05:06+01:00 https://forum.atnel.pl/feed.php?f=4&t=6099&mode 2016-05-12T00:05:06+01:00 2016-05-12T00:05:06+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=160482#p160482 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]> W.g mnie jeśli kol.TomekTomek55 operuje gotowymi bibliotekami to posiada wszystkie projekty z BB. Co stoi na przeszkodzie wziąć "Projekt wielozadaniowy", wyrżnąć to co niepotrzebne i ma działać ( wyrżnąć a nie zarżnąć - to muszą być precyzyjne cięcia ). A jeśli nie, to przynajmniej popatrzeć jak bez _delay: ds, 7_LED, LCD i pozostałe bajery są zaprzęgnięte do pracy. To "śpiewa, tańczy i gotuje" i jeszcze mruga ;)

Pozdr.

Statystyki: Napisane przez kicajek — 12 maja 2016, o 00:05

]]> 2016-05-11T21:55:53+01:00 2016-05-11T21:55:53+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=160477#p160477 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]>
Wysłane z mojego HTC One_M8 przy użyciu Tapatalka

Statystyki: Napisane przez adamBo — 11 maja 2016, o 21:55

]]> 2016-05-11T21:39:13+01:00 2016-05-11T21:39:13+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=160472#p160472 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]> Code:
void Pomiar_temperatury(uint8_t Sekunda)
{////////////////////////DS18B20 /////////////////////////////////////////
static uint8_t  StanPoprzedni;
  if( Sekunda != StanPoprzedni ) {   /* sprawdzanie flagi tyknięć timera programowego co 1 sekundę */
     StanPoprzedni = Sekunda;
         /* co trzy sekundy gdy reszta z dzielenia modulo 3 == 0 sprawdzaj ilość dostępnych czujników */
         if( 0 == (Sekunda%3) ) {
            uint8_t *cl=(uint8_t*)gSensorIDs;   // pobieramy wskaźnik do tablicy adresów czujników
            for( uint8_t i=0; i<MAXSENSORS*OW_ROMCODE_SIZE; i++) *cl++ = 0; // kasujemy całą tablicę
            czujniki_cnt = search_sensors();   // ponownie wykrywamy ile jest czujników i zapełniamy tablicę
         }
         /* co trzy sekundy gdy reszta z dzielenia modulo 3 == 1 wysyłaj rozkaz pomiaru do czujników */
         if( 1 == (Sekunda%3) )
         {
         DS18X20_start_meas( DS18X20_POWER_EXTERN, NULL );
         }
         /* co trzy sekundy gdy reszta z dzielenia modulo 3 == 2 czyli jedną sekundę po rozkazie konwersji
          *  dokonuj odczytu i wyświetlania temperatur z 2 czujników jeśli są podłączone, jeśli nie
          *  to pokaż komunikat o błędzie
          */
         if( 2 == (Sekunda%3) ) {
            uint8_t a;
             for (a = 0; a < 4; ++a) {
               if( DS18X20_OK == DS18X20_read_meas(gSensorIDs[a], &subzero, &cel, &cel_fract_bits) ){
                   CzujnikNr[a].TempLiczba = cel *10 + cel_fract_bits;
                   CzujnikNr[a].Blad = 0;
                   if(subzero) { //jesli temp jemna to zruj
                      cel = 0;
                      cel_fract_bits = 0;
                   }
               } else {CzujnikNr[a].Blad = 1;}  //Blad czujnika temp
            }


         }

         /* zerujemy flagę aby tylko jeden raz w ciągu sekundy wykonać operacje */
      } /* koniec sprawdzania flagi */

}   ////////////////////////DS18B20 ///////////////////////////////////////







Tak to wygląda w środku a delayus(480) jest juz w funkcji Mirkowej a NIE mojej.

Statystyki: Napisane przez TomekTomek55 — 11 maja 2016, o 21:39

]]> 2016-05-11T21:29:53+01:00 2016-05-11T21:29:53+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=160467#p160467 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]>
Wysłane z mojego HTC One_M8 przy użyciu Tapatalka

Statystyki: Napisane przez adamBo — 11 maja 2016, o 21:29

]]> 2016-05-11T21:15:38+01:00 2016-05-11T21:15:38+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=160461#p160461 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]> Statystyki: Napisane przez TomekTomek55 — 11 maja 2016, o 21:15

]]> 2016-05-11T20:50:05+01:00 2016-05-11T20:50:05+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=160455#p160455 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]>
Ps kod wklejamy za pomocą syntax C :) A kolega mnie uprzedził

Statystyki: Napisane przez matekogon — 11 maja 2016, o 20:50

]]> 2016-05-11T20:46:05+01:00 2016-05-11T20:46:05+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=160454#p160454 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]>
Wysłane z mojego HTC One_M8 przy użyciu Tapatalka

Statystyki: Napisane przez adamBo — 11 maja 2016, o 20:46

]]> 2016-05-11T20:24:00+01:00 2016-05-11T20:24:00+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=160451#p160451 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]> Code:
while(1)
{//petla nieskonczona

kanal1 = procent(40);   //funkcja regulacji mocy

if (FlagaDokonajPomiaru == true ) {  //co 1s ustawiana w przerwaniu
   FlagaDokonajPomiaru = false;
   Pomiar_temperatury(Sekundy); //     jak to zaremuje t jest ok
}




}//petla nieskonczona



Statystyki: Napisane przez TomekTomek55 — 11 maja 2016, o 20:24

]]> 2016-05-11T20:16:55+01:00 2016-05-11T20:16:55+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=160448#p160448 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]>
Wysłane z mojego HTC One_M8 przy użyciu Tapatalka

Statystyki: Napisane przez adamBo — 11 maja 2016, o 20:16

]]> 2016-05-11T20:03:14+01:00 2016-05-11T20:03:14+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=160446#p160446 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]> Statystyki: Napisane przez TomekTomek55 — 11 maja 2016, o 20:03

]]> 2016-05-11T19:50:28+01:00 2016-05-11T19:50:28+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=160440#p160440 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]> llemar napisał(a):

Kombinowałem i kombinowałem ...i chyba jednak musi być po mojemu :) Mam problem z fragmentem kodu do cyklicznego ściemniania i rozjaśniania (amplituda). Proszę o podpowiedzi :)
]


Kolego zastąp delay flagami wyznaczonymi przez przerwanie. Bo przecież delay wstrzymuje ci cały program na określony czas a avr może wykonywać inne czynności w tym czasie zamiast odpoczywać

TomekTomek55 napisał(a):

Odświerze trochę temat nie będę zakładał nowego.
Wykonałem wspomniany w temacie regulator i mam problem tego typu ze mój AVR musi mierzyć jeszcze temperaturę z DS18B20. Jeśli jest wykonywany sam program regulacji mocy to jest wszystko OK. Jeśli jednak dołożę obsługę czujników DS to żarówka w chwili pomiaru czasami przygasa ma to związek z samą istotą działania programu dla obsługi DS. Nie wiem jak to pogodzić bo generalnie nie mogę na czas pomiaru wyłączać sterowania wyjściem 230V.


Kolego a może jakiś fragment kodu, gdzie co wstawiłeś ,ciężko wróżyć z fusów :)

Statystyki: Napisane przez matekogon — 11 maja 2016, o 19:50

]]> 2016-05-11T17:19:47+01:00 2016-05-11T17:19:47+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=160430#p160430 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]> Wykonałem wspomniany w temacie regulator i mam problem tego typu ze mój AVR musi mierzyć jeszcze temperaturę z DS18B20. Jeśli jest wykonywany sam program regulacji mocy to jest wszystko OK. Jeśli jednak dołożę obsługę czujników DS to żarówka w chwili pomiaru czasami przygasa ma to związek z samą istotą działania programu dla obsługi DS. Nie wiem jak to pogodzić bo generalnie nie mogę na czas pomiaru wyłączać sterowania wyjściem 230V.

Statystyki: Napisane przez TomekTomek55 — 11 maja 2016, o 17:19

]]> 2014-02-26T23:22:14+01:00 2014-02-26T23:22:14+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=72221#p72221 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]> Mam problem z fragmentem kodu do cyklicznego ściemniania i rozjaśniania (amplituda). Proszę o podpowiedzi :)
[syntax=c]#include <avr/io.h>
#include <avr/interrupt.h>
#include <util/delay.h>


#define LED1 (1<<PC1)
#define LED2 (1<<PC2)
#define LED2_TOG PORTC ^= LED2// makrodefinicja – zmiana stanu diody
#define KEY1 (1<<PC3)
#define KEY2 (1<<PC4)

#define KEY_PIN (1<<PC3)
#define KEY_DOWN !(PINC & KEY_PIN)

uint8_t czujniki_cnt; /* ilość czujników na magistrali */
volatile uint8_t s1_flag; /* flaga tyknięcia timera co 1 sekundę */
volatile uint8_t sekundy; /* licznik sekund 0-59 */
volatile uint8_t timer1=0;

/*********************** D I M M E R - U S T A W I E N I A ***************************/
#define LICZBA_KROKOW 200

// czas trwania szpilki (Detekcja ZERA) wyrażony w milisekundach np: 1,2,... albo np: 0.5
#define SZPILKA_MS 1.7
/*********************** D I M M E R - U S T A W I E N I A ***************************/

#define __OCR_STEP ((F_CPU/8)*((1000-((SZPILKA_MS*100)/2))/LICZBA_KROKOW))/100000

//#define procent(x) ((x*(LICZBA_KROKOW-1))/100)

static uint8_t procent(uint8_t pr) {
return (pr * (LICZBA_KROKOW-1))/100;
}


#define T_ZAR1_ON PORTC |= (1<<PC0)
#define T_ZAR1_OFF PORTC &= ~(1<<PC0)

#define T_ZAR2_ON PORTC |= (1<<PC1)
#define T_ZAR2_OFF PORTC &= ~(1<<PC1)

#define T_ZAR3_ON PORTC |= (1<<PC2)
#define T_ZAR3_OFF PORTC &= ~(1<<PC2)

uint8_t key1_lock, key2_lock;
uint8_t wlacznik = 0;
uint8_t zatrzask = 0;
uint8_t ampli = 0;
volatile uint8_t kroki;
volatile uint8_t kanal1;
volatile uint8_t ika1;




void wlacz(void) {
wlacznik=1;
}

void wylacz(void) {
wlacznik=0;
}

void amplituda(void) {

ampli=1;

}



void key_press( uint8_t * klock, volatile uint8_t * KPIN, uint8_t key_mask, void (*kfun)(void) ) ;
void key_push_up( uint8_t * klock, volatile uint8_t * KPIN, uint8_t key_mask, void (*kfun)(void) ) ;



int main(void) {


PORTC |= KEY1|KEY2; // podciągamy linie klawiszy do VCC
DDRC |= LED1|LED2; // piny LED jako WYjścia



DDRC |= (1<<PC0);
T_ZAR1_OFF;
DDRC |= (1<<PC1);
T_ZAR2_OFF;

DDRC &= ~KEY_PIN;
PORTC |= KEY_PIN;

// Przerwanie INT0
MCUCR |= (1<<ISC01)|(1<<ISC00);// zbocze narastające
GICR |= (1<<INT0);// odblokowanie INT0


// TIMER2
#define TIMER2_START TCCR2 |= (1<<CS21)// prescaler=8
#define TIMER2_STOP TCCR2 &= ~(1<<CS21)// prescaler off
TCCR2 |= (1<<WGM21);// tryb CTC
TIMSK |= (1<<OCIE2);// odblokowanie przerwania COMPARE MATCH
OCR2 = __OCR_STEP;

// TIMER3
TCCR0 |= (1<<CS00)|(1<<CS02); /* preskaler = 1024 */
TIMSK |= (1<<TOIE0); /* zezwolenie na przerwanie CompareMatch */

sei();



#define SZYBKOSC_SCIEMNIACZA 20
volatile uint8_t i,k;

_delay_ms(10);

while(1) {




if(KEY_DOWN) {
_delay_ms(80);
if(KEY_DOWN) {
if(ampli==1){
//tutaj będzie kod zwiększający i zmniejszający wartoć zmiennej "i"
//w momencie zwolnienia klawisza zmienna powina mieć taką wartoć jak w chwili zwolniena
zatrzask=0;
}
if(s1_flag){
LED2_TOG; //lampka kontrolna czy procek działa
zatrzask++;
s1_flag=0;
}
}
}


if(wlacznik==0){

key_press( &key1_lock, &PINC, KEY1, wlacz ); //włączenie wiatła
}

if(wlacznik==1){
if(zatrzask>10){
key_press( &key1_lock, &PINC, KEY1, amplituda ); //włączenie trybu wyboru natężenia wiatła
if(zatrzask<10) ampli=0;
}

if(zatrzask>1){
if(ampli==0){
key_push_up( &key1_lock, &PINC, KEY1, wylacz ); //wyłączenie wiatła
}
}
}
if(wlacznik==1){ //rozjasnianie
PORTC |= (1<<PC1);
if(i<100){
for( i=0; i<102; i++ ) {
kanal1 = procent(i);
_delay_ms(SZYBKOSC_SCIEMNIACZA);
}
}
}





if(wlacznik==0){ //sciemnianie
PORTC &= ~(1<<PC1);
if(i>100){
for( k=0, i=101; k<101; k++,i-- ) {
kanal1 = procent(i);
_delay_ms(SZYBKOSC_SCIEMNIACZA);
zatrzask=0;
}
}
}




} //end while(1)
} //end int main(void)


ISR(INT0_vect) {
TIMER2_STOP;
T_ZAR1_OFF;

kroki=LICZBA_KROKOW;

/* podwójne buforowanie, synchronizacja do 50Hz */
ika1=kanal1;

TCNT2 = 0;
TIMER2_START;


}

ISR(TIMER2_COMP_vect) {
if(ika1 && kroki == ika1) T_ZAR1_ON;
kroki--;

// static uint8_t cnt=0; /* statyczna zmienna cnt do odliczania setnych ms */

}

ISR(TIMER0_OVF_vect) //przerwania timer
{
static uint8_t cnt=0; /* statyczna zmienna cnt do odliczania setnych ms */

if(++cnt>2) { /* gdy licznik ms > 33 (minęła 1 sekunda) */
s1_flag=1; /* ustaw flagę tyknięcia sekundy */
cnt=0; /* wyzeru licznik setnych ms */
}
}

void key_press(uint8_t * klock, volatile uint8_t * KPIN, uint8_t key_mask, void (*kfun)(void) ) {

register uint8_t key_press = (*KPIN & key_mask);

if( !*klock && !key_press ) {
*klock=1;

// reakcja na PRESS (wcinięcie przycisku)
if(kfun) kfun();

} else if( *klock && key_press ) (*klock)++;
}



void key_push_up(uint8_t * klock, volatile uint8_t * KPIN, uint8_t key_mask, void (*kfun)(void) ) {

register uint8_t key_press = (*KPIN & key_mask);

if( !*klock && !key_press ) *klock=1;
else if( *klock && key_press ) {
if( !++*klock ) {

// reakcja na PUSH_UP (zwolnienie przycisku)
if(kfun) kfun();
}
}
}[/syntax]

Statystyki: Napisane przez llemar — 26 lut 2014, o 23:22

]]> 2014-02-25T14:12:36+01:00 2014-02-25T14:12:36+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=71978#p71978 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]> jak będę w domu to się pobawię :)

Statystyki: Napisane przez llemar — 25 lut 2014, o 14:12

]]> 2014-02-24T22:29:38+01:00 2014-02-24T22:29:38+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=71896#p71896 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]> llemar napisał(a):

W języku drabinkowym na PLC nie miałbym z tym problemów, ale w C jestem bardzo początkującym
No to zupełnie odwrotnie niż ja :-)

Ja myślałem żeby zrobić coś w tym stylu
[syntax=c]#include <avr/io.h>
#include <avr/interrupt.h>
#include <util/delay.h>


/*********************** D I M M E R - U S T A W I E N I A ***************************/
#define LICZBA_KROKOW 200

// czas trwania szpilki (Detekcja ZERA) wyrażony w milisekundach np: 1,2,... albo np: 0.5
#define SZPILKA_MS 1.8
/*********************** D I M M E R - U S T A W I E N I A ***************************/

#define __OCR_STEP ((F_CPU/8)*((1000-((SZPILKA_MS*100)/2))/LICZBA_KROKOW))/100000

//#define procent(x) ((x*(LICZBA_KROKOW-1))/100)

static uint8_t procent(uint8_t pr) {
return (pr * (LICZBA_KROKOW-1))/100;
}

#define SZYBKOSC_SCIEMNIACZA 5//50ms - 10ms *5

#define KEY_PIN (1<<PC3)

#define T_ZAR1_ON PORTC |= (1<<PC0)
#define T_ZAR1_OFF PORTC &= ~(1<<PC0)

//#define T_ZAR2_ON PORTC |= (1<<PC1)
//#define T_ZAR2_OFF PORTC &= ~(1<<PC1)
//
//#define T_ZAR3_ON PORTC |= (1<<PC2)
//#define T_ZAR3_OFF PORTC &= ~(1<<PC2)

volatile uint8_t kroki;
volatile uint8_t kanal1;
//volatile uint8_t kanal2;
//volatile uint8_t kanal3;

volatile uint8_t ika1;
//volatile uint8_t ika2;
//volatile uint8_t ika3;

volatile uint16_t Timer1, Timer2, Timer3;//timery programowe
uint8_t k1;//zmienna na potrzeby obsługi klawisza
uint8_t dir, on_off_flag;
int8_t i;

void fun1(void);
void fun2(void);

void SuperDebounce(uint8_t * key_state, volatile uint8_t *KPIN,
uint8_t key_mask, uint16_t rep_time, uint16_t rep_wait,
void (*push_proc)(void), void (*rep_proc)(void) );


int main(void) {

DDRC &= ~KEY_PIN;
PORTC |= KEY_PIN;


//dioda LED - Procesor OK
DDRC |=(1<<PC5);//wyjście
PORTC |= (1<<PC5);//dioda wyłączona

DDRC |= (1<<PC0)|(1<<PC1)|(1<<PC2);
T_ZAR1_OFF;
//T_ZAR2_OFF;
//T_ZAR3_OFF;

// Przerwanie INT0
MCUCR |= (1<<ISC01)|(1<<ISC00);// zbocze narastające
GICR |= (1<<INT0);// odblokowanie INT0


// TIMER2
#define TIMER2_START TCCR2 |= (1<<CS21)// prescaler=8
#define TIMER2_STOP TCCR2 &= ~(1<<CS21)// prescaler off
TCCR2 |= (1<<WGM21);// tryb CTC
TIMSK |= (1<<OCIE2);// odblokowanie przerwania COMPARE MATCH
OCR2 = __OCR_STEP;

//konfiguracja Timera0 - Timery programowe
//Tryb Normal
TCCR0 |= (1<<CS02) | (1<<CS00);//preskaler 1024
TCNT0 = 178;//ok. 10ms - 100Hz
TIMSK |= (1<<TOIE0);//odblokowanie przerwania Timer0 Overflow


sei();

kanal1 = procent(0);
//kanal2 = procent(60);
//kanal3 = procent(90);
_delay_ms(1000);

while(1)
{
SuperDebounce(&k1, &PINC, KEY_PIN, 5, 100, fun1, fun2 );

if(on_off_flag)//jeśli zmienna ustawiona
{
if(!Timer2)//jeśli Timer2 doliczył do zera
{
Timer2 = SZYBKOSC_SCIEMNIACZA;//załaduj Timer2 nową wartością do odliczenia
if(dir)//jeśli zmienna dir rózna od zera
{
i++;//zwiększ wartość zmiennej i
if(i < 101) kanal1 = procent(i);
if(i >= 100) on_off_flag = 0;//jeśli żarówka się rozjaśniła to wyzeruj flagę
}//aby ta część już się nie wykonywała
else
{
i--;//zmiejsz wartość zmiennej i
if(i >= 0) kanal1 = procent(i);
if(i < 0) on_off_flag = 0;
}//jeśli żarówka się ściemniła to wyzeruj flagę
}//aby ta część już się nie wykonywała
}


if(!Timer3)//migająca dioda LED
{//widać czy timery programowe działają
Timer3 = 50;//i czy pętla główna się wykonuje
PORTC ^= (1<<PC5);
}

}
}

void fun1(void)
{//ustaw flagę aby mógła się wykonywać część programu
on_off_flag = 1;//rozjaśniająca i ściemniająca w pętli głównej
dir ^= 1;//rozjaśnianie lub ściemnianie
}

void fun2(void)
{
if(!dir)
{
i++;
if(i < 101) kanal1 = procent(i);
if(i > 100) dir = 1;
}
else
{
i--;
if(i > 20) kanal1 = procent(i);
if(i <= 20) dir = 0;
}
}


ISR(TIMER0_OVF_vect)
{
TCNT0 = 178;

uint16_t n;

n = Timer1;/* 100Hz Timer1 */
if (n) Timer1 = --n;

n = Timer2;/* 100Hz Timer1 */
if (n) Timer2 = --n;

n = Timer3;/* 100Hz Timer1 */
if (n) Timer3 = --n;

}


ISR(INT0_vect) {
TIMER2_STOP;
T_ZAR1_OFF;
//T_ZAR2_OFF;
//T_ZAR3_OFF;

kroki=LICZBA_KROKOW;

/* podwójne buforowanie, synchronizacja do 50Hz */
ika1=kanal1;
//ika2=kanal2;
//ika3=kanal3;

TCNT2 = 0;
TIMER2_START;
}

ISR(TIMER2_COMP_vect) {
if(ika1 && kroki == ika1) T_ZAR1_ON;
//if(ika2 && kroki == ika2) T_ZAR2_ON;
//if(ika3 && kroki == ika3) T_ZAR3_ON;
kroki--;
}

/************** funkcja SuperDebounce do obsługi pojedynczych klawiszy ***************
* AUTOR: Mirosław Kardaś
* ZALETY:
* - nie wprowadza najmniejszego spowalnienia
* - posiada funkcję REPEAT (powtarzanie akcji dla dłużej wciśniętego przycisku)
* - można przydzielić różne akcje dla trybu REPEAT i pojedynczego kliknięcia
* - można przydzielić tylko jedną akcję wtedy w miejsce drugiej przekazujemy 0 (NULL)
*
* Wymagania:
* Timer programowy utworzony w oparciu o Timer sprzętowy (przerwanie 100Hz)
*
* Parametry wejściowe:
* *key_state - wskaźnik na zmienną w pamięci RAM (1 bajt)
* *KPIN - nazwa PINx portu na którym umieszczony jest klawisz, np: PINB
* key_mask - maska klawisza np: (1<<PB3)
* rep_time - czas powtarzania funkcji rep_proc w trybie REPEAT
* rep_wait - czas oczekiwania do przejścia do trybu REPEAT
* push_proc - wskaźnik do własnej funkcji wywoływanej raz po zwolenieniu przycisku
* rep_proc - wskaźnik do własnej funkcji wykonywanej w trybie REPEAT
**************************************************************************************/
void SuperDebounce(uint8_t * key_state, volatile uint8_t *KPIN,
uint8_t key_mask, uint16_t rep_time, uint16_t rep_wait,
void (*push_proc)(void), void (*rep_proc)(void) ) {

/*kod funkcji znajduje się w materiałach dodatkowych do książki
* Mokrokontrolery AVT
*Język C
* Podstawy programowania
*/

}[/syntax]

Kod funkcji SuperDebounce wziąłem z płyty DVD z lekcji 17_SuperDebounce.

W kodzie zakomentowałem nie używane fragmenty. Fragment kodu z Timerem3 i diodą LED nie jest potrzebny. Ale często w swoich projektach tak robię. Jeśli dioda miga to wiem że timery programowe działają a pętla główna nie ma zawiechy.

Kod pisany na szybko i nie jest zoptymalizowany. Chciałem pokazać ideę jak ja bym to mniej więcej zrobił aby wszystko działało w sposób nieblokujący.

Statystyki: Napisane przez jacekk232 — 24 lut 2014, o 22:29

]]> 2014-02-24T21:03:30+01:00 2014-02-24T21:03:30+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=71884#p71884 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]> [syntax=c]#include <avr/io.h>
#include <avr/interrupt.h>
#include <util/delay.h>

#define KEY_PIN (1<<PC3)
#define KEY_DOWN !(PINC & KEY_PIN)



/*********************** D I M M E R - U S T A W I E N I A ***************************/
#define LICZBA_KROKOW 200

// czas trwania szpilki (Detekcja ZERA) wyrażony w milisekundach np: 1,2,... albo np: 0.5
#define SZPILKA_MS 1.6
/*********************** D I M M E R - U S T A W I E N I A ***************************/

#define __OCR_STEP ((F_CPU/8)*((1000-((SZPILKA_MS*100)/2))/LICZBA_KROKOW))/100000

//#define procent(x) ((x*(LICZBA_KROKOW-1))/100)

static uint8_t procent(uint8_t pr) {
return (pr * (LICZBA_KROKOW-1))/100;
}


#define T_ZAR1_ON PORTC |= (1<<PC0)
#define T_ZAR1_OFF PORTC &= ~(1<<PC0)

#define T_ZAR2_ON PORTC |= (1<<PC1)
#define T_ZAR2_OFF PORTC &= ~(1<<PC1)

#define T_ZAR3_ON PORTC |= (1<<PC2)
#define T_ZAR3_OFF PORTC &= ~(1<<PC2)

volatile uint8_t wlacznik = 0;
volatile uint8_t kroki;
volatile uint8_t kanal1;
volatile uint8_t amplituda;
volatile uint8_t ika1;
uint8_t key1_lock, key2_lock;

void wlacz(void) {
wlacznik++;
_delay_ms(200);
if(wlacznik==2) wlacznik=0;
}


void key_press( uint8_t * klock, volatile uint8_t * KPIN, uint8_t key_mask, void (*kfun)(void) ) ;
void key_push_up( uint8_t * klock, volatile uint8_t * KPIN, uint8_t key_mask, void (*kfun)(void) ) ;


int main(void) {


DDRC |= (1<<PC0);
T_ZAR1_OFF;
DDRC |= (1<<PC1);
T_ZAR2_OFF;

DDRC &= ~KEY_PIN;
PORTC |= KEY_PIN;

// Przerwanie INT0
MCUCR |= (1<<ISC01)|(1<<ISC00);// zbocze narastające
GICR |= (1<<INT0);// odblokowanie INT0


// TIMER2
#define TIMER2_START TCCR2 |= (1<<CS21)// prescaler=8
#define TIMER2_STOP TCCR2 &= ~(1<<CS21)// prescaler off
TCCR2 |= (1<<WGM21);// tryb CTC
TIMSK |= (1<<OCIE2);// odblokowanie przerwania COMPARE MATCH
OCR2 = __OCR_STEP;


sei();



#define SZYBKOSC_SCIEMNIACZA 25
volatile uint8_t i,k;


while(1) {

key_press( &key1_lock, &PINC, KEY1, change_led1 );

key_push_up( &key2_lock, &PINC, KEY2, change_led2 );


if(KEY_DOWN){
_delay_ms(80);
if(KEY_DOWN) {
wlacznik++;
_delay_ms(200);
if(wlacznik==2) wlacznik=0;
}
}


if(wlacznik==1){
PORTC |= (1<<PC1);
if(i<100){
for( i=0; i<102; i++ ) {
kanal1 = procent(i);
_delay_ms(SZYBKOSC_SCIEMNIACZA);
}
}

}


if(wlacznik==0){
PORTC &= ~(1<<PC1);
if(i>100){
for( k=0, i=101; k<101; k++,i-- ) {
kanal1 = procent(i);
_delay_ms(SZYBKOSC_SCIEMNIACZA);
}
}
}





} //end while(1)
} //end int main(void)


ISR(INT0_vect) {
TIMER2_STOP;
T_ZAR1_OFF;

kroki=LICZBA_KROKOW;

/* podwójne buforowanie, synchronizacja do 50Hz */
ika1=kanal1;

TCNT2 = 0;
TIMER2_START;
}

ISR(TIMER2_COMP_vect) {

if(ika1 && kroki == ika1) T_ZAR1_ON;
kroki--;

}
//..............................................................................Funkcje
void key_press(uint8_t * klock, volatile uint8_t * KPIN, uint8_t key_mask, void (*kfun)(void) ) {

register uint8_t key_press = (*KPIN & key_mask);

if( !*klock && !key_press ) {
*klock=1;

// reakcja na PRESS (wcinięcie przycisku)
if(kfun) kfun();

} else if( *klock && key_press ) (*klock)++;
}



void key_push_up(uint8_t * klock, volatile uint8_t * KPIN, uint8_t key_mask, void (*kfun)(void) ) {

register uint8_t key_press = (*KPIN & key_mask);

if( !*klock && !key_press ) *klock=1;
else if( *klock && key_press ) {
if( !++*klock ) {

// reakcja na PUSH_UP (zwolnienie przycisku)
if(kfun) kfun();
}
}
}[/syntax]

Statystyki: Napisane przez llemar — 24 lut 2014, o 21:03

]]> 2014-02-22T00:27:37+01:00 2014-02-22T00:27:37+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=71476#p71476 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]> aż mi się w głowie gotuje... W języku drabinkowym na PLC nie miałbym z tym problemów, ale w C jestem bardzo początkującym :)

Statystyki: Napisane przez llemar — 22 lut 2014, o 00:27

]]> 2014-02-22T00:12:52+01:00 2014-02-22T00:12:52+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=71472#p71472 <![CDATA[Re: Regulacja mocy 230V - przykład 18]]>
W funkcji krótkiego wciśnięcia zmieniał bym stan jakiejś flagi a w pętli głównej w zależności od stanu tej flagi rozjaśniał lub ściemniał żarówkę. Rozjaśnianie i ściemnianie zrobiłbym na timerach programowych a nie na pętlach for po to żeby pętla główna wykonywała się z jak największa szybkością.

Natomiast naprzemienne rozjaśnianie i ściemnianie zrobiłbym w funkcji Repeat wywoływanej po wciśnięciu i przytrzymaniu przycisku.
Trzymając wciśnięty klawisz co określony czas zostaje wywoływana funkcja rep_proc(). W tej funkcji, co każde jej wywołanie, zmieniałbym poziom jasności. Rozjaśnianie i ściemnianie byłoby zależne od stanu zmiennej flagi. Stan flagi zmieniałby się po rozjaśnieniu i po ściemnieniu żarówki. W ten sposób żarówka wciąż by się rozjaśniała i ściemniała.
Szybkość zmian byłaby zależna od parametru rep_time, który ustala częstotliwość wywoływania funkcji rep_proc().

To tak w skrócie.

Statystyki: Napisane przez jacekk232 — 22 lut 2014, o 00:12

]]> 2014-02-21T20:07:12+01:00 2014-02-21T20:07:12+01:00 https://forum.atnel.pl/viewtopic.php?t=6099&p=71426#p71426 <![CDATA[Regulacja mocy 230V - przykład 18]]> Panowie jak przerobić ten kod aby po przyciśnięciu przycisku światło powoli się zapaliło, a po przyciśnięciu kolejny raz tego samego przycisku powoli zgasło. A gdy podczas gdy jest światło włączone przyciśniemy jeszcze raz przycisk na dłużej niż jedną sekundę, wówczas światło zacznie się ściemniać (sciemnianie do 20% nie mniej) i rozjaśniać na przemian aż nie zwolnimy przycisku tym samym ustalając wartość natężenia światła. Układ na atmega8 8MHz, 8 kanałów, ale na razie kombinuję na jednym :)
[syntax=c]#include <avr/io.h>
#include <avr/interrupt.h>
#include <util/delay.h>

#define KEY_PIN (1<<PC3)
#define KEY_DOWN !(PINC & KEY_PIN)


/*********************** D I M M E R - U S T A W I E N I A ***************************/
#define LICZBA_KROKOW 200

// czas trwania szpilki (Detekcja ZERA) wyrażony w milisekundach np: 1,2,... albo np: 0.5
#define SZPILKA_MS 1.6
/*********************** D I M M E R - U S T A W I E N I A ***************************/

#define __OCR_STEP ((F_CPU/8)*((1000-((SZPILKA_MS*100)/2))/LICZBA_KROKOW))/100000

//#define procent(x) ((x*(LICZBA_KROKOW-1))/100)

static uint8_t procent(uint8_t pr) {
return (pr * (LICZBA_KROKOW-1))/100;
}


#define T_ZAR1_ON PORTC |= (1<<PC0)
#define T_ZAR1_OFF PORTC &= ~(1<<PC0)

#define T_ZAR2_ON PORTC |= (1<<PC1)
#define T_ZAR2_OFF PORTC &= ~(1<<PC1)

#define T_ZAR3_ON PORTC |= (1<<PC2)
#define T_ZAR3_OFF PORTC &= ~(1<<PC2)

volatile uint8_t wlacznik = 0;

volatile uint8_t kroki;
volatile uint8_t kanal1;

volatile uint8_t ika1;



int main(void) {


DDRC |= (1<<PC0);
T_ZAR1_OFF;
DDRC |= (1<<PC1);
T_ZAR2_OFF;

DDRC &= ~KEY_PIN;
PORTC |= KEY_PIN;

// Przerwanie INT0
MCUCR |= (1<<ISC01)|(1<<ISC00);// zbocze narastające
GICR |= (1<<INT0);// odblokowanie INT0


// TIMER2
#define TIMER2_START TCCR2 |= (1<<CS21)// prescaler=8
#define TIMER2_STOP TCCR2 &= ~(1<<CS21)// prescaler off
TCCR2 |= (1<<WGM21);// tryb CTC
TIMSK |= (1<<OCIE2);// odblokowanie przerwania COMPARE MATCH
OCR2 = __OCR_STEP;


sei();

//kanal1 = procent(10);
//_delay_ms(3000);


#define SZYBKOSC_SCIEMNIACZA 25
volatile uint8_t i,k;


while(1) {

if(KEY_DOWN){
_delay_ms(80);
if(KEY_DOWN) {
wlacznik++;
_delay_ms(200);
if(wlacznik==2) wlacznik=0;
}
}


if(wlacznik==1){
PORTC |= (1<<PC1);
if(i<100){
for( i=0; i<102; i++ ) {
kanal1 = procent(i);
_delay_ms(SZYBKOSC_SCIEMNIACZA);
}
}

}


if(wlacznik==0){
PORTC &= ~(1<<PC1);
if(i>100){
for( k=0, i=101; k<101; k++,i-- ) {
kanal1 = procent(i);
_delay_ms(SZYBKOSC_SCIEMNIACZA);
}
}
}





} //end while(1)
} //end int main(void)


ISR(INT0_vect) {
TIMER2_STOP;
T_ZAR1_OFF;

kroki=LICZBA_KROKOW;

/* podwójne buforowanie, synchronizacja do 50Hz */
ika1=kanal1;

TCNT2 = 0;
TIMER2_START;
}

ISR(TIMER2_COMP_vect) {

if(ika1 && kroki == ika1) T_ZAR1_ON;
kroki--;

}[/syntax]

Statystyki: Napisane przez llemar — 21 lut 2014, o 20:07

]]>