Atmega32 i ds18b20 PROBLEM

Witam

Mam następujący problem z Atmega32 i termometrem DS18b20, mianowicie na nóżce PD.7(poniżej wkleję kod w bascomie) mam cały czas 5V a termometry podłączane do tej nóżki ulegają spaleniu(już spaliłem 3 układy).

Kod obsługi termometru w bascomie:

$regfile = "m32def.dat" $crystal = 1000000 'korzysta z wbudowanego oscylatora Config Portd = output

Config 1wire = Portd.7 Dim Odczyt(2) As Byte

Declare Sub Odcz_temp

Do Call Odcz_temp Loop End

Sub Odcz_temp Wait 5

1wreset 1wwrite &HCC 1wwrite &H44 Waitms 750 1wreset 1wwrite &HCC 1wwrite &HBE Waitms 750 Odczyt(1) = 1wread(2) 1wreset If Err = 1 Then Cls 'Lcd "brak ukladu" Portd.5 = 1 Waitms 750 Else Portd.5 = 0 End If Odczyt(1) = Odczyt(1) / 2 End Sub

Do PD.5 podłączona jest dioda LED.

Próbowałem nóżkę PD.7 ustawić jako wejście jednak daje to ten sam efekt. Pomóżcie bo od 2 dni and tym siedzę i nie wiem co robić.