#ifndef F_CPU
#define F_CPU 4000000L
#endif

#define D4 eS_PORTC4
#define D5 eS_PORTC5
#define D6 eS_PORTC6
#define D7 eS_PORTC7
#define RS eS_PORTC2
#define EN eS_PORTC3

#include <avr/io.h>
#include<stdlib.h>
#include <util/delay.h>
#include <inttypes.h>
#include "lcd.h"
#include <stdio.h>
#include <avr/interrupt.h>							//INT Betrieb vorbereiten


#define BAUD 19200L									//Übertragungsrate einstellen

#define UBRR_VAL ((F_CPU+BAUD * 8)/(BAUD*16)-1)		//clever runden
#define BAUD_REAL (F_CPU/(16*(UBRR_VAL+1)))			//reale Baudrate

#define BAUD_ERROR ((BAUD_REAL*1000)/BAUD-1000)		//Fehler in Promille

#if ((BAUD_ERROR>10)||(BAUD_ERROR<-10))
#error Systematischer Fehler in der Baudrate über 1% und damit zu hoch!
#endif



int adc_low, adc_high;									//Zwischenspeicher für die Ergebnisse des ADC
long adc_result;										//Gesamtergebnis der Messung des ADC
long vcc;												//Versorgungsspannung
char buf[10];

												 
void ADC_Init(void)										// ADC initialisieren
{

  //ADMUX = (1<<REFS0);									// die Versorgungsspannung AVcc als Referenz wählen:

   ADMUX = (1<<REFS1) | (1<<REFS0);						// oder interne Referenzspannung als Referenz für den ADC wählen:

														// Bit ADFR ("free running") in ADCSRA steht beim Einschalten
														// schon auf 0, also single conversion
  ADCSRA = (1<<ADPS1) | (1<<ADPS0);						// Frequenzvorteiler
  ADCSRA |= (1<<ADEN);									// ADC aktivieren

													/* 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
  }
														// ADCW muss einmal gelesen werden, sonst wird Ergebnis der nächstenWandlung nicht übernommen. 
  (void) ADCW;
}



void setup() 
{
	ADMUX |= (1<<REFS0);								//VCC als Referenzspannung für den AD-Wandler
	ADMUX |= (1<<MUX3) | (1<<MUX2) | (1<<MUX1);			//1.1V Referenzspannung als Eingang für ADC
    _delay_ms(100);										//warten bis sich die Referenzspannung eingestellt hat
	ADCSRA |= (1<<ADEN);								//ADC aktivieren

	  ADCSRA |= (1<<ADSC);								// eine ADC-Wandlung
	  while (ADCSRA & (1<<ADSC) )						// auf Abschluss der Konvertierung warten
	  {         
	    (void) ADCW;
	  }
}

uint16_t ADC_Read( uint16_t channel )					// ADC Einzelmessung	Call für die Messung 
{
	ADMUX = (ADMUX & ~(0x1F)) | (channel & 0x1F);		// Kanal waehlen, ohne andere Bits zu beeinflußen
	ADCSRA |= (1<<ADSC);								// eine Wandlung "single conversion"
	while (ADCSRA & (1<<ADSC) )							// auf Abschluss der Konvertierung warten
	{   
	(void) ADCW;
	}
	return ADCW;										// ADC auslesen und zurückgeben
	}

void setupUART1()
	{
		UBRR1H = UBRR_VAL >> 8;
		UBRR1L = UBRR_VAL & 0xFF;
		UCSR1B = (1<<RXEN1)|(1<<TXEN1);					//Enable receiver and transmitter
	
	}

uint8_t uart_getc(void)
{
	while (!(UCSR1A & (1<<RXC1)));						// warten bis Zeichen verfuegbar
	
	return UDR1;										// return UDR1
}

void send_char(char buf[])								//String buf auf UART1 ausgeben
{
	int i = 0;
	while (buf[i] != 0x00)
	{
		while ( !( UCSR1A & (1<<UDRE1)) );				//warten bis senden möglich
		UDR1 = (buf[i]);								//Zeichen senden
		i++;
	}
}

int main (void)
{
		setupUART1();

	DDRC = 0xFF;										//Port C alle auf Ausgang
	DDRB &= ~(1 << PB0);								//Port PB0 als Eingang
	PORTB =  (1 << 0);									// internen PulluP auf 1, das kann man auch messen
	
		PORTC |= (1 << PC0);							//PC1  auf 1 Spannung einschalten des Boards
//		    _delay_ms(1000);
//		PORTC &= ~(1 << PC0);							//PC1  auf 0 ausschalten

	Lcd4_Init();
	Lcd4_Clear();										// LCD löschen
	setup() ;											// ADC einstellen
	ADC_Init();
	uint16_t adcval;


		// bis hier sind alles nur einstellungen und Call's
		// ab hier Schleife...

										
	  while( 1 ) 
	{


			  
				adcval = ADC_Read(0);					// ADC Kanal 0 lesen
			  		itoa(adcval, buf, 10);				//umwandeln in ASCI
					Lcd4_Set_Cursor(1,1);
			  		Lcd4_Write_String(buf);				//Ausgabe auf Zeile 1 LCD

					send_char(buf);						//Ausgabe auf UART

		    if ( (UCSR1A & (1<<RXC1)) )					//Überwachung und Ausgabe Empfänger
		    {
			uint8_t c;
			c = uart_getc();
			Lcd4_Set_Cursor(2,1);
			Lcd4_Write_Char(c);
			}
	}	
}