#include <avr/io.h>
#include <avr/interrupt.h>
#include "uart.h"
#include "global.h"

#define YP		0		//Pinbelegung von PORTC
#define XN		1
#define YN		2
#define XP		3

#define PRESSED	1
#define OPEN	0

#define XTAL_CPU        16000000 
#define UART_BAUD_RATE     19200 

volatile unsigned int x, y, status;		//x, y Koordinaten, Status ob Werte gültig

int main(void)
{ unsigned int i;
    uart_init(UART_BAUD_SELECT(UART_BAUD_RATE, XTAL_CPU)); 
	sbi(DDRD, 2);	//GND für UART

	ADCSR=(1<<ADEN)|(1<<ADSC)|(1<<ADIE)|7;	//ADC enable

	sei();

	for (;;)
	{	i=uart_getc();
		if (i==UART_NO_DATA)
		{}
		else if (i==0)
			uart_putc(status);
		else if (i==1)
		{	uart_putc(x>>8);
			uart_putc(x&255);
		}
		else if (i==2)
		{	uart_putc(y>>8);
			uart_putc(y&255);
		}
	}
}


SIGNAL(SIG_ADC)
{	static unsigned char state;
	if (state==0)			// Spannung an X anlegen: an Y die Spannung messen: X Koordinate
	{	ADMUX=YP|(1<<REFS0);
		if (status==PRESSED)
			x=x-x/32+ADC;

		cbi(DDRC, YP);		//Y Eingang
		cbi(DDRC, YN);
		sbi(PORTC, YP);		//Y Pullup
		cbi(PORTC, YN);
		cbi(PORTC, XP);		//X auf Low
		cbi(PORTC, XN);
		sbi(DDRC, XP);		//X auf Ausgang
		sbi(DDRC, XN);
		state=1;
		sbi(ADCSR,ADSC);
	}
	else if (state==1)
	{	if (PINC&(1<<YP))	//Messen ob Verbindung X-Y
			status=OPEN;
		else
			status=PRESSED;
		cbi(PORTC, YP);		//Y Pullup aus
		sbi(PORTC, XP);		//X Spannung anlegen

		state=2;
		sbi(ADCSR,ADSC);
	}
	else if (state==2)		// Spannung an Y anlegen: an X die Spannung messen: Y Koordinate
	{	ADMUX=XP|(1<<REFS0);
		if (status==PRESSED)
			y=y-y/32+ADC;

		cbi(DDRC, XP);		//X Eingang
		cbi(DDRC, XN);
		sbi(PORTC, XP);		//X Pullup
		cbi(PORTC, XN);
		cbi(PORTC, YP);		//Y auf Low
		cbi(PORTC, YN);
		sbi(DDRC, YP);		//Y auf Ausgang
		sbi(DDRC, YN);

		state=3;
		sbi(ADCSR,ADSC);
	}
	else if (state==3)
	{	if (PINC&(1<<XP))	//Messen ob Verbindung X-Y
			status=OPEN;
		else
			status=PRESSED;
		cbi(PORTC, XP);		//X Pullup aus
		sbi(PORTC, YP);		//Y Spannung anlegen

		state=0;
		sbi(ADCSR,ADSC);
	}
}

void delay (unsigned int us)		//Für 16MHz kalibriert !
{   unsigned int i;
    for (i=0;i<us;i++)
    {	asm ("nop");
		asm ("nop");
		asm ("nop");
		asm ("nop");
		asm ("nop");
		asm ("nop");
		asm ("nop");
		asm ("nop");
		asm ("nop");
	}
}