#include <avr/io.h>
#include <util/delay.h>
#include "lcd.h"

void InitADC()
{
ADMUX=(1<<REFS0); // For Aref=AVcc;
ADCSRA=(1<<ADEN)|(1<<ADPS2)|(1<<ADPS1) ; //Rrescalar div factor =64
}

uint16_t ReadADC(uint8_t ch)

{

//Select ADC Channel ch must be 0-7

ch=ch&0b00000111;
ADMUX|=ch;
ADCSRA |= (1 << ADFR);

ADCSRA |= (1 << ADEN);
//Start Single conversion
ADCSRA|=(1<<ADSC);

//Wait for conversion to complete

while(!(ADCSRA & (1<<ADIF)));

//Clear ADIF by writing one to it
//standard way of clearing bits in io as said in datasheets.
//The code writes '1' but it result in setting bit to '0' !!!

ADCSRA|=(1<<ADIF);

return(ADC);

}

int main()

{

InitADC();
uint16_t x;
float V,R;
LCDInit(LS_NONE);
LCDClear();
DDRB=0B00000111;
PORTB=0B00000000;
LCDWriteStringXY(0,0,"UNDER GND CABLE");
LCDWriteStringXY(0,1,"FAULT DETECTOR");
_delay_ms(1000);
LCDClear();
while(1)

{
LCDClear();
PORTB=0B00000001;
x=ReadADC(0);
V=0.00489*X;

R=(V/(10-(2*V)));
if(x>1020)

{
LCDWriteStringXY(0,0,"R=OK");
_delay_ms(2000);

}
else
{

LCDWriteStringXY(0,0,"R=");
LCDGotoXY(2,0);
LCDWritefloat(R,1,4);
LCDWriteStringXY(10,0,"KM");
_delay_ms(2000);

}

LCDClear();
PORTB=0B00000010;
x=ReadADC(0);

V=0.00489*x;
R=(V/(10-(2*V)));
if(x>1020)

{
LCDWriteStringXY(0,0,"Y=OK");
_delay_ms(2000);

}
else
{

LCDWriteStringXY(0,0,"Y=");
LCDGotoXY(2,0);
LCDWritefloat(R,1,4);
LCDWriteStringXY(10,0,"KM");
_delay_ms(2000);

}

LCDClear();
PORTB=0B00000100;
x=ReadADC(0);

V=0.00489*x;
R=(V/(10-(2*V)));
if(x>1020)

{
LCDWriteStringXY(0,0,"G=OK");
_delay_ms(2000);

}
else
{

LCDWriteStringXY(0,0,"G=");
LCDGotoXY(2,0);
LCDWritefloat(R,1,4);
LCDWriteStringXY(10,0,"KM");
_delay_ms(2000);

}
}
}