#include <avr/io.h>
#include <avr/wdt.h>
#include <avr/signal.h>
#include <string.h>
#include <stdlib.h>
#include <avr/pgmspace.h>

char status;
asm("temp=r18");
void busyflag(void);
void set_e(char status);
void set_rs(char status);
void set_rw(char status);
void init(void);
void Delay(unsigned int N);

void Delay(unsigned int N)// keine Wertuebergabe an Delay, Uebergabe von N an Delay
{
unsigned int M;
unsigned int j;
unsigned int i;
	for (i=0; i<N; i++)// solange i<N,inkrementiere i
	
	{
		M=1; 
		for (j=0; j<M; j++)// wenn j ungleich 0
		{
		
		asm("NOP");	//Verbrate einen Prozessortakt (Assemblercode)
		}
	}
}

void busyflag(void)
{
	DDRD=0x00;
	set_e(1);
	set_rs(0);
	set_rw(1);
	asm("nop");
	asm("nop");
	//Delay(1000);
	loop_until_bit_is_set(PIND,7);
	set_e(0);
}
	

void set_e(char status)  /* PORT C0 = Pin 6 am LCD */
{
    if(status)
        sbi(PORTC,3);
    else
        cbi(PORTC,3);
}

void set_rw(char status)
{
	if(status)
		sbi(PORTC,4);
	else
		cbi(PORTC,4);

}

void set_rs(char status)
{
	if(status)
		sbi(PORTC,5);
	else
		cbi(PORTC,5);

}

void init(void)
{
	//busyflag();
	Delay(4000);
	DDRD=0xFF;
	set_rs(1);
	set_rw(0);
	set_e(1);
	PORTD=0x38;
	set_e(0);
	
	//busyflag();
	Delay(4000);
	DDRD=0xFF;
	set_rw(0);
	set_e(1);
	PORTD=0x0E;
	set_e(0);
	
	//busyflag();
	DDRD=0xFF;
	Delay(4000);
	set_e(1);
	set_rw(0);
	PORTD=0x01;
	set_e(0);
	
	//busyflag();
	DDRD=0xFF;
	Delay(4000);
	set_e(1);
	set_rw(0);
	PORTD=0x06;
	set_e(0);
}
	

	


main() {
	
SPL=RAMEND;
SPH=RAMEND;
DDRD=0xFF;

set_e(0);
set_rs(0);
set_rw(0);

init();

return 0;
}