#include <avr/io.h>
#include <stdlib.h>

//Delay funktion
#define F_CPU 4000000     /* Clock in HZ  */ 
#include <util/delay.h> 

#define DATEN	1
#define BEFEHL	0

/****************************************************************
Enable Routine - Enable Pin Toggeln
****************************************************************/
void toggle_e(void)
{
	PORTB |= (1<<6); 		// Enable auf "1"	
	_delay_us(5);
	PORTB &= ~((1 << 6));	//Enable auf 0
	_delay_us(100);
}

/****************************************************************
Funktion übergibt Daten ans Display
****************************************************************/
void lcd_write(unsigned char data_type, unsigned char data_byte)
{
	int byte = data_byte, data_bits;
	
	data_bits = 0x00;				// RW (Bit 5) == "0" (RW -> 1==Read mode, 0==Write mode)
	
	if(data_type == DATEN)
		data_bits |= 0x10;			// == RS auf 1 setzen (RS -> 0==BEFEHL, 1==DATEN)
	else
		data_bits|=0x0;				// == RS auf 0 setzen (RS -> 0==BEFEHL, 1==DATEN)
	
	//senden des higher NIbbles
	PORTB = (data_bits|((byte>>4)&0x0F));	
	toggle_e();					//Enable toggeln (datenübernahme)

	//senden des lower nibbles
	PORTB = (data_bits|(byte&0x0F));
	toggle_e();					//Enable toggeln (datenübernahme)
}



/****************************************************************
Funktion übergibt zeichenweise die Daten an die Übertragungsfunktion
****************************************************************/
void uebertragen(char z1[20], char z2[20], char z3[20], char z4[20])
{
	int i;
	
	for(i=0;i<=19;i++)
	{
		lcd_write(DATEN,z1[i]);	//übergabe eines Zeichens	
		_delay_us(50);//wartet ca. 50 us
	}

	for(i=0;i<=19;i++)
	{
		lcd_write(DATEN,z3[i]);	//übergabe eines Zeichens	
		_delay_us(50);
	}	

	for(i=0;i<=19;i++)
	{
		lcd_write(DATEN,z2[i]);	//übergabe eines Zeichens	
		_delay_us(50);
	}

	for(i=0;i<=19;i++)
	{
		lcd_write(DATEN,z4[i]);	//übergabe eines Zeichens	
		_delay_us(50);
	}
}


/****************************************************************
Initialisierung des LCD´s
****************************************************************/
void init(void)
{
	PORTB &= ~((1<<PB0) | (1<<PB1) | (1<<PB2) | (1<<PB3) | (1<<PB4)); // == auf 0 setzen
	_delay_ms(20); 
	lcd_write(BEFEHL,0x30);//0x30
	_delay_ms(5); 
	lcd_write(BEFEHL,0x30);//0x30	
	_delay_ms(5); 
	lcd_write(BEFEHL,0x30);//0x30	
	_delay_ms(5); 
	lcd_write(BEFEHL,0x3C);//0x3C	
	_delay_ms(5); 
	lcd_write(BEFEHL,0x08);//0x08			
	_delay_ms(5); 
//	lcd_write(BEFEHL,0x01);	//0x01 
//	_delay_us(200); 
	lcd_write(BEFEHL,0x06);//0x06	
	_delay_ms(5); 
	lcd_write(BEFEHL,0x02);//0x02 -> return home	
	_delay_ms(5); 	
	lcd_write(BEFEHL,0x0F);//0x0F --> Display on
	_delay_ms(5); 
}


/****************************************************************
Hauptprogramm
****************************************************************/
int main(void)
{		
	char init_1[20] = {"._.!LCD-VERSUCH!_._."};
	char init_2[20] = {"11111111111111111111"};
	char init_3[20] = {"22222222222222222222"};
	char init_4[20] = {"33333333333333333333"};	

	//Festlegen der Datenrichtung
	/*
	PIN0 = Daten 1				PIN4 = RS (1 = Daten / 0 = Befehl)
	PIN1 = Daten 2				PIN5 = R/W (1 = Read / 0 = Write)
	PIN2 = Daten 3				PIN6 = E
	PIN3 = Daten 4				PIN7 = unbenötigt
	*/		
	DDRB |= (1<<DDB0) | (1<<DDB1) | (1<<DDB2) | (1<<DDB3) | (1<<DDB4) | (1<<DDB5) | (1<<DDB6);//Pin 1-4 werden auf Ausgang gesetzt (==1)
	
	//Setzen der Pins
	PORTB &= ~((1<<PB0) | (1<<PB1) | (1<<PB2) | (1<<PB3) | (1<<PB4) | (1<<PB5) | (1<<PB6)); // alle pins auf 0 setzen

	init();				// Initialisierung des Displays

	uebertragen(init_1,init_2,init_3,init_4);	//überträgt die init-strings ans Display	

	while(1)
	{
	
	}	

	return 0;
}