#include <avr/io.h>  //AVR-Studio
#include <avr/interrupt.h>
#include <avr/wdt.h>
#include <avr/eeprom.h>

#define gas_ein 0x00		//ist dazu da um zu prüfen welche ADC grad eingelesen wird
#define strom_ein 0x01
#define num_samples 4		//anzahl der Werte für Array
#define strom_max 0xff		//Maximaler strom

#define fet1_port PORTB
#define fet1_pin 1
#define fet2_port PORTB
#define fet2_pin 2

#define fet2_an (fet2_port |= (1<<fet2_pin));
#define fet1_an (fet1_port |= (1<<fet1_pin));
#define fet2_aus (fet2_port &= ~(1<<fet2_pin));
#define fet1_aus (fet1_port &= ~(1<<fet1_pin));

#define ADC_VREF_TYPE 0xE0		//für ADMUX (interne Vref)

uint8_t strom[num_samples]={0}, gas[num_samples]={0};
uint8_t t0_ch=0, k=0;


ISR(TIMER1_OVF_vect)
{
	fet2_aus;		//FET2 aus

	t0_ch = 1;

	// Timer/Counter 0 initialization
	// Clock source: System Clock
	// Clock value: 30,753 kHz
	TCCR0=0x04;			// Timer 0 starten
	TCNT0=0xfc;			//fc weil nur 3 takte zwischen den beiden 
}					//umschaltzeiten der Mosfets sind

// Timer 1 output compare A interrupt service routine
ISR(TIMER1_COMPA_vect)
{
	fet1_aus;		//FET1 aus

	t0_ch = 0;

// Timer/Counter 0 initialization
// Clock source: System Clock
// Clock value: 30,753 kHz
TCCR0=0x04;
TCNT0=0xfc;			//fc weil nur 3 takte zwischen den beiden 
					//umschaltzeiten der Mosfets sind
}

// Timer 0 overflow interrupt service routine
ISR(TIMER0_OVF_vect)
{
	TCCR0 = 0; // timer 0 aus

if (t0_ch) 
{
	fet1_an;			//FET2 an
} 
else
{
	fet2_an;			//FET1 an
}
}

// ADC interrupt service routine
ISR(ADC_vect)
{
unsigned char adc_data;
static uint8_t i=0;

// Read the 8 most significant bits
// of the AD conversion result
adc_data=ADCL;					//Daten von ADCL(8Bits) in adc_data lesen
adc_data=ADCH;					//Daten von ADCH(8Bits) in adc_data lesen
if ((ADMUX & 0x0f) == gas_ein) 	//prüfen welcher adc gerade eingelesen wurde
{
	gas[i] = adc_data;			//Daten ins array schreiben
	ADMUX &= 0xf0;				
	ADMUX |= strom_ein & 0x0f;	
    i++;
}
else if ((ADMUX & 0x0f) == strom_ein)
{ 
	strom[i] = adc_data;		//Daten ins array schreiben
	if (adc_data >= strom_max)	//Strom prüfen, nicht größer als 200A
	{	gas[i] = 0;}
	ADMUX &= 0xf0;
	ADMUX |= gas_ein & 0x0f;
	i++;
	if (i>=num_samples) {i=0;}
}
	k++;

}

int main(void)
{
uint8_t i = 0;
uint8_t gas_mittel, strom_mittel;

// Input/Output Ports initialization
// Port B initialization
// Func0=In Func1=Out Func2=Out Func3=In Func4=In Func5=In Func6=In Func7=In 
// State0=T State1=0 State2=0 State3=T State4=T State5=T State6=T State7=T 
PORTB=0x00;
DDRB=0x06;			//PB1 und PB2 als Ausgänge

// Port C initialization
// Func0=In Func1=In Func2=In Func3=In Func4=In Func5=In Func6=In 
// State0=T State1=T State2=T State3=T State4=T State5=T State6=T 
PORTC=0x00;
DDRC=0x00;			//Alle C Ports als Eingang

// Port D initialization
// Func0=In Func1=In Func2=In Func3=In Func4=In Func5=In Func6=In Func7=In 
// State0=T State1=T State2=T State3=T State4=T State5=T State6=T State7=T 
PORTD=0x00;
DDRD=0x00;			//Alle D Ports als Eingang


// Timer/Counter 1 initialization
// Clock source: System Clock
// Clock value: 123,013 kHz
// Mode: Fast PWM top=00FFh
// Noise Canceler: Off
// Input Capture on Falling Edge
/*TCCR1A=0x01;
TCCR1B=0x0B;*/
TCCR1A = (1<<WGM10) | (1<<COM1A1) | (1<<COM1B1);
TCCR1B = (1<<CS10) | (1<<CS11) | (1<<WGM12);
TCNT1H=0x00;
TCNT1L=0x00;
OCR1AH=0x00;
OCR1AL=0x00;
OCR1BH=0x00;
OCR1BL=0x00;

// Timer/Counter 2 initialization
// Clock source: System Clock
// Clock value: Timer 2 Stopped
// Mode: Normal top=FFh
// OC2 output: Disconnected
ASSR=0x00;
TCCR2=0x00;
TCNT2=0x00;
OCR2=0x00;

// External Interrupt(s) initialization
// INT0: Off
// INT1: Off
MCUCR=0x00;

// Timer(s)/Counter(s) Interrupt(s) initialization
TIMSK=0x17;

// Analog Comparator initialization
// Analog Comparator: Off
// Analog Comparator Input Capture by Timer/Counter 1: Off
// Analog Comparator Output: Off
ACSR=0x80;
SFIOR=0x00;

// ADC initialization
// ADC Clock frequency: 123,013 kHz
// ADC Voltage Reference: Int., cap. on AREF
// ADC High Speed Mode: Off
// ADC Auto Trigger Source: Free Running
// Only the 8 most significant bits of
// the AD conversion result are used

ADMUX=ADC_VREF_TYPE;
ADCSRA=0xAE;
SFIOR&=0x0F;

// Global enable interrupts
sei();

while (1)
{	
			gas_mittel = 0;
			strom_mittel = 0;
	  		ADCSRA |= (1<<ADSC);
	  		
			if(!(k % num_samples))
			{
      			for (i = 0; i < num_samples; i++) 	//4 mal durch laufen
				{
					gas_mittel += gas[i];			// gaswerte schreiben
					strom_mittel += strom[i];		//stromwerte schreiben
				}
				gas_mittel /= num_samples;			//Mitteln
				strom_mittel /= num_samples;			//Mitteln
			}
		//OCR1AL = gas_mittel;					//den Wert in die PWM schreiben
	  	OCR1AL = 0xf0;
	  }
}