/*------------------------------------------------------------------------------
 Copyright:      Radig Ulrich  mailto: mail@ulrichradig.de
 Author:         Radig Ulrich
 Remarks:        
 known Problems: none
 Version:        31.12.2007
 Description:    Analogeingänge Abfragen
 
 Dieses Programm ist freie Software. Sie können es unter den Bedingungen der 
 GNU General Public License, wie von der Free Software Foundation veröffentlicht, 
 weitergeben und/oder modifizieren, entweder gemäß Version 2 der Lizenz oder 
 (nach Ihrer Option) jeder späteren Version. 
 Die Veröffentlichung dieses Programms erfolgt in der Hoffnung, 
 daß es Ihnen von Nutzen sein wird, aber OHNE IRGENDEINE GARANTIE, 
 sogar ohne die implizite Garantie der MARKTREIFE oder der VERWENDBARKEIT 
 FÜR EINEN BESTIMMTEN ZWECK. Details finden Sie in der GNU General Public License. 
 Sie sollten eine Kopie der GNU General Public License zusammen mit diesem 
 Programm erhalten haben. 
 Falls nicht, schreiben Sie an die Free Software Foundation, 
 Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307, USA. 
------------------------------------------------------------------------------*/
#include "analog.h"
#include "config.h"
#include "s_tools__.h"
#if USE_ADC
volatile unsigned char channel = 0;
extern volatile unsigned long kwh_;
unsigned int u12=0;
unsigned char u12_cnt=0;
volatile unsigned char merke_ss12v=1;
volatile unsigned char u12_rechne=0;
unsigned int u5=0;
unsigned char u5_cnt=0;
volatile unsigned char merke_ss5v=1;
volatile unsigned char u5_rechne=0;
unsigned int u33=0;
unsigned char u33_cnt=0;
volatile unsigned char merke_ss33v=1;
volatile unsigned char u33_rechne=0;
unsigned int u_kwh_=0;
unsigned char u_kwh_cnt=0;
volatile unsigned char merke_ss_kwh_=1;
volatile unsigned char u_kwh_rechne=0;
unsigned int merke_max=0;
unsigned int merke_min=1023;
unsigned int cnt_low=0;
unsigned int cnt_high=0;
//------------------------------------------------------------------------------
//
void ADC_Init(void)
{	ADMUX =((1<<REFS0) | (1<<REFS1)); // ref 2,5V
	//Free Running Mode, Division Factor 128, Interrupt on
	ADCSRA=(1<<ADEN)|(1<<ADSC)|(1<<ADATE)|(1<<ADPS2)|(1<<ADPS1)|(1<<ADPS0)|(1<<ADIE);
}
//------------------------------------------------------------------------------
//
ISR (ADC_vect)
{
	ANALOG_OFF; //ADC OFF
	static unsigned char start=0;
/*
#ifdef ZAEHLERDEBUG
	char tmp_buffer[12];
#endif
*/
	if(!start)
	{	merke_ss12v=time%60;	
		merke_ss5v=merke_ss12v;	
		merke_ss33v=merke_ss5v;	
		start=1;
	}
	switch(channel)
	{	case 7:							// jar temp umrechnung gefunden
			if(!u12_rechne)			// jar10
			{	u12+=ADC;
				u12_cnt++;
				if(u12_cnt>31)
					u12_rechne=1;	// jar10
			}
			break;
		case 6:							// jar temp umrechnung gefunden
			if(!u5_rechne)			// jar10
			{	u5+=ADC;
				u5_cnt++;
				if(u5_cnt>31)
					u5_rechne=1;	// jar10
			}
			break;
		case 5:							// jar temp umrechnung gefunden
			if(!u33_rechne)			// jar10
			{	u33+=ADC;
				u33_cnt++;
				if(u33_cnt>31)
					u33_rechne=1;	// jar10
			}
			break;
/*
		case 4:							// jar temp umrechnung gefunden
			u_kwh_+=ADC;
			u_kwh_cnt++;
			if(u_kwh_cnt==4)
			{	u_kwh_>>=2;
				if(u_kwh_>merke_max)
					merke_max=u_kwh_;
				if(u_kwh_<merke_min)
					merke_min=u_kwh_;
				
				if( u_kwh_< (merke_min*3) )
				{	DDRD = OUTD;
					PORTD = OUTD;
#ifdef ZAEHLERDEBUG
					if(cnt_high)
#endif
					{	
#ifdef ZAEHLERDEBUG
						usart_write("kWh = %s", (char *)ultoa((unsigned long)kwh_/(unsigned long)ZAEHLERKONSTANTE, tmp_buffer, 10));
						usart_write(",%s ", trimm_string('0', (char *)ultoa((100UL*((unsigned long)kwh_%(unsigned long)ZAEHLERKONSTANTE)/(unsigned long)ZAEHLERKONSTANTE), tmp_buffer, 10), 2));
						usart_write("[U=%i, low %i ", (unsigned int)((unsigned long)kwh_%(unsigned long)ZAEHLERKONSTANTE), u_kwh_);
						usart_write("(max:%i) ", merke_max);
						usart_write("(min:%i)]\r\n", merke_min);
#endif
						kwh_++;
					}
#ifdef ZAEHLERDEBUG
				 	cnt_low++;
					cnt_high=0;
#endif
				} // if( u_kwh< (merke_min*3) )
				else
				{	DDRD = 0;
					PORTD = 0;
#ifdef ZAEHLERDEBUG
					cnt_high++;
					if( cnt_high> (5*cnt_low) )
					{
						if(cnt_low)
							usart_write("\r\n");
						cnt_low=0;
					} // if( cnt_high> (5*cnt_low) )
#endif
				} // if !( u_kwh_< (merke_min*3) )
				u_kwh_cnt=0;
				u_kwh_=0;
			} // if(u_kwh_cnt==4)
			break;
*/		
		default:
			var_array[channel]=0;
			//var_array[channel] = ADC; // jar temp umrechnung gefunden
			break;
	}
	// var_array[channel++] = ADC; // jar temp umrechnung gefunden
	//usart_write("Kanal(%i)=%i\r\n",(channel-1),var_array[(channel-1)]);
	channel++; // jar temp umrechnung gefunden
	if(channel > 7) 
		channel = 5;
	ADMUX =((1<<REFS0) | (1<<REFS1)) + channel; // ref 2,5V
	ANALOG_ON;//ADC ON
}
#endif //USE_ADC