#define OPEN_DRAIN 1

unsigned int One_Wire_Reset(GPIO_TypeDef * GPIOx, uint16_t PINx)
{
#if OPEN_DRAIN
unsigned int tmp;
PIN_ON(GPIOx, PINx);
if ((PIN_SYG(GPIOx, PINx))==0) return One_Wire_Bus_Low_Error;

PIN_OFF(GPIOx, PINx);
TIM6_Delay_us(480);
PIN_ON(GPIOx, PINx);
TIM6_Delay_us(60);

if ((PIN_SYG(GPIOx, PINx))==0) tmp=One_Wire_Success;
else tmp=One_Wire_Error_No_Echo;
TIM6_Delay_us(350);
return tmp;
#else
unsigned int tmp;
PIN_IN(GPIOx, PINx);
if ((PIN_SYG(GPIOx, PINx))==0) return One_Wire_Bus_Low_Error;

PIN_OUT_PP(GPIOx, PINx);
PIN_OFF(GPIOx, PINx);
TIM6_Delay_us(480);
PIN_ON(GPIOx, PINx);
PIN_IN(GPIOx, PINx);
TIM6_Delay_us(60);

if ((PIN_SYG(GPIOx, PINx))==0) tmp=One_Wire_Success;
else tmp=One_Wire_Error_No_Echo;
TIM6_Delay_us(350);
return tmp;
#endif
}

void One_Wire_Write_Byte(unsigned char Byte,GPIO_TypeDef * GPIOx, uint16_t PINx)
{
unsigned char cnt;
for (cnt=0;cnt!=8;cnt++)
One_Wire_Write_Bit(Byte&(1<<cnt),GPIOx, PINx);
}

void One_Wire_Write_Bit (unsigned char Bit, GPIO_TypeDef * GPIOx, uint16_t PINx)
{
#if OPEN_DRAIN
PIN_OFF(GPIOx, PINx);
if (Bit==0)
{
TIM6_Delay_us(60);
PIN_ON(GPIOx, PINx);
TIM6_Delay_us(10);
}
else
{
TIM6_Delay_us(10);
PIN_ON(GPIOx, PINx);
TIM6_Delay_us(60);
}
#else
PIN_OUT_PP(GPIOx, PINx);
PIN_OFF(GPIOx, PINx);
if (Bit==0)
{
//Delay_us(Time_Pulse_Delay_High);
TIM6_Delay_us(60);
PIN_ON(GPIOx, PINx);
//Delay_us(Time_Pulse_Delay_Low)
TIM6_Delay_us(10);
}
else
{
TIM6_Delay_us(10);
PIN_ON(GPIOx, PINx);
TIM6_Delay_us(60);
}
PIN_IN(GPIOx, PINx);
#endif
}

unsigned char One_Wire_Read_Byte(GPIO_TypeDef * GPIOx, uint16_t PINx)
{
unsigned char tmp=0;
unsigned char cnt;
for (cnt=0;cnt!=8;cnt++)
if (One_Wire_Read_Bit(GPIOx, PINx)!=0) tmp|=(1<<cnt);
TIM6_Delay_us(60);
return tmp;
}

unsigned char One_Wire_Read_Bit (GPIO_TypeDef * GPIOx, uint16_t PINx)
{
#if OPEN_DRAIN
unsigned char tmp;
PIN_OFF(GPIOx, PINx);
TIM6_Delay_us(2);
TIM6_Delay_us(10);
if ((PIN_SYG(GPIOx, PINx))!=0) tmp = 1;
else tmp = 0;
TIM6_Delay_us(60);
return tmp;
#else
unsigned char tmp;
PIN_OUT_PP(GPIOx, PINx);
PIN_OFF(GPIOx, PINx);
TIM6_Delay_us(2);
PIN_IN(GPIOx, PINx);
TIM6_Delay_us(10);
if ((PIN_SYG(GPIOx, PINx))!=0) tmp = 1;
else tmp = 0;
TIM6_Delay_us(60);
return tmp;
#endif
}

    PIN_OUT_PP(GPIOx, PINx);
    PIN_OFF(GPIOx, PINx);
    TIM6_Delay_us(2);
    PIN_IN(GPIOx, PINx);                  // <-- обратите внимание, тут нога перешла на ввод
    TIM6_Delay_us(10);
    if ((PIN_SYG(GPIOx, PINx))!=0)    tmp = 1;
}

    PIN_OFF(GPIOx, PINx);
    TIM6_Delay_us(2);
    TIM6_Delay_us(10);                  // а тут она осталась притянутой к нулю
    if ((PIN_SYG(GPIOx, PINx))!=0) tmp = 1;

    PIN_OFF(GPIOx, PINx);
    TIM6_Delay_us(2);
    PIN_ON(GPIOx, PINx);
    TIM6_Delay_us(10);                  // а тут она осталась притянутой к нулю
    if ((PIN_SYG(GPIOx, PINx))!=0) tmp = 1;

// Pin_out, Pin_in - ссылки на бит линии в bitband-области. Если процессор не поддерживает bitband, то можно вставить команды управления портом.
uint8_t one_wire::exchange(uint8_t in, uint_fast8_t bits)
{ // биты передаются начиная с младшего, принимаются в старший.
Shifter = in;
Bit_counter = bits;
{
TCritSect cs;
Pin_out = 0;
Timer->CR1 = 0
| 0 * (TIM_CR1_CKD & -TIM_CR1_CKD) // Dead-time clock, 0 = timer clock
| 0 * TIM_CR1_ARPE // ARR buffering
| 0 * (TIM_CR1_CMS & -TIM_CR1_CMS) // 0 = edge-aligned, 1...3 = center-aligned mode 1...3
| 0 * TIM_CR1_DIR // Direction, 0 = up, 1 = down
| 0 * TIM_CR1_OPM // One pulse mode, 1 = stop counter at update event
| 0 * TIM_CR1_URS // Update request source, 0 = any, 1 = only counter under-/overflow
| 0 * TIM_CR1_UDIS // Update event generation disabling
| 1 * TIM_CR1_CEN // Counter enable
;
}
Done_flag.wait();
return Shifter;
}

void one_wire::handler()
{
uint_fast16_t Status = Timer->SR;
Timer->SR = ~Status;

if(Status & TIM_SR_CC1IF) // bit output time
{
if(Shifter & (1 << 0))
Pin_out = 1;
Shifter >>= 1;
}

if(Status & TIM_SR_CC2IF) // bus sample time
{
if(Pin_in)
Shifter |= (1 << 7);
}

if(Status & TIM_SR_CC3IF) // bus release time
Pin_out = 1;

if(Status & TIM_SR_UIF) // end of slot
{
if(!--Bit_counter)
{
Timer->CR1 = 0; // stop timer
Timer->CNT = 0;
OS::TISRW ISR_wrapper;
Done_flag.signal_isr();
}
else
Pin_out = 0; // start new slot
}
}

bool one_wire::reset()
{
Mutex.lock();

Timer->ARR = T3_CLK / 2 * uint64_t(480 + 480) / (1000 * 1000); // slot time: 480 uS + 480 uS
Timer->CCR1 = T3_CLK / 2 * uint64_t(480) / (1000 * 1000); // bus release: 480 uS
Timer->CCR2 = T3_CLK / 2 * uint64_t(480 + 60) / (1000 * 1000); // bus sample: 480 + 60 uS
Timer->CCR3 = T3_CLK / 2 * uint64_t(480 + 480) / (1000 * 1000); // dummy

if(exchange((1 << 0), 1) & (1 <<7))
{
Mutex.unlock();
return false;
}

Timer->ARR = T3_CLK / 2 * uint64_t(15 + 45 + 45) / (1000 * 1000); // slot time: 15 + 45 + 45 uS
Timer->CCR1 = T3_CLK / 2 * uint64_t(9) / (1000 * 1000); // bit write: 9 uS
Timer->CCR2 = T3_CLK / 2 * uint64_t(18) / (1000 * 1000); // bus sample: 18 uS
Timer->CCR3 = T3_CLK / 2 * uint64_t(60) / (1000 * 1000); // bus release: 60 uS

return true;
}

uint8_t one_wire::receive()
{
return exchange(0xFF, 8);
}

bool one_wire::transmit(uint8_t data)
{
return exchange(data, 8) == data;
}