#define fospEEPROM_ADR  0xa0    // EEPROM device address
#define fospADC_ADR       0xee    // ADC device address

//#############################################################
// Чтение калибровочных коэффициентов EEPROM (FOSP01-A)
//_____________________________________________________________________________
void fosp01RxCoeff(unsigned char n)
{
  Send_start();
  Send_addr(fospEEPROM_ADR+W);    // EEPROM write address 0xA0
  Send_byte(n);                   // EEPROM coefficient address

  Send_start();
  Send_addr(fospEEPROM_ADR+R);    // EEPROM read address 0xA1

  C1 = ((unsigned int)Rx_byte(ACK) << 8) + Rx_byte(ACK);  // 16:17
  C2 = ((unsigned int)Rx_byte(ACK) << 8) + Rx_byte(ACK);  // 18:19
  C3 = ((unsigned int)Rx_byte(ACK) << 8) + Rx_byte(ACK);  // 20:21
  C4 = ((unsigned int)Rx_byte(ACK) << 8) + Rx_byte(ACK);  // 22:23
  C5 = ((unsigned int)Rx_byte(ACK) << 8) + Rx_byte(ACK);  // 24:25
  C6 = ((unsigned int)Rx_byte(ACK) << 8) + Rx_byte(ACK);  // 26:27
  C7 = ((unsigned int)Rx_byte(ACK) << 8) + Rx_byte(ACK);  // 28:29
  A = Rx_byte(ACK);    // 30
  B = Rx_byte(ACK);    // 31
  C = Rx_byte(ACK);    // 32
  D = Rx_byte(NACK);   // 33  last byte must NACK

  Send_stop();
}


//####################################################
// Чтение данных АЦП (FOSP01-A)
//___________________________________________________________________
unsigned int fosp01RxValue(unsigned char n)
{
  unsigned int temp;

  Send_start();
  Send_addr(fospADC_ADR+W);   // ADC device write address 0xEE
  Send_byte(0xff);
  Send_byte(n);               // Pressure(0xF0), Temperature(0xE8)
  Send_stop();

  delay_ms(100);

  Send_start();
  Send_addr(fospADC_ADR+W);   // ADC device write address 0xEE
  Send_byte(0xfd);
  Send_start();
  Send_addr(fospADC_ADR+R);   // ADC device read address 0xEF
  temp = ((unsigned int)Rx_byte(ACK) << 8) + Rx_byte(NACK);

  Send_stop();

  return temp;
}

//___________________________________________________
void PressureTemperatureMeasure(void)
{
  unsigned int D1,D2;      // pressure, temperature
  long dUT;
  long off,sens,x;            // offset, sensivity

  fosp01RxCoeff(16);

  D1 = fosp01RxValue(0xf0);   // measured pressure
  D2 = fosp01RxValue(0xe8);   // measured temperature
...............
}

void main(void)
.......
  fosp01Init();
.......
PressureTemperatureMeasure();
......
}

/////////////////
void fosp01Init(void)
{
  DDRD |= (1<<XCLR);      //XCLR - на выход

  PORTD &= ~(1<<XCLR);
  delay_ms(100);
  PORTD |= (1<<XCLR);     //сброс FOSP01-A
}

void fosp01Init(void)
{
  DDRD |= (1<<XCLR);      //XCLR - на выход

  PORTD &= ~(1<<XCLR);  //XCLR=0
  delay_ms(100);                //пауза 100мсек
  PORTD |= (1<<XCLR);     //XCLR=1
}

#define fospEEPROM_ADR  0xa0    // EEPROM device address
#define fospADC_ADR     0xee    // ADC device address
#define PRESSURE        0xf0
#define TEMPERATURE     0xe8
#define mm_rt_st        0.7500638    // мм. рт. ст. (@ 0 гр. C)
//#############################################################################
// Инициализация FOSP01-A
//_____________________________________________________________________________
void fosp01Init(void)
{
  port &= ~(1<<XCLR);   //Сброс FOSP01-A
  __delay_cycles(1000);
  port |= (1<<XCLR);
  __delay_cycles(1000);
  port &= ~(1<<XCLR);
  __delay_cycles(1000);

  fosp01RxCoeff();

// с1=20694;
// c2=1843;
// c3=218;
// c4=168;
// c5=28936;
// c6=5923;
// a=3;
// b=22;
// c=6;
// d=12;
}

//#############################################################################
// Чтение калибровочных коэффициентов из EEPROM (FOSP01-A)
//_____________________________________________________________________________
void fosp01RxCoeff(void)
{
  unsigned char ret, HiTemp, LowTemp;

  ret = i2c_start(fospEEPROM_ADR|W);    // EEPROM write address 0xA0
  
  if(ret)
  {
    // failed to issue start condition, possibly no device found
    i2c_stop();
  }  
  else
  {
    i2c_write(16);                       // EEPROM coefficient address
    i2c_rep_start(fospEEPROM_ADR|R);    // EEPROM read address 0xA1
    
    HiTemp=i2c_read(ACK);        
    LowTemp=i2c_read(ACK);              //Считываем коэффициенты
    c1 = (((unsigned int)HiTemp) << 8) + LowTemp;  // 16:17
        
    HiTemp=i2c_read(ACK);        
    LowTemp=i2c_read(ACK);
    c2 = (((unsigned int)HiTemp) << 8) + LowTemp;  // 18:19
    
    HiTemp=i2c_read(ACK);        
    LowTemp=i2c_read(ACK);    
    c3 = (((unsigned int)HiTemp) << 8) + LowTemp;  // 20:21
    
    HiTemp=i2c_read(ACK);        
    LowTemp=i2c_read(ACK);    
    c4 = (((unsigned int)HiTemp) << 8) + LowTemp;  // 22:23
    
    HiTemp=i2c_read(ACK);        
    LowTemp=i2c_read(ACK);    
    c5 = (((unsigned int)HiTemp) << 8) + LowTemp;  // 24:25
    
    HiTemp=i2c_read(ACK);        
    LowTemp=i2c_read(ACK);    
    c6 = (((unsigned int)HiTemp) << 8) + LowTemp;  // 26:27
    
    HiTemp=i2c_read(ACK);        
    LowTemp=i2c_read(ACK);    
    c7 = (((unsigned int)HiTemp) << 8) + LowTemp;  // 28:29
    
    a = i2c_read(ACK);    // 30
    b = i2c_read(ACK);    // 31
    c = i2c_read(ACK);    // 32
    d = i2c_read(NACK);   // 33  last byte must NACK

    i2c_stop();
  }
}

//#############################################################################
// Чтение данных АЦП (FOSP01-A)
//_____________________________________________________________________________
unsigned int fosp01RxValue(unsigned char n)
{
  unsigned char ret, HighTemp, LowTemp;
  unsigned int temp;
  
  ret=i2c_start(fospADC_ADR|W);   // ADC device write address 0xEE
    
  if(ret)
  {
    // failed to issue start condition, possibly no device found
    i2c_stop();
  }  
  else
  {
    i2c_write(0xff);
    i2c_write(n);                 // Pressure(0xF0), Temperature(0xE8)
    i2c_stop();
  
    delay_ms(50);
  
    i2c_start(fospADC_ADR|W);     // ADC device write address 0xEE
    i2c_write(0xfd);
  
    i2c_rep_start(fospADC_ADR|R); // ADC device read address 0xEF
    
    HighTemp=i2c_read(ACK);        
    LowTemp=i2c_read(NACK);  
    temp = (((unsigned int)HighTemp)<<8) + LowTemp;
  
    i2c_stop();
  }

  return temp;
}

//#############################################################################
// Вычисление температуры и атмосферного давления
// с учетом калибровочных коэффициентов
//   input  -> D1,D2,C1---C7,A,B,C,D
//  output -> Press, unit: 0.01 hpa
//                Temp, unit: 0.1 C
//_____________________________________________________________________________
void PressureTemperatureMeasure(void)
{
  double dUT;
  double off, sens, x;        // offset, sensivity
  
  unsigned long SumValueAD=0;
  
  port |= (1<<XCLR);
  __delay_cycles(1000);  

  d1 = fosp01RxValue(PRESSURE);      // measured pressure
  SumValueAD += d1;
  d1 = fosp01RxValue(PRESSURE);      
  SumValueAD += d1;
  d1 = fosp01RxValue(PRESSURE);    
  SumValueAD += d1;
  d1 = fosp01RxValue(PRESSURE);    
  SumValueAD += d1;
  d1 = SumValueAD >>2;
  d2 = fosp01RxValue(TEMPERATURE);   // measured temperature

// d1=40506;
// d2=29136;

  port &= ~(1<<XCLR);
  
  printf_P("\n\r Измеренное абсолютное давление D1:   %u", d1);
  printf_P("\n\r Измеренная температура возле датчика D2:   %u", d2);

  if(d2 >= c5) dUT = (d2-c5) - (((d2-c5)/pow(2,7))*((d2-c5)/pow(2,7))*a)/pow(2,c);  
  else         dUT = ((double)d2-c5) - (((double)d2-c5)/pow(2,7))*(((double)d2-c5)/pow(2,7))*b/pow(2,c);

  t = (250 + ((dUT*c6)/pow(2,16)) - dUT/pow(2,d))/10; // calculate final temperature value ( C)
  
  //OFF = (C2+(C4-1024)*DUT/Get2_x(14))*4;
  off = (c2+(c4-1024)*dUT/pow(2,14))*4;     // calculate offset
  
  //SENS = C1+C3*DUT/Get2_x(10);
  sens = c1+(c3*dUT)/pow(2,10);             // calculate sensivity
  
  //X = SENS*(D1-7168)/Get2_x(14)-OFF;
  x = (sens*(d1-7168))/pow(2,14)-off;
  
  //Press = X*100/Get2_x(5)+C7*10;
  p = ((x*100/pow(2,5)+c7*10)/100)*mm_rt_st;    // calculate final pressure value (мм. рт. ст.)

  printf_P("\n\r Пересчитанное абсолютное давление : %f, мм. рт. ст.", p);
  printf_P("\n\r Пересчитанная температура возле датчика: %f, C", t);
}

//=============================================================================
void calculate(void)
{
  delay_ms(50);
  
  fosp01RxCoeff();
  
  while(1)
  {
     PressureTemperatureMeasure();
     delay_ms(1000);
  }
}