/*****************************************************
This program was produced by the
CodeWizardAVR V1.24.4 Standard
Automatic Program Generator
© Copyright 1998-2004 Pavel Haiduc, HP InfoTech s.r.l.
http://www.hpinfotech.com
e-mail:office@hpinfotech.com

Project : 
Version : 
Date    : 1/2/2002
Author  : Mohammad                        
Company : Griffin                         
Comments: 


Chip type           : ATmega16
Program type        : Application
Clock frequency     : 8.000000 MHz
Memory model        : Small
External SRAM size  : 0
Data Stack size     : 256
*****************************************************/

#include <mega16.h>

// Alphanumeric LCD Module functions
#asm
   .equ __lcd_port=0x15 ;PORTC
#endasm
#include <lcd.h>
#include <delay.h> 
#include <math.h>         
#define sample_time 200            //periode nemone bardary
#define samples 180                //tedad nemoneha
#define ADC_VREF_TYPE 0xC0
// Read the AD conversion result
unsigned int read_adc(unsigned char adc_input)
{
ADMUX=adc_input|ADC_VREF_TYPE;
// Start the AD conversion
ADCSRA|=0x40;
// Wait for the AD conversion to complete
while ((ADCSRA & 0x10)==0);
ADCSRA|=0x10;
return ADCW;
}
char  wav1[samples],wav2[samples];   //2 nemone signalha avali refrence dovomi ham hey andazegiri mishe ba vali moghayese mishe 
double w1=0,w2=0;                   //baraye mohasebeye majmoe
float rms1=0,rms2=0;                //meghdar RMS signal
// Declare your global variables here
void display_no(int no);
void main(void)
{
// Declare your local variables here

// Input/Output Ports initialization
// Port A initialization
// Func7=In Func6=In Func5=In Func4=In Func3=In Func2=In Func1=In Func0=In 
// State7=T State6=T State5=T State4=T State3=T State2=T State1=T State0=T 
PORTA=0x00;
DDRA=0x00;

// Port B initialization
// Func7=In Func6=In Func5=In Func4=In Func3=In Func2=In Func1=In Func0=In 
// State7=T State6=T State5=T State4=T State3=T State2=T State1=T State0=T 
PORTB=0x00;
DDRB=0x00;

// Port C initialization
// Func7=In Func6=In Func5=In Func4=In Func3=In Func2=In Func1=In Func0=In 
// State7=T State6=T State5=T State4=T State3=T State2=T State1=T State0=T 
PORTC=0x00;
DDRC=0x00;

// Port D initialization
// Func7=In Func6=In Func5=In Func4=In Func3=In Func2=In Func1=In Func0=In 
// State7=T State6=T State5=T State4=T State3=T State2=T State1=T State0=T 
PORTD=0x00;
DDRD=0x00;

// Timer/Counter 0 initialization
// Clock source: System Clock
// Clock value: Timer 0 Stopped
// Mode: Normal top=FFh
// OC0 output: Disconnected
TCCR0=0x00;
TCNT0=0x00;
OCR0=0x00;

// Timer/Counter 1 initialization
// Clock source: System Clock
// Clock value: Timer 1 Stopped
// Mode: Normal top=FFFFh
// OC1A output: Discon.
// OC1B output: Discon.
// Noise Canceler: Off
// Input Capture on Falling Edge
TCCR1A=0x00;
TCCR1B=0x00;
TCNT1H=0x00;
TCNT1L=0x00;
ICR1H=0x00;
ICR1L=0x00;
OCR1AH=0x00;
OCR1AL=0x00;
OCR1BH=0x00;
OCR1BL=0x00;

// Timer/Counter 2 initialization
// Clock source: System Clock
// Clock value: Timer 2 Stopped
// Mode: Normal top=FFh
// OC2 output: Disconnected
ASSR=0x00;
TCCR2=0x00;
TCNT2=0x00;
OCR2=0x00;

// External Interrupt(s) initialization
// INT0: Off
// INT1: Off
// INT2: Off
MCUCR=0x00;
MCUCSR=0x00;

// Timer(s)/Counter(s) Interrupt(s) initialization
TIMSK=0x00;

// Analog Comparator initialization
// Analog Comparator: Off
// Analog Comparator Input Capture by Timer/Counter 1: Off
ACSR=0x80;
SFIOR=0x00;

// ADC initialization
// ADC Clock frequency: 125.000 kHz
// ADC Voltage Reference: Int., cap. on AREF
// ADC Auto Trigger Source: None
ADMUX=ADC_VREF_TYPE;
ADCSRA=0x86;                                   //age khasti ADC ro 8 biti koni 86 ro bokon 83 alan 10 biti

// LCD module initialization
lcd_init(16);

while (1)
   {  
      int i;
      if (read_adc(1)==0)                //age kelide motasel be ADC1 feshar dade shod signale refrenco nemone bardari mikone
      {
          delay_ms(100);                  // delay vase inke bebine vaghean feshar dade ya ye noise bode ke paya ro 0 karde
          if(read_adc(1)==0)               //age bad az in delay bazm sefr bood yani karbar kelido fehsar dadae
          {
              for (i=0;i<samples+1;i++)     // hala miad nemone migire mirize to wav1 vase refrence
              {
                   wav1[i]=read_adc(0);
                   delay_us(sample_time);    // bein har nemone bardari be andazeye periode nemonebardari sabr mikone
               }
           }    
           w1=0;                             
           for (i=0;i<samples+1;i++)
                w1=w1+(wav1[i]*wav1[i]);     //hala miad majmoe tavan dovome nemonaha ro baham jam mikne
           w1=w1/samples;                    // bar tedad taghsim mikone
           rms1=sqrt(w1);                    // jazresho migire mishe RMS signal aval
        }   
        

      
      for (i=0;i<samples+1;i++)             //hala miad hey signal 2 ro nemone migire on avali ro faghat vaghti kelid marbote feshar dadae beshe nemone migire
      {
          wav2[i]=read_adc(0);
          delay_us(sample_time);
      } 
      w2=0;
      for (i=0;i<samples+1;i++)
          w2=w2+(wav2[i]*wav2[i]);
      w2=w2/samples;   
      rms2=sqrt(w2);  
      
       lcd_clear();
       display_no(20*log(rms2/rms1));      // feshar seda nesbat be refrence
       lcd_putchar('d');
       lcd_putchar('B');    
       lcd_putchar(' ');  
       display_no(rms2);
       lcd_putchar(' ');    
       display_no(rms1);
     
  };
}    
void display_no(int no)
{   
   int array[5];
   int i=0,j;
   if( no < 0)
   {
      lcd_putchar('-');
      no=-1*no;
   }
   else
      lcd_putchar('+');
    while(no > 9)
    {
       array[i++]=no % 10;
       no/=10;
    }
    array[i]=no;
    for(j=i;j >=0 ;j--)   
    {
       lcd_putchar(48+array[j]);
       delay_us(100);
       }
       
}