Czy wolisz polską wersję strony elektroda?
Nie, dziękuję Przekieruj mnie tamzumek napisał:xifyh napisał:... Nie wiem już czy ten czujnik jest uszkodzony czy ja coś xle robie
Może Twój DS , jest ustawiony do pracy w trybie termostatu.Spróbuj przełączyć go w tryb 1wire.
Piotrek
Nie wiem już czy ten czujnik jest uszkodzony czy ja coś xle robie
$regfile = "2313def.dat"
$crystal = 3579545
Config 1wire = Portd.6
Dim Ar As Byte
Dim Temperatur As Integer
Lcd "DS1821 an PD.6"
Wait 3
Cls
Lcd "Temp:"
Do
1wreset
1wwrite &HEE
Waitms 100
1wreset
1wwrite &HAA
Ar = 1wread()
1wwrite &H22
Locate 2 , 1
Temperatur = Ar
If Temperatur > 127 Then
Lcd "-"
Temperatur = 256 - Temperatur
Else
Lcd " "
End If
Lcd Temperatur;
Lcd " C "
Wait 1
Loop
End
crazy_phisic napisał:paciek74 a masz pewność że układ korzysta z oscylatora 3579545Hz? Przestawiłeś fuse bity zegara?
config 1wire= portd.6
Do
1wreset
if err=0 then
LCD "PP_OK"
else
LCD "PP_err" ' j/w
endif
waitms 500
Loop
