// DEFINITIONS
#define _XTAL_FREQ 4000000     // frequenza quarzo


// CONFIG
#pragma config FOSC = HS        // Oscillator Selection bits (HS oscillator)
#pragma config WDTE = OFF       // Watchdog Timer Enable bit (WDT disabled)
#pragma config PWRTE = OFF      // Power-up Timer Enable bit (PWRT disabled)
#pragma config BOREN = OFF      // Brown-out Reset Enable bit (BOR disabled)
#pragma config LVP = OFF        // Low-Voltage (Single-Supply) In-Circuit Serial Programming Enable bit (RB3 is digital I/O, HV on MCLR must be used for programming)
#pragma config CPD = OFF        // Data EEPROM Memory Code Protection bit (Data EEPROM code protection off)
#pragma config WRT = OFF        // Flash Program Memory Write Enable bits (Write protection off; all program memory may be written to by EECON control)
#pragma config CP = OFF         // Flash Program Memory Code Protection bit (Code protection off)

// INCLUDES
#include <xc.h>
#include <stdio.h>
#include <stdint.h>
#include 'setting.h'
#include 'lcd.c'

unsigned int readAdcV(void);
unsigned int readAdcA(void);
unsigned int readsetA(void);

float k = 0.00111242;

#define PROTEZIONE PORTCbits.RC2
#define RESET PORTCbits.RC1

void main(void)
{
  
    unsigned char i;
      
    settings();
    
    //Il display Ã¨ 4 righe per 20 colonne    
    LCD_INIT(); //Inizializza display LCD
    __delay_ms(100);
    LCD_CLEAR(); //Pulisce il display

    //LCD_GOTO(1,4); 
    //LCD_PUTS('LINEAR PSU'); 
    LCD_GOTO(1,5); 
    LCD_PUTS('13.8 V  15 A');
    LCD_GOTO(2,6);
    LCD_PUTS('LINEAR PSU');
    LCD_GOTO(3,10);
    LCD_PUTS('by');
    LCD_GOTO(4,5);
    LCD_PUTS('MPelectronics');
    __delay_ms(3000);
    LCD_CLEAR();
     
    
    while (1)
    {    
      LCD_GOTO(1,6);
      LCD_PUTS('LINEAR PSU');
    
      //VOLTMETRO : leggo la tensione presente su AN0 facendo la media di 3 letture
      ADCVavg=0;
      
      for (i=0;i<3;i++)
       {
           __delay_ms(1);
           ADCVavg+=readAdcV();
       }
                
       unsigned int ADCV_Value=ADCVavg/3; // leggo il valore covertito su AN0
       float Volt= (ADCV_Value*0.00488758)*10; // coverto il valore ADC letto in volt
        
       unsigned char volt[25]; 
       sprintf(volt,'%2.1f V ',Volt); // formatto il valore in volt tenendo 1 cifra decimale
       LCD_GOTO(2,1);
       LCD_PUTS('Vout = '); 
       LCD_PUTS(volt);//scrivo sul display il vare letto su AN0 in volt
        
       //AMPEROMETRO : leggo la tensione presente su AN1 facendo la media di 3 letture
       ADCAavg=0;
      
       __delay_ms(1);
       
       for (i=0;i<3;i++)
        {
            __delay_ms(1);
            ADCAavg+=readAdcA();
        }
                
        unsigned int ADCA_Value=ADCAavg/3; // leggo il valore covertito su AN0
        // coverto il valore ADC letto in ampere usando un fattore correttivo k per compensare errore circuito condizionamento 
        float Ampere= (ADCA_Value*0.006+k)*10; 
                                                
        unsigned char ampere[25]; 
        sprintf(ampere,'%2.1f A ',Ampere); // formatto il valore in ampere tenendo 1 cifra decimale
        LCD_GOTO(3,1);
        LCD_PUTS('Iout = '); 
        LCD_PUTS(ampere);//scrivo sul display il vare letto su AN1 in ampere
        
        
        //CURRENT LIMIT 0..15A: leggo la tensione presente su AN2 facendo la media di 3 letture
       ADCAsetavg=0;
      
       __delay_ms(1);
       
       for (i=0;i<3;i++)
        {
            __delay_ms(1);
            ADCAsetavg+=readsetA();
        }
                
        unsigned int ADCAset_Value=ADCAsetavg/3; // leggo il valore covertito su AN2
        float Ilimit_set= (ADCAset_Value*0.00488758)*3; // coverto il valore ADC letto in volt
                                                
        unsigned char Ilimit[25]; 
        sprintf(Ilimit,'%2.1f A ',Ilimit_set); // formatto il valore in ampere tenendo 1 cifra decimale
        LCD_GOTO(4,1);
        LCD_PUTS('Iout limit = '); 
        LCD_PUTS(Ilimit);//scrivo sul display il vare letto su AN2 in ampere
        
        if (Ampere>Ilimit_set)
        {
            PROTEZIONE = 1; //Se si supera il valore di corrente impostato stacca l'uscita
            x=1;
            LCD_CLEAR();
            
        }
        while (x)
        {
            
            LCD_GOTO(1,7);
            LCD_PUTS('OVERLOAD');
            LCD_GOTO(3,2);
            LCD_PUTS('Staccare il carico');
            LCD_GOTO(4,3);
            LCD_PUTS('e premere RESET');
            
        if (RESET) //Reset overcurrent
        {  
          __delay_ms(100);
           
          if (RESET)
               
        {
              
        PROTEZIONE = 0;    
        x=0;
        
       while(RESET);   
       __delay_ms(100);
        }  
        } 
        }    
 }
    return;
}
unsigned int readAdcV()
{
    setADC(0); // seleziono il canale adc AN0
            GO_nDONE=1; // avvio la conversione

            // ciclo di continuo fino a che ADGO non diventa zero, segnalandomi la fine conversione
            while(GO_nDONE)
                {continue;}
            
            // mi calcolo il valore numerico restituito dal convertitore
            // tenendo conto che ho scelto la giustificazione a destra
            valoreV=ADRESL + (ADRESH<<8);
            
            return(valoreV);
}

unsigned int readAdcA()
{
    setADC(1); // seleziono il canale adc AN1
            GO_nDONE=1; // avvio la conversione

            // ciclo di continuo fino a che ADGO non diventa zero, segnalandomi la fine conversione
            while(GO_nDONE)
                {continue;}
            
            // mi calcolo il valore numerico restituito dal convertitore
            // tenendo conto che ho scelto la giustificazione a destra
            valoreA=ADRESL + (ADRESH<<8);
            
            return(valoreA);
}

unsigned int readsetA()
{
    setADC(2); // seleziono il canale adc AN2
            GO_nDONE=1; // avvio la conversione

            // ciclo di continuo fino a che ADGO non diventa zero, segnalandomi la fine conversione
            while(GO_nDONE)
                {continue;}
                       
           // mi calcolo il valore numerico restituito dal convertitore
           // tenendo conto che ho scelto la giustificazione a destra
            valoresetA=ADRESL + (ADRESH<<8);
            
            return(valoresetA);
}