#include <avr/io.h>
#include "lcd-routines.h"
#include <util/delay.h>


uint16_t ReadChannel(uint8_t mux)
{
  uint8_t i;
  uint16_t result;
 
  ADMUX = mux;                      // Kanal waehlen
  ADMUX |= (0<<REFS1) | (1<<REFS0) | (1<<ADLAR); // extern
 
  ADCSRA = (1<<ADEN) | (1<<ADPS1) | (1<<ADPS0);    // Frequenzvorteiler 
                               // setzen auf 8 (1) und ADC aktivieren (1)

  
 
  /* nach Aktivieren des ADC wird ein "Dummy-Readout" empfohlen, man liest
     also einen Wert und verwirft diesen, um den ADC "warmlaufen zu lassen" */
  ADCSRA |= (1<<ADSC);              // eine ADC-Wandlung 
  while ( ADCSRA & (1<<ADSC) ) {
     ;     // auf Abschluss der Konvertierung warten 
  }
  result = ADCW;  // ADCW muss einmal gelesen werden,
                  // sonst wird Ergebnis der nächsten Wandlung
                  // nicht übernommen.
 
  /* Eigentliche Messung - Mittelwert aus 4 aufeinanderfolgenden Wandlungen */
  result = 0; 
  for( i=0; i<4; i++ )
  {
    ADCSRA |= (1<<ADSC);            // eine Wandlung "single conversion"
    while ( ADCSRA & (1<<ADSC) ) {
      ;   // auf Abschluss der Konvertierung warten
    }
    result += ADCW;                 // Wandlungsergebnisse aufaddieren
  }
  ADCSRA &= ~(1<<ADEN);             // ADC deaktivieren (2)
 
  result /= 4;                     // Summe durch vier teilen = arithm. Mittelwert
 
  return result;
}


int main(void)
{
	
	DDRA = 0x00;
	DDRB = 0x00;
	DDRC = 0xFF;
	DDRD = 0xFF;
	
	unsigned char Regelspannung;
	float Spannungswert;
	unsigned char Stromwert;
	unsigned char Tasterregister;
	unsigned char Speicher1;
	unsigned char Speicher2;

	char Buffer[20];
	char Buffer1[20];

	lcd_init();
	
	Tasterregister = 0x00;	

	Programmstart :

	lcd_clear();
	
	while(1)
	{
	uint16_t adcval;
	adcval = ReadChannel(2); 		//Regelspannung einlesen
	Regelspannung = ADCH;

	
	if (!(PINA & 1<<PINA7))
	goto Temperatursicherung;		//Temperatursicherung
 	
	
	if (PINB & 1<<PINB0)			//Ausgang aus
 	goto Outputoff;

	if (PINB & 1<<PINB4)  			//normal
	Tasterregister = 0x00;

	if (PINA & 1<<PINA3)  			//3,3V
	Tasterregister = 0x01;

	if (PINB & 1<<PINB1)  			//5V
	Tasterregister = 0x02;

	if (PINB & 1<<PINB2)  			//12V  
	Tasterregister = 0x03;

	if (PINB & 1<<PINB3)  			//24V
	Tasterregister = 0x04;
	
	if (PINB & 1<<PINB6)			//Speicherplatz1
	Tasterregister = 0x05;

	if (PINB & 1<<PINB5)			//Speicherplatz2
	Tasterregister = 0x06;
	
	if (PINB & 1<<PINB7)			//Speichern
	goto Speichern;
	
//DA-Wandler:

	if(Tasterregister == 0x00)
	PORTC = Regelspannung;
	
	if(Tasterregister == 0x01)
	PORTC = 0x19;

	if(Tasterregister == 0x02)
	PORTC = 0x26;

	if(Tasterregister == 0x03)
	PORTC = 0x5B;

	if(Tasterregister == 0x04)
	PORTC = 0xB6;

	if(Tasterregister == 0x05)
	PORTC = Speicher1;

	if(Tasterregister == 0x06)
	PORTC = Speicher2;
	
//Anzeige Gleitkommazahl
	
	adcval = ReadChannel(0); 				//Spannung einlesen
	Spannungswert = ADCH, ADCL;

	
	adcval = ReadChannel(1);				//Strom einlesen
	Stromwert = ADCH;

    
	

	itoa( Spannungswert, Buffer, 10);		//Spannung anzeigen
	set_cursor(0,1);
	lcd_string("Spannung: ");
	lcd_string(Buffer);
	lcd_string("V");
	lcd_string("   ");
	
		
	itoa( Stromwert, Buffer1, 10);			//Strom anzeigen
	set_cursor(0,2);
	lcd_string("Strom: ");
	lcd_string(Buffer1);
	lcd_string("A");
	
	}

//Unterprogramme:

Temperatursicherung :
	{ 	
		lcd_clear();
		set_cursor(0,1);
    	lcd_string("Temperatur zu");
		set_cursor(0,2);
		lcd_string("hoch! Output off");

		while(1)
		{
		if (PINA & 1<<PINA7)
		goto Programmstart;
		}
	}

Outputoff :
	{
		PORTC = 0x00;
		lcd_clear();
		set_cursor(0,1);
		lcd_string("Output off");
		set_cursor(0,2);
		lcd_string("");
		_delay_ms(250);

		while(1)
		{
		if (PINB & 1<<PINB0)
		goto delay;
		}

		delay:
		_delay_ms(250);
		goto Programmstart;
	}	

Speichern :
	{
		lcd_clear();
		set_cursor(0,1);
		lcd_string("Speichermodus");
		set_cursor(0,2);
		lcd_string("SP waehlen");

		_delay_ms(500);

		while(1)
		{
		if (PINB & 1<<PINB6)
		goto Speicher1;

		if (PINB & 1<<PINB5)
		goto Speicher2;

		if (PINB & 1<<PINB7)
		goto SpeichernEnde;

		if (PINB & 1<<PINB4)
		goto SpeichernEnde;
		}
		
		SpeichernEnde :
		{
		_delay_ms(100);
		goto Programmstart;
		}

		Speicher1 :
		{
		Speicher1 = Regelspannung;
		lcd_clear();
		set_cursor(0,1);
		lcd_string("Spannung in");
		set_cursor(0,2);
		lcd_string("SP1 gespeichert");
		_delay_ms(2000);
		goto Programmstart;
		}

		Speicher2 :
		{
		Speicher2 = Regelspannung; 
		lcd_clear();
		set_cursor(0,1);
		lcd_string("Spannung in");
		set_cursor(0,2);
		lcd_string("SP2 gespeichert");
		_delay_ms(2000);
		goto Programmstart;
		}
	}

	return 0;
}