#include "i2c.h"

const int8 TCN75_SLAVE_ADDRESS = 0x9E;   // A0=A1=A2=VCC;

const int8 TCN75_TEMP_REG = 0x00;
const int8 TCN75_CONFIG_REG = 0x01;
const int8 TCN75_THYST_REG = 0x02;
const int8 TCN75_TSET_REG = 0x03;

const int8 TCN75_SHUTDOWN_MODE = 0x01;
const int8 TCN75_ONE_SHOT_MODE = 0x81;
const int8 TCN75_CONTINUOUS_MODE = 0x00;


/*
   ReadTCN75() ïðî÷èòà òåìïåðàòóðàòà îò ñåíçîð TCN75-5.0MUA
   Ïðîìåíÿ i2cslave àäðåñà !
   Ïîäïðîãðàìàòà å èçòåñòâàíà è ðàáîòè êîðåêòíî.
*/
int16 ReadTCN75(int8 RegisterPointer)   {
int16 tcn75;
#byte tcn75_low=tcn75
#byte tcn75_high=tcn75+1
   RegisterPointer &= 0x03;
   i2cslave = TCN75_SLAVE_ADDRESS;      
   I2CClearColision();
   I2CIsFree();                  // If I2C is free ?
   if(   i2c_error )
      return 0;                  // bus is busy !
   I2CStart();                     // Send Start signal
   I2CWrite( i2cslave );            // Slave address, set Write operation
   if( i2c_error )
      return 0;
   I2CWrite( RegisterPointer );      // Pointer byte, select TEMP register
   if( i2c_error )
      return 0;
   I2CRepStart();                  // Second Start ...
   if( i2c_error )
      return 0;                  // bus is busy !
   if( RegisterPointer == TCN75_CONFIG_REG ) {
      tcn75_low = 0;
      tcn75_high = I2CRead();
   } else {
      tcn75_high = I2CRead();
      tcn75_low = I2CRead();
   }
   I2CWriteNotAck();               // Send Not Acknowledge signal
   I2CStop();                     // Generate Stop condition

   if( RegisterPointer == TCN75_TEMP_REG ) {
      // Ðîòàöèÿòà â öèêúë å ïî-åôåêòèâíà êàòî êîä ñ 22 áàéòà,
      // çàòîâà ñå èçïîëçâà âìåñòî return 0.5 * (tcn75 >> 7);
      i2ccount = 7;
      do {
         tcn75 >>= 1;
      } while( --i2ccount );
   }
   return tcn75;
}

void WriteTCN75(int8 RegisterPointer,int8 value)   {
   RegisterPointer &= 0x03;
   i2cslave = TCN75_SLAVE_ADDRESS;      
   I2CClearColision();
   I2CIsFree();                  // If I2C is free ?
   if(   i2c_error )
      return;                     // bus is busy !
   I2CStart();                     // Send Start signal
   I2CWrite( i2cslave );            // Slave address, set Write operation
   if( i2c_error )
      goto WriteTCN75End;
   I2CWrite( RegisterPointer );      // Pointer byte, select TEMP register
   if( i2c_error )
      goto WriteTCN75End;
   I2CWrite( value );
WriteTCN75End:
   I2CStop();                     // Generate Stop condition
}

inline void TCN75_ShutDownMode(void) {
   WriteTCN75( TCN75_CONFIG_REG, TCN75_SHUTDOWN_MODE );
}

inline void TCN75_NotShutDownMode(void) {
   WriteTCN75( TCN75_CONFIG_REG, 0 );
}

inline void TCN75_Init(void) {
   WriteTCN75( TCN75_CONFIG_REG, 0x1A );   // TB052 Microchip app note ???
}

#if ch1_sensor == SENSOR_TCN75
                  I2CInitMaster();
                  TCN75_NotShutDownMode();                  
                  delay_ms(10);
                  an1.result = ReadTCN75( TCN75_TEMP_REG );
                  TCN75_ShutDownMode();
                  SSPEN = 0;
                  if( an_hex_mode )
                     ShowAnalogAsHex( &an0.result );
                  else
                     CalcTemperature( 1 );
#endif

#if ch1_sensor == SENSOR_TCN75
                  I2CInitMaster();
                  TCN75_ShutDownMode();      
            delay_ms(10);
                  an1.result = ReadTCN75( TCN75_TEMP_REG );
                  TCN75_NotShutDownMode();
                  SSPEN = 0;
                  if( an_hex_mode )
                     ShowAnalogAsHex( &an0.result );
                  else
                     CalcTemperature( 1 );
#endif

         .....
         if( RegisterPointer == TCN75_CONFIG_REG ) {
      tcn75_low = 0;
      tcn75_high = I2CRead();
   } else {
      tcn75_high = I2CRead(); I2CWriteAck();
      tcn75_low = I2CRead();
   }
          .....