ATNEL tech-forum 2014-04-27T08:43:32+01:00 https://forum.atnel.pl/feed.php?f=4&t=6537&mode 2014-04-26T22:38:01+01:00 2014-04-26T22:38:01+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=79372#p79372 <![CDATA[Re: atmega8 pwm]]>
Nie mogło być inaczej wszysto działa jak należy. Jeszcze raz dziękuję, chyba się skuszę na zakup książki pana Mirka.

Statystyki: Napisane przez piotrekwoj1 — 26 kwi 2014, o 22:38

]]> 2014-04-26T19:35:52+01:00 2014-04-26T19:35:52+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=79293#p79293 <![CDATA[Re: atmega8 pwm]]> [syntax=c]if (!(Pp&Ps)) p=p| 0x10;
//{ p=(p&(~0x01)); if(p&0x10){p=(p&(~0x10));}else{p=(p|0x10);}
//}
else if (!(Pp&Pfw) && (p&0x02))//-----------------------------tutaj wskazuje błąd[/syntax]

Statystyki: Napisane przez Krauser — 26 kwi 2014, o 19:35

]]> 2014-04-27T08:43:32+01:00 2014-04-25T20:08:49+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=79161#p79161 <![CDATA[Re: atmega8 pwm]]>




[syntax=c]#include <string.h>
#include <stdlib.h>
#include <util/delay.h>
#include <avr/interrupt.h>
#include <avr/io.h>


#define E_p 2
#define E_pr PORTD
#define RW_p 1
#define RW_pr PORTD
#define RS_p 0
#define RS_pr PORTD

#define D7 7
#define D6 6
#define D5 5
#define D4 4
#define D_pr PORTD

#define SET_PIN(a,b) a=a |(1<<b)
#define UNSET_PIN(a,b) a=a & ~(1<<b)

void send8(int data, int rs)
{
if(rs == 1)
{SET_PIN(RS_pr,RS_p);}
else
{UNSET_PIN(RS_pr,RS_p);}

if(data&0x10){SET_PIN(D_pr,D4);}else{UNSET_PIN(D_pr,D4);}
if(data&0x20){SET_PIN(D_pr,D5);}else{UNSET_PIN(D_pr,D5);}
if(data&0x40){SET_PIN(D_pr,D6);}else{UNSET_PIN(D_pr,D6);}
if(data&0x80){SET_PIN(D_pr,D7);}else{UNSET_PIN(D_pr,D7);}
UNSET_PIN(E_pr,E_p);_delay_ms(1);
SET_PIN(E_pr,E_p);_delay_ms(1);
UNSET_PIN(E_pr,E_p);_delay_ms(2);

if(data&0x01){SET_PIN(D_pr,D4);}else{UNSET_PIN(D_pr,D4);}
if(data&0x02){SET_PIN(D_pr,D5);}else{UNSET_PIN(D_pr,D5);}
if(data&0x04){SET_PIN(D_pr,D6);}else{UNSET_PIN(D_pr,D6);}
if(data&0x08){SET_PIN(D_pr,D7);}else{UNSET_PIN(D_pr,D7);}
UNSET_PIN(E_pr,E_p);_delay_ms(1);
SET_PIN(E_pr,E_p);_delay_ms(1);
UNSET_PIN(E_pr,E_p);_delay_ms(2);
}

void send4(int data, int rs)
{
if(rs == 1)
{SET_PIN(RS_pr,RS_p);}
else
{UNSET_PIN(RS_pr,RS_p);}

if(data&0x01){SET_PIN(D_pr,D4);}else{UNSET_PIN(D_pr,D4);}
if(data&0x02){SET_PIN(D_pr,D5);}else{UNSET_PIN(D_pr,D5);}
if(data&0x04){SET_PIN(D_pr,D6);}else{UNSET_PIN(D_pr,D6);}
if(data&0x08){SET_PIN(D_pr,D7);}else{UNSET_PIN(D_pr,D7);}
UNSET_PIN(E_pr,E_p);_delay_ms(1);
SET_PIN(E_pr,E_p); _delay_ms(1);
UNSET_PIN(E_pr,E_p);_delay_ms(1);
}

void lcd_init()
{
UNSET_PIN(RW_pr,RW_p);
_delay_ms(55);

send4(0x03,0);
_delay_ms(25);
send4(0x03,0);
_delay_ms(5);
send4(0x03,0);
_delay_ms(5);

send4(0x02,0);
_delay_ms(5);

send8(0x28,0);

send8(0x08,0);//
//send8(0x0C,0);//lub 0F (widac wtedy kursor)
send8(0x01,0);
send8(0x06,0);

send8(0x0C,0);//lub 0F (widac wtedy kursor)//

send8(0x80,0);
}

void wyswietl(char *txt, int q)
{
if(q==1){send8(0x80,0);}else{}
if(q==2){send8(0xc0,0);}else{}
int dl_slowa = strlen(txt);
for(int i=0; i<dl_slowa; i++){send8(txt[i],1);}
for(int i=dl_slowa; i<16; i++){send8(0x20,1);}

}

void adc_init(void)
{

//wybaranie wyejscia ADC0
SET_PIN(ADMUX,MUX0);
UNSET_PIN(ADMUX,MUX1);
SET_PIN(ADMUX,MUX2);
UNSET_PIN(ADMUX,MUX3);
//UNSET_PIN(ADMUX,MUX4);
// Wybranie wewnętrznego żródła napięcia odniesienia
SET_PIN(ADMUX,REFS0);
SET_PIN(ADMUX,REFS1);

//Wybranie sposobu zapisu wyniku z wyrównaniem do lewej (osiem starszych bitów wyniku w rejestrze ADCH)
SET_PIN(ADMUX,ADLAR);

// Zezwolenie na konwersję
//ADCSRA |= _BV(ADEN);
SET_PIN(ADCSRA,ADEN);

// Wybranie częstotliwości dla taktowania przetwornika (1/128 częstotliwosci zegara kontrolera- wew 8Mhz)
SET_PIN(ADCSRA,ADPS0);
SET_PIN(ADCSRA,ADPS1);
SET_PIN(ADCSRA,ADPS2);

}

//SIGNAL(TIMER1_CAPT_vect){} //przerwanie zewnętrzne i przechwycenei licznika
//SIGNAL(TIMER1_OVF_vect){} //przerwanie przepełnieniem licznika
//SIGNAL(TIMER1_COMPA_vect){} //przerwanie od poównania licznika z wartością A
//SIGNAL(TIMER1_COMPB_vect){} //przerwanie od poównania licznika z wartością B


SIGNAL(TIMER1_COMPA_vect)
{
SET_PIN(PORTB,PB0);
_delay_us(80);
UNSET_PIN(PORTB,PB0);
}

/*
SIGNAL(TIMER1_CAPT_vect)
{
SET_PIN(PORTB,PB0);
_delay_us(7);
UNSET_PIN(PORTB,PB0);
}
*/
#define Ps 0x10
#define Pu 0x02
#define Pd 0x08
#define Pfw 0x01
#define Pp PINC

int main(void)
{
char pom;
long pomiar;
long temp;
char f=50; //f= 1-100Hz
char w=01; //w= 1-99%
char licz=0;

char buffor_w1[16]="1234567890123456";
char buffor_w2[16]="1234567890123456";
char string[5]="12345";

char p=0x0f;//PRZYCISKI
//p&0x01 - obsługa przycisk START
//p&0x02 - obsługa przycisk F/W
//p&0x04 - obsługa przycisk +
//p&0x08 - obsługa przycisk -
//p&0x10 - bit START
//p&0x20 - bit wyboru 1=> zmiana F; 0=> zmiana W

//ICP1 - PB0
//OC1A - PB1

DDRB = 0xff; //wyjścia od generatora
PORTB = 0x0C;

DDRD = 0xff; //LCD - cały port jako wyjścia
PORTD = 0x00; //stan wyjść niski

DDRC = 0x00; //wejścia od przycisków i pomiaru napięcia
PORTC = 0x1f; //stan wysoki wejść


lcd_init();
adc_init();
wyswietl(" GENERATOR ",1);
wyswietl(" SYGNALU PWM ",2);
_delay_ms(2000);


TCNT1=0;//zerowanie licznika czasu

UNSET_PIN(TCCR1A,COM1A0);
SET_PIN(TCCR1A,COM1A1);//dla porownania timer1 i ICR1 zmiana stanu wyjścia OC1A na niski
UNSET_PIN(TCCR1A,COM1B0);
UNSET_PIN(TCCR1A,COM1B1);
UNSET_PIN(TCCR1A,FOC1A);
UNSET_PIN(TCCR1A,FOC1B);

//FAST PWM - licznik TCNT1 liczy aż do wartości ICR1 i wtedy zeruje i liczy od początku;
//jeśli przy odliczaniu TCNT1 dojdzie do OCR1A to ustawia wyjście OC1A
//w momencie resetu TCNT1 zeruje wyjście OC1A
UNSET_PIN(TCCR1A,WGM10);
SET_PIN(TCCR1A,WGM11);

SET_PIN(TCCR1B,WGM12);
SET_PIN(TCCR1B,WGM13);

UNSET_PIN(TCCR1B,ICNC1);//wyłączone filtrowanie sygnału sterującego ICP
UNSET_PIN(TCCR1B,ICES1);//"0" - reakcja na opadające zbocze na ICP, "1" - reakcja na narastające zbocze na ICP

ICR1 = 625; //pełny okres generowanego przebiegu
OCR1A = 312; //ustawienie wartości dla rejestru porównującego /312,5(100Hz)-31250(1Hz)
OCR1B = 0; //ustawienie wartości dla rejestru porównującego -NIEWYKORZYSTYWANY

//MASKWOANIE PRZERWAŃ
UNSET_PIN(TIMSK,TICIE1);//włączenie przerwania od przechwycenia z timer1 LUB dojścia timer1 do top (ICR1)**************
UNSET_PIN(TIMSK,TOIE1);//wyłączenie przerwania od przepełnienia timera1
UNSET_PIN(TIMSK,OCIE1B);//wyłączenie przerwania od wyrównania wartości tmiera1 (TCNT1) i OCR1B
SET_PIN(TIMSK,OCIE1A);//wyłączenie przerwania od wyrównania wartości tmiera1 (TCNT1) i OCR1A*************

UNSET_PIN(TIMSK,OCIE2);//wyłączenie zbędnych przerwań
UNSET_PIN(TIMSK,TOIE2);
//UNSET_PIN(TIMSK,OCIE0);
UNSET_PIN(TIMSK,TOIE0);

//CS12=0; CS11=0; CS10=0 - brak sygnalu zegarowego - licznik jest zatrzymany
//CS12=0; CS11=0; CS10=1 - clk - pełna prędkość bez presklaera
//CS12=0; CS11=1; CS10=0 - clk/8 - z preskalerem
//CS12=0; CS11=1; CS10=1 - clk/64 - z preskalerem
//CS12=1; CS11=0; CS10=0 - clk/256 - z preskalerem
//CS12=1; CS11=0; CS10=1 - clk/1024 - z preskalerem
//CS12=1; CS11=1; CS10=0 - zewnętrzny syg. zegarowy na T1 - takt przy zboczu opadającym
//CS12=1; CS11=1; CS10=1 - zewnętrzny syg. zegarowy na T1 - takt przy zboczu narastającym

//SET_PIN(TCCR1B,CS10);//preskaler clk=4MHz/64=62500Hz - okres 16us
//SET_PIN(TCCR1B,CS11);
//UNSET_PIN(TCCR1B,CS12);


UNSET_PIN(TCCR1B,CS10);//wyłączenie zegara
UNSET_PIN(TCCR1B,CS11);
UNSET_PIN(TCCR1B,CS12);
SET_PIN(PORTB,PB2); //ustawienie 5V;

//sei(); //włącz przerwania
cli();

while(1)
{

//if(PORTB&PB0 && TCNT1>2){UNSET_PIN(PORTB,PB0);}else{;}



if(!(Pp&Ps)) p=p| 0x10;
{p=(p&(~0x01)); if(p&0x10){p=(p&(~0x10));}else{p=(p|0x10);}
}

}
else if(!(Pp&Pu) && (p&0x04))
{p=(p&(~0x04));
if(p&0x20){if(f<100){f++;}else{;}}
else{if(w<99){w++;}else{;}}
temp=f;
temp=62500/f;
ICR1=temp;
//temp=(temp*w)/100;
temp=(temp*(100-w))/100;
OCR1A=ICR1-temp;
}
else if(!(Pp&Pd) && (p&0x08))
{p=(p&(~0x08));
if(p&0x20){if(f>1){f--;}else{;}}
else{if(w>1){w--;}else{;}}
temp=f;
temp=62500/f;
ICR1=temp;
//temp=(temp*w)/100;
temp=(temp*(100-w))/100;
OCR1A=ICR1-temp;
}
else{;}

if(!(Pp&Pu) && !(p&0x04))
{
licz++;
if(licz<6){licz++;}
else
{
if(p&0x20){if(f<100){f++;}else{;}}
else{if(w<99){w++;}else{;}}
temp=f;
temp=62500/f;
ICR1=temp;
//temp=(temp*w)/100;
temp=(temp*(100-w))/100;
OCR1A=ICR1-temp;
}
}
else{;}

if(!(Pp&Pd) && !(p&0x08))
{
licz++;
if(licz<6){licz++;}
else
{
if(p&0x20){if(f>1){f--;}else{;}}
else{if(w>1){w--;}else{;}}
temp=f;
temp=62500/f;
ICR1=temp;
//temp=(temp*w)/100;
temp=(temp*(100-w))/100;
OCR1A=ICR1-temp;
}
}
else{;}



if(Pp&Ps) p=p&(~0x10);
else if((Pp&Pfw)&& !(p&0x02)){p=(p|0x02); }
else if((Pp&Pu) && !(p&0x04)){p=(p|0x04); licz=0;}
else if((Pp&Pd) && !(p&0x08)){p=(p|0x08); licz=0;}
else{;}


if(p&0x10 && (PORTB&0x04))
{
SET_PIN(TCCR1B,CS10);//preskaler clk=4MHz/64=62500Hz - okres 16us
SET_PIN(TCCR1B,CS11);

}
else if (!(p&0x10) && !(PORTB&0x04))
{
cli();
UNSET_PIN(TCCR1B,CS10);//wyłączenie zegara

}
else{;}


ADCSRA |= _BV(ADSC); // Rozpoczęcie przetwarzania
while(bit_is_set(ADCSRA,ADSC))// Oczekiwanie na zakończenie przetwarzania
{};
pom = ADCH;
pomiar=pom;
pomiar = (pomiar*512)/51;
pomiar = pomiar*21; //- konwersja do dzielnika ze schematu przy potencjometrze ok5k wskazuje poprawny wynik
if (pomiar<10000)
{strcpy(buffor_w2,"U= ");}
else
{strcpy(buffor_w2,"U=");}
ltoa(pomiar/1000,string,10);
strcat(buffor_w2,string);
strcat(buffor_w2,".");
ltoa((pomiar%1000)/100,string,10);
strcat(buffor_w2,string);
if(p&0x20){strcat(buffor_w2," zm.F");}else{strcat(buffor_w2," zm.W");}
if(p&0x10){strcat(buffor_w2," Wla");}else{strcat(buffor_w2," Wyl");}

//itoa(pom,string,10);
//strcat(buffor_w2,string);

strcpy(buffor_w1,"F=");
if(f<100){strcat(buffor_w1," ");}else{;}
if(f<10){strcat(buffor_w1," ");}else{;}
ltoa(f,string,10);
strcat(buffor_w1,string);
strcat(buffor_w1,"Hz ");

strcat(buffor_w1,"W=");
if(w<10){strcat(buffor_w1," ");}else{;}
ltoa(w,string,10);
//if((100-w)<10){strcat(buffor_w1," ");}else{;}
//ltoa((100-w),string,10);
strcat(buffor_w1,string);
strcat(buffor_w1,"% ");


wyswietl(buffor_w1,1);
wyswietl(buffor_w2,2);


}


}[/syntax]

Statystyki: Napisane przez piotrekwoj1 — 25 kwi 2014, o 20:08

]]> 2014-04-25T17:58:39+01:00 2014-04-25T17:58:39+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=79154#p79154 <![CDATA[Re: atmega8 pwm]]> Przy okazji zobaczyłem swój błąd :oops: . W drugim przypadku zamiast:
[syntax=c]if (!(Pp&Ps)) p=p&(~0x10);[/syntax]
ma być:
[syntax=c]if (Pp&Ps) p=p&(~0x10);[/syntax]

Statystyki: Napisane przez Krauser — 25 kwi 2014, o 17:58

]]> 2014-04-25T14:19:48+01:00 2014-04-25T14:19:48+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=79134#p79134 <![CDATA[Re: atmega8 pwm]]> z tego co tam jest to wygląda jakby brakowało gdzieś "{"

Statystyki: Napisane przez karolek — 25 kwi 2014, o 14:19

]]> 2014-04-25T13:48:17+01:00 2014-04-25T13:48:17+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=79133#p79133 <![CDATA[Re: atmega8 pwm]]> Obrazek

Statystyki: Napisane przez piotrekwoj1 — 25 kwi 2014, o 13:48

]]> 2014-04-24T17:43:19+01:00 2014-04-24T17:43:19+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=79074#p79074 <![CDATA[Re: atmega8 pwm]]> Statystyki: Napisane przez piotrekwoj1 — 24 kwi 2014, o 17:43

]]> 2014-04-23T20:38:13+01:00 2014-04-23T20:38:13+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=78990#p78990 <![CDATA[Re: atmega8 pwm]]> [syntax=c]if (!(Pp&Ps) && (p&0x01))
{ p=(p&(~0x01)); if(p&0x10){p=(p&(~0x10));}else{p=(p|0x10);}
}[/syntax]
na
[syntax=c]if (!(Pp&Ps)) p=p|0x10;[/syntax]
oraz
[syntax=c]if((Pp&Ps) && !(p&0x01)){p=(p|0x01); }[/syntax]
na
[syntax=c]if (!(Pp&Ps)) p=p&(~0x10);[/syntax]

Statystyki: Napisane przez Krauser — 23 kwi 2014, o 20:38

]]> 2014-04-22T11:28:47+01:00 2014-04-22T11:28:47+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=78848#p78848 <![CDATA[Re: atmega8 pwm]]> Statystyki: Napisane przez piotrekwoj1 — 22 kwi 2014, o 11:28

]]> 2014-04-21T22:23:20+01:00 2014-04-21T22:23:20+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=78816#p78816 <![CDATA[Re: atmega8 pwm]]>
Krauser napisał(a):

A do którego pinu masz wpięty ten przycisk

...ze "słownego" schematu wynika, że PC4.

Pozdr.

Statystyki: Napisane przez kicajek — 21 kwi 2014, o 22:23

]]> 2014-04-21T21:28:45+01:00 2014-04-21T21:28:45+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=78813#p78813 <![CDATA[Re: atmega8 pwm]]> Statystyki: Napisane przez Krauser — 21 kwi 2014, o 21:28

]]> 2014-04-21T10:01:49+01:00 2014-04-21T10:01:49+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=78782#p78782 <![CDATA[Re: atmega8 pwm]]> Statystyki: Napisane przez piotrekwoj1 — 21 kwi 2014, o 10:01

]]> 2014-04-10T08:07:41+01:00 2014-04-10T08:07:41+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=77520#p77520 <![CDATA[Re: atmega8 pwm]]> Wszystko ok właśnie o to mi kolego chodziło, jeszcze raz dziękuję i pozdrawiam.

Statystyki: Napisane przez piotrekwoj1 — 10 kwi 2014, o 08:07

]]> 2014-04-01T20:33:18+01:00 2014-04-01T20:33:18+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=76658#p76658 <![CDATA[Re: atmega8 pwm]]> [syntax=c]SIGNAL(TIMER1_COMPA_vect)
{
SET_PIN(PORTB,PB0);
_delay_us(7); //-------------------do zmiany
UNSET_PIN(PORTB,PB0);
}[/syntax]

Statystyki: Napisane przez Krauser — 1 kwi 2014, o 20:33

]]> 2014-03-30T12:32:57+01:00 2014-03-30T12:32:57+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=76356#p76356 <![CDATA[Re: atmega8 pwm]]> Statystyki: Napisane przez piotrekwoj1 — 30 mar 2014, o 12:32

]]> 2014-03-28T11:30:56+01:00 2014-03-28T11:30:56+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=76140#p76140 <![CDATA[Re: atmega8 pwm]]> Statystyki: Napisane przez piotrekwoj1 — 28 mar 2014, o 11:30

]]> 2014-03-28T10:24:30+01:00 2014-03-28T10:24:30+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=76127#p76127 <![CDATA[Re: atmega8 pwm]]>
Po drugie na tym forum staramy się używać przyjaznych przesunięć bitowych aby łatwo było odczytać wartości pinów natomiast u ciebie wszystko hexem

Statystyki: Napisane przez Wilu88 — 28 mar 2014, o 10:24

]]> 2014-04-27T08:42:26+01:00 2014-03-28T10:08:20+01:00 https://forum.atnel.pl/viewtopic.php?t=6537&p=76126#p76126 <![CDATA[atmega8 pwm]]> oto kod programu

[syntax=c]#include <string.h>
#include <stdlib.h>
#include <util/delay.h>
#include <avr/interrupt.h>
#include <avr/io.h>


#define E_p 2
#define E_pr PORTD
#define RW_p 1
#define RW_pr PORTD
#define RS_p 0
#define RS_pr PORTD

#define D7 7
#define D6 6
#define D5 5
#define D4 4
#define D_pr PORTD

#define SET_PIN(a,b) a=a |(1<<b)
#define UNSET_PIN(a,b) a=a & ~(1<<b)

void send8(int data, int rs)
{
if(rs == 1)
{SET_PIN(RS_pr,RS_p);}
else
{UNSET_PIN(RS_pr,RS_p);}

if(data&0x10){SET_PIN(D_pr,D4);}else{UNSET_PIN(D_pr,D4);}
if(data&0x20){SET_PIN(D_pr,D5);}else{UNSET_PIN(D_pr,D5);}
if(data&0x40){SET_PIN(D_pr,D6);}else{UNSET_PIN(D_pr,D6);}
if(data&0x80){SET_PIN(D_pr,D7);}else{UNSET_PIN(D_pr,D7);}
UNSET_PIN(E_pr,E_p);_delay_ms(1);
SET_PIN(E_pr,E_p);_delay_ms(1);
UNSET_PIN(E_pr,E_p);_delay_ms(2);

if(data&0x01){SET_PIN(D_pr,D4);}else{UNSET_PIN(D_pr,D4);}
if(data&0x02){SET_PIN(D_pr,D5);}else{UNSET_PIN(D_pr,D5);}
if(data&0x04){SET_PIN(D_pr,D6);}else{UNSET_PIN(D_pr,D6);}
if(data&0x08){SET_PIN(D_pr,D7);}else{UNSET_PIN(D_pr,D7);}
UNSET_PIN(E_pr,E_p);_delay_ms(1);
SET_PIN(E_pr,E_p);_delay_ms(1);
UNSET_PIN(E_pr,E_p);_delay_ms(2);
}

void send4(int data, int rs)
{
if(rs == 1)
{SET_PIN(RS_pr,RS_p);}
else
{UNSET_PIN(RS_pr,RS_p);}

if(data&0x01){SET_PIN(D_pr,D4);}else{UNSET_PIN(D_pr,D4);}
if(data&0x02){SET_PIN(D_pr,D5);}else{UNSET_PIN(D_pr,D5);}
if(data&0x04){SET_PIN(D_pr,D6);}else{UNSET_PIN(D_pr,D6);}
if(data&0x08){SET_PIN(D_pr,D7);}else{UNSET_PIN(D_pr,D7);}
UNSET_PIN(E_pr,E_p);_delay_ms(1);
SET_PIN(E_pr,E_p); _delay_ms(1);
UNSET_PIN(E_pr,E_p);_delay_ms(1);
}

void lcd_init()
{
UNSET_PIN(RW_pr,RW_p);
_delay_ms(55);

send4(0x03,0);
_delay_ms(25);
send4(0x03,0);
_delay_ms(5);
send4(0x03,0);
_delay_ms(5);

send4(0x02,0);
_delay_ms(5);

send8(0x28,0);

send8(0x08,0);//
//send8(0x0C,0);//lub 0F (widac wtedy kursor)
send8(0x01,0);
send8(0x06,0);

send8(0x0C,0);//lub 0F (widac wtedy kursor)//

send8(0x80,0);
}

void wyswietl(char *txt, int q)
{
if(q==1){send8(0x80,0);}else{}
if(q==2){send8(0xc0,0);}else{}


}

void adc_init(void)
{

//wybaranie wyejscia ADC0
SET_PIN(ADMUX,MUX0);
UNSET_PIN(ADMUX,MUX1);
SET_PIN(ADMUX,MUX2);
UNSET_PIN(ADMUX,MUX3);
//UNSET_PIN(ADMUX,MUX4);
// Wybranie wewnętrznego żródła napięcia odniesienia
SET_PIN(ADMUX,REFS0);
SET_PIN(ADMUX,REFS1);

//Wybranie sposobu zapisu wyniku z wyrównaniem do lewej (osiem starszych bitów wyniku w rejestrze ADCH)
SET_PIN(ADMUX,ADLAR);

// Zezwolenie na konwersję
//ADCSRA |= _BV(ADEN);
SET_PIN(ADCSRA,ADEN);

// Wybranie częstotliwości dla taktowania przetwornika (1/128 częstotliwosci zegara kontrolera- wew 8Mhz)
SET_PIN(ADCSRA,ADPS0);
SET_PIN(ADCSRA,ADPS1);
SET_PIN(ADCSRA,ADPS2);

}

//SIGNAL(TIMER1_CAPT_vect){} //przerwanie zewnętrzne i przechwycenei licznika
//SIGNAL(TIMER1_OVF_vect){} //przerwanie przepełnieniem licznika
//SIGNAL(TIMER1_COMPA_vect){} //przerwanie od poównania licznika z wartością A
//SIGNAL(TIMER1_COMPB_vect){} //przerwanie od poównania licznika z wartością B


SIGNAL(TIMER1_COMPA_vect)
{
SET_PIN(PORTB,PB0);
_delay_us(7);
UNSET_PIN(PORTB,PB0);
}

/*
SIGNAL(TIMER1_CAPT_vect)
{
SET_PIN(PORTB,PB0);
_delay_us(7);
UNSET_PIN(PORTB,PB0);
}
*/
#define Ps 0x10
#define Pu 0x02
#define Pd 0x08
#define Pfw 0x01
#define Pp PINC

int main(void)
{
char pom;
long pomiar;
long temp;
char f=100; //f= 1-100Hz
char w=50; //w= 1-99%
char licz=0;

char buffor_w1[16]="1234567890123456";
char buffor_w2[16]="1234567890123456";
char string[5]="12345";

char p=0x0f;//PRZYCISKI
//p&0x01 - obsługa przycisk START
//p&0x02 - obsługa przycisk F/W
//p&0x04 - obsługa przycisk +
//p&0x08 - obsługa przycisk -
//p&0x10 - bit START
//p&0x20 - bit wyboru 1=> zmiana F; 0=> zmiana W

//ICP1 - PB0
//OC1A - PB1

DDRB = 0xff; //wyjścia od generatora
PORTB = 0x0C;

DDRD = 0xff; //LCD - cały port jako wyjścia
PORTD = 0x00; //stan wyjść niski

DDRC = 0x00; //wejścia od przycisków i pomiaru napięcia
PORTC = 0x1f; //stan wysoki wejść


lcd_init();
adc_init();
wyswietl(" GENERATOR ",1);
wyswietl(" SYGNALU PWM ",2);
_delay_ms(100);_delay_ms(100);_delay_ms(100);


TCNT1=0;//zerowanie licznika czasu

UNSET_PIN(TCCR1A,COM1A0);
SET_PIN(TCCR1A,COM1A1);//dla porownania timer1 i ICR1 zmiana stanu wyjścia OC1A na niski
UNSET_PIN(TCCR1A,COM1B0);
UNSET_PIN(TCCR1A,COM1B1);
UNSET_PIN(TCCR1A,FOC1A);
UNSET_PIN(TCCR1A,FOC1B);

//FAST PWM - licznik TCNT1 liczy aż do wartości ICR1 i wtedy zeruje i liczy od początku;
//jeśli przy odliczaniu TCNT1 dojdzie do OCR1A to ustawia wyjście OC1A
//w momencie resetu TCNT1 zeruje wyjście OC1A
UNSET_PIN(TCCR1A,WGM10);
SET_PIN(TCCR1A,WGM11);

SET_PIN(TCCR1B,WGM12);
SET_PIN(TCCR1B,WGM13);

UNSET_PIN(TCCR1B,ICNC1);//wyłączone filtrowanie sygnału sterującego ICP
UNSET_PIN(TCCR1B,ICES1);//"0" - reakcja na opadające zbocze na ICP, "1" - reakcja na narastające zbocze na ICP

ICR1 = 625; //pełny okres generowanego przebiegu
OCR1A = 312; //ustawienie wartości dla rejestru porównującego /312,5(100Hz)-31250(1Hz)
OCR1B = 0; //ustawienie wartości dla rejestru porównującego -NIEWYKORZYSTYWANY

//MASKWOANIE PRZERWAŃ
UNSET_PIN(TIMSK,TICIE1);//włączenie przerwania od przechwycenia z timer1 LUB dojścia timer1 do top (ICR1)**************
UNSET_PIN(TIMSK,TOIE1);//wyłączenie przerwania od przepełnienia timera1
UNSET_PIN(TIMSK,OCIE1B);//wyłączenie przerwania od wyrównania wartości tmiera1 (TCNT1) i OCR1B
SET_PIN(TIMSK,OCIE1A);//wyłączenie przerwania od wyrównania wartości tmiera1 (TCNT1) i OCR1A*************

UNSET_PIN(TIMSK,OCIE2);//wyłączenie zbędnych przerwań
UNSET_PIN(TIMSK,TOIE2);
//UNSET_PIN(TIMSK,OCIE0);
UNSET_PIN(TIMSK,TOIE0);

//CS12=0; CS11=0; CS10=0 - brak sygnalu zegarowego - licznik jest zatrzymany
//CS12=0; CS11=0; CS10=1 - clk - pełna prędkość bez presklaera
//CS12=0; CS11=1; CS10=0 - clk/8 - z preskalerem
//CS12=0; CS11=1; CS10=1 - clk/64 - z preskalerem
//CS12=1; CS11=0; CS10=0 - clk/256 - z preskalerem
//CS12=1; CS11=0; CS10=1 - clk/1024 - z preskalerem
//CS12=1; CS11=1; CS10=0 - zewnętrzny syg. zegarowy na T1 - takt przy zboczu opadającym
//CS12=1; CS11=1; CS10=1 - zewnętrzny syg. zegarowy na T1 - takt przy zboczu narastającym

//SET_PIN(TCCR1B,CS10);//preskaler clk=4MHz/64=62500Hz - okres 16us
//SET_PIN(TCCR1B,CS11);
//UNSET_PIN(TCCR1B,CS12);


UNSET_PIN(TCCR1B,CS10);//wyłączenie zegara
UNSET_PIN(TCCR1B,CS11);
UNSET_PIN(TCCR1B,CS12);
SET_PIN(PORTB,PB2); //ustawienie 5V;

//sei(); //włącz przerwania
cli();

while(1)
{

//if(PORTB&PB0 && TCNT1>2){UNSET_PIN(PORTB,PB0);}else{;}



if(!(Pp&Ps) && (p&0x01))
{p=(p&(~0x01)); if(p&0x10){p=(p&(~0x10));}else{p=(p|0x10);}
}

}
else if(!(Pp&Pu) && (p&0x04))
{p=(p&(~0x04));
if(p&0x20){if(f<100){f++;}else{;}}
else{if(w<99){w++;}else{;}}
temp=f;
temp=62500/f;
ICR1=temp;
//temp=(temp*w)/100;
temp=(temp*(100-w))/100;
OCR1A=ICR1-temp;
}
else if(!(Pp&Pd) && (p&0x08))
{p=(p&(~0x08));
if(p&0x20){if(f>1){f--;}else{;}}
else{if(w>1){w--;}else{;}}
temp=f;
temp=62500/f;
ICR1=temp;
//temp=(temp*w)/100;
temp=(temp*(100-w))/100;
OCR1A=ICR1-temp;
}
else{;}

if(!(Pp&Pu) && !(p&0x04))
{
licz++;
if(licz<6){licz++;}
else
{
if(p&0x20){if(f<100){f++;}else{;}}
else{if(w<99){w++;}else{;}}
temp=f;
temp=62500/f;
ICR1=temp;
//temp=(temp*w)/100;
temp=(temp*(100-w))/100;
OCR1A=ICR1-temp;
}
}
else{;}

if(!(Pp&Pd) && !(p&0x08))
{
licz++;
if(licz<6){licz++;}
else
{
if(p&0x20){if(f>1){f--;}else{;}}
else{if(w>1){w--;}else{;}}
temp=f;
temp=62500/f;
ICR1=temp;
//temp=(temp*w)/100;
temp=(temp*(100-w))/100;
OCR1A=ICR1-temp;
}
}
else{;}



if((Pp&Ps) && !(p&0x01)){p=(p|0x01); }
else if((Pp&Pfw)&& !(p&0x02)){p=(p|0x02); }
else if((Pp&Pu) && !(p&0x04)){p=(p|0x04); licz=0;}
else if((Pp&Pd) && !(p&0x08)){p=(p|0x08); licz=0;}
else{;}


if(p&0x10 && (PORTB&0x04))
{
SET_PIN(TCCR1B,CS10);//preskaler clk=4MHz/64=62500Hz - okres 16us
SET_PIN(TCCR1B,CS11);
UNSET_PIN(TCCR1B,CS12);
UNSET_PIN(PORTB,PB2); //ustawienie 0V;
sei();
}
else if (!(p&0x10) && !(PORTB&0x04))
{
cli();
UNSET_PIN(TCCR1B,CS10);//wyłączenie zegara
UNSET_PIN(TCCR1B,CS11);
UNSET_PIN(TCCR1B,CS12);
SET_PIN(PORTB,PB2); //ustawienie 5V;
}
else{;}


ADCSRA |= _BV(ADSC); // Rozpoczęcie przetwarzania
while(bit_is_set(ADCSRA,ADSC))// Oczekiwanie na zakończenie przetwarzania
{};
pom = ADCH;
pomiar=pom;
pomiar = (pomiar*512)/51;
pomiar = pomiar*21; //- konwersja do dzielnika ze schematu przy potencjometrze ok5k wskazuje poprawny wynik
if (pomiar<10000)
{strcpy(buffor_w2,"U= ");}
else
{strcpy(buffor_w2,"U=");}
ltoa(pomiar/1000,string,10);
strcat(buffor_w2,string);
strcat(buffor_w2,".");
ltoa((pomiar%1000)/100,string,10);
strcat(buffor_w2,string);
if(p&0x20){strcat(buffor_w2," zm.F");}else{strcat(buffor_w2," zm.W");}
if(p&0x10){strcat(buffor_w2," Wla");}else{strcat(buffor_w2," Wyl");}

//itoa(pom,string,10);
//strcat(buffor_w2,string);

strcpy(buffor_w1,"F=");
if(f<100){strcat(buffor_w1," ");}else{;}
if(f<10){strcat(buffor_w1," ");}else{;}
ltoa(f,string,10);
strcat(buffor_w1,string);
strcat(buffor_w1,"Hz ");

strcat(buffor_w1,"W=");
if(w<10){strcat(buffor_w1," ");}else{;}
ltoa(w,string,10);
//if((100-w)<10){strcat(buffor_w1," ");}else{;}
//ltoa((100-w),string,10);
strcat(buffor_w1,string);
strcat(buffor_w1,"% ");


wyswietl(buffor_w1,1);
wyswietl(buffor_w2,2);


}


}[/syntax]

Statystyki: Napisane przez piotrekwoj1 — 28 mar 2014, o 10:08

]]>