Ow_Reset(PORTC, 0)                   ' Onewire reset signal
      Ow_Write(PORTC, 0, 0xCC)             ' Issue command SKIP_ROM
      Ow_Write(PORTC, 0, 0x44)             ' Issue command CONVERT_T
      Delay_ms(750)

      Ow_Reset(PORTC, 0)
      Ow_Write(PORTC, 0, 0xCC)             ' Issue command SKIP_ROM
      Ow_Write(PORTC, 0, 0xBE)             ' Issue command READ_SCRATCHPAD

      temp =  Ow_Read(PORTC, 0)
      temp = (Ow_Read(PORTC, 0) << 8) + temp

      Display_Temperature(temp)      

sub procedure Display_Temperature( dim temp2write as word )
const RES_SHIFT = TEMP_RESOLUTION - 8

dim temp_whole as byte
    temp_fraction as word

    text = ""
    ' Check if temperature is negative
    if (temp2write and 0x8000) then
      text[0] = "-"
      temp2write = not temp2write + 1
    end if

    ' Extract temp_whole
    temp_whole = word(temp2write >> RES_SHIFT)

    text[1] = (temp_whole div 10)mod 10 + 48               ' Extract tens digit
    text[2] =  temp_whole mod 10        + 48               ' Extract ones digit

    ' Extract temp_fraction and convert it to unsigned int
    temp_fraction  =  word(temp2write << (4-RES_SHIFT))
    temp_fraction  = temp_fraction and 0x000F
    temp_fraction  = temp_fraction * 625

    ' Convert temp_fraction to characters
    text[3] = word(temp_fraction div 1000)    + 48         ' Extract thousands digit
    'bytetostr (text ,cc)
     fff = text[1]
     fff = fff - 48

     uuu = text[2]
     uuu = uuu - 48

     ttt = text[3]
     ttt = ttt - 48

     vvv = text[0]
end sub

    LCD_Init();
    LCD_ConstTextOut(0,0,"DS18B20");
    LCD_ConstTextOut(1,0,"   .  ");LCD_CharOut(0x27);LCD_CharOut('C');

//----------------------------------------------------------------------- main()
    while(ds18x20_res()){
        ds18x20_wr(SKIP_ROM);
        ds18x20_wr(CONV_T);
        __delay_ms(750);
        ds18x20_res();
        ds18x20_wr(SKIP_ROM);
        ds18x20_wr(RD_SCRATCH);
//        __delay_ms(1);
        ds18x20_rdTemp();
        if(ds18x20.t_int < 0)
            LCD_ValueOut_00(1,0,ds18x20.t_int,2);
        else
            LCD_ValueOut_00(1,0,ds18x20.t_int,3);
        LCD_ValueOut_00(1,4,ds18x20.t_dec,1);
    }
    LCD_ConstTextOut(1,0," ERROR  ");
    while(1){;}

ds18x20_t ds18x20;
uint8_t ds18x20_data[9];

uint8_t ds18x20_res(void)
{
    uint8_t rec;
    
    DS18X20_OUT = 0;    // set the (I)O to low level
    DS18X20_DIR = 0;    // config as output (-> low)
    __delay_us(480);    // reset pulse >=480 us
    DS18X20_DIR = 1;    // config as input (high-z -> pull up)
    __delay_us(80);
    rec = ~DS18X20_IN;  // read the level (if low, slave available)
    __delay_us(400);    // wait for end of slot
    return (rec);
}

void ds18x20_wr(uint8_t value)
{
    for(uint8_t i = 0; i < 8; i++){
        DS18X20_DIR = 0;
        __delay_us(1);
        if(value & 0x01){ DS18X20_DIR = 1; }
        __delay_us(60);
        DS18X20_DIR = 1;
        value = value >> 1;
    }
}

uint8_t ds18x20_rd(void)
{
    uint8_t value = 0;
    
    for(uint8_t i = 0; i < 8; i++){
        DS18X20_DIR = 0;
        __delay_us(1);
        DS18X20_DIR = 1;
        __delay_us(9);
        value |= DS18X20_IN << i;
        __delay_us(51);             // 60+1 us minimum
    }
    return value;
}

int8_t ds18x20_rdTemp(void)
{
        for(uint8_t i = 0; i < 9; i++){
            ds18x20_data[i] = ds18x20_rd();
        }
        ds18x20.t_int = *(int16_t *)&ds18x20_data[0] >> 4;  
        ds18x20.t_dec = ((ds18x20_data[0] & 0x0F)*10) >> 4;
        if(ds18x20.t_int < 0)
            ds18x20.t_dec = 9 - ds18x20.t_dec;
        return ds18x20.t_int;
}

typedef enum {
    CONV_T          = 0x44,
    RD_SCRATCH      = 0xBE,
    WR_SCRATCH      = 0x4E,
    COPY_SCRATCH    = 0x48,
    RECALL_EE       = 0xB8,
    RD_PWR_SUPLY    = 0xB4,
    SKIP_ROM        = 0xCC,
    FIND_ROM        = 0xF0,
    RD_ROM          = 0x33,
    MATCH_ROM       = 0x55,
    FIND_ALRM       = 0xEC
}DS18x20_Command_t;

typedef struct{
    uint8_t  t_dec;
    int8_t t_int;
}ds18x20_t;