define I2C_DELAY 40  //ms
#define debug

//*** Формирование старт-бита
// <-- если 0 - линия занята, иначе - передан старт
unsigned char i2c_start (void)
{
  unsigned char Res = 1;
 
  CBI(I2C_DDR, I2C_SDA);
  if (GBI(I2C_PIN, I2C_SDA))  // проверка на ошибку линии
  {
    // устанавливаем лог 1 на линии SCL за счет подтягивающих резисторов
    CBI(I2C_DDR, I2C_SCL);
    CBI(I2C_PORT, I2C_SCL);
    delay_us(I2C_DELAY);
   
    // устанавливаем лог 0 на линии SDA за счет защелки
    SBI(I2C_DDR, I2C_SDA);
    CBI(I2C_PORT, I2C_SDA);
    delay_us(I2C_DELAY);

    // устанавливаем лог 0 на линии SCL за счет защелки
    SBI(I2C_DDR, I2C_SCL);
    delay_us(I2C_DELAY);
  }
  else
    Res = 0;
 
  return Res;
}

//*** Формирование стоп-бита
void i2c_stop (void)
{
  // устанавливаем лог 0 на линии SDA за счет подтягивающих резисторов
  SBI(I2C_DDR, I2C_SDA);
  CBI(I2C_PORT, I2C_SDA);
  delay_us(I2C_DELAY);
   
  // устанавливаем лог 1 на линии SCL за счет защелки
  SBI(I2C_DDR, I2C_SCL);
  CBI(I2C_PORT, I2C_SCL);
  delay_us(I2C_DELAY);

  // устанавливаем лог 1 на линии SDA за счет защелки
  CBI(I2C_DDR, I2C_SDA);
  delay_us(I2C_DELAY);
}
unsigned char i2c_write_byte(u8 Data)
{
  unsigned char Res = 0;

  CBI(I2C_PORT, I2C_SCL);
  CBI(I2C_PORT, I2C_SDA);

  for (u8 i = 0; i < 8; i++)
  {
    SBI(I2C_DDR, I2C_SDA);
    if (Data & 0x80)
      CBI(I2C_DDR, I2C_SDA);

    delay_us(I2C_DELAY);
   
    // устанавливаем лог 1 на линии SCL за счет подтягивающих резисторов
    CBI(I2C_DDR, I2C_SCL);
    delay_us(I2C_DELAY);
   
    // устанавливаем лог 0 на линии SCL за счет подтягивающих резисторов
    SBI(I2C_DDR, I2C_SCL);
    delay_us(I2C_DELAY);
    Data <<= 1;
  }
   
  CBI(I2C_DDR, I2C_SDA);
  delay_us(I2C_DELAY);
 
  // устанавливаем лог 1 на линии SCL за счет подтягивающих резисторов
  CBI(I2C_DDR, I2C_SCL);
  delay_us(I2C_DELAY);
   
  Res = GBI(I2C_PIN, I2C_SDA);
 
  // устанавливаем лог 0 на линии SCL за счет подтягивающих резисторов
  SBI(I2C_DDR, I2C_SCL);
  delay_us(I2C_DELAY);

  SBI(I2C_DDR, I2C_SDA);
  delay_us(I2C_DELAY);
 
  return Res;
}

//*** Чтение байта из I2C
// --> Ack > 0 - генерировать, иначе - нет
// <-- принятые данные
unsigned char i2c_read_byte(u8 Ack)
{
  unsigned char Res=0;
 
  CBI(I2C_DDR, I2C_SDA);
  CBI(I2C_PORT, I2C_SDA);
 
  for(u8 x=0; x<8; x++)
  {
    Res <<= 1;
    CBI(I2C_DDR, I2C_SCL);
    delay_us(I2C_DELAY);

    if(GBI(I2C_PIN, I2C_SDA))
      Res |= 1;
   
    SBI(I2C_DDR, I2C_SCL);
    delay_us(I2C_DELAY);
  }
 
  if(Ack)
    SBI(I2C_DDR, I2C_SDA);
  else
    CBI(I2C_DDR, I2C_SDA);
 
  delay_us(I2C_DELAY);
 
  CBI(I2C_DDR, I2C_SCL);
  delay_us(I2C_DELAY);

  SBI(I2C_DDR, I2C_SCL);
  CBI(I2C_DDR, I2C_SCL);
  return Res;
}

//*** Инициализация интерфейса I2C
void i2c_init( void )
{
  CBI(I2C_DDR, I2C_SDA);
  CBI(I2C_DDR, I2C_SCL);
 
  CBI(I2C_PORT, I2C_SDA);
  CBI(I2C_PORT, I2C_SCL);
}