Podłączenie czujnika DS 1820 do 89C2051 - wątpliwości dotyczące programu BASCOM
DS 1820 - BASCOM
From: "Michał K" <michal96_at_nospam_go2.pl>
Subject: DS 1820 - BASCOM
Date: Thu, 31 Aug 2000 10:43:16 GMT
Witam
Mam zamiar podłączyć czujnik temperatury DS 1820 do 89C2051. Mam przykład
programu z tym układem (AVT868), ale nie wszystko jest dla mnie jasne. Oto
fragment programu:
Declare Sub Read1820
Dim Bd(9) As Byte
Dim I As Byte , Tmp As Byte
Dim T As Integer , T1 As Integer
Dim X As Byte
Sub Read1820 ' reads sensor ans calculate
Waitms 250
Waitms 100 ' T for 0.1 C
1wreset ' reset the bus
1wwrite &HCC ' read internal RAM
1wwrite &HBE ' read 9 data bytest :DOTĄD ROZUMIEM
Bd(1) = 1wread(9) ' read bytes in array
1wreset ' reset the bus
Tmp = Bd(1) And 1 ' 0.1C precision :NIE WIEM O CO
CHODZI W TYCH OBLICZENIACH
If Tmp = 1 Then Decr Bd(1)
T = Makeint(bd(1) , Bd(2))
T = T * 50 : T = T - 25 : T1 = Bd(8) - Bd(7) : T1 = T1 * 100
T1 = T1 / Bd(8) : T = T + T1 : T = T / 10
X = T / 10
End Sub
Moje wątpliwości napisałem obok programu dużymi literami. Niemogę dojść co
robi instrukcja MAKEINT. I te obliczenia?
W jakiej odległości (długość przewodu) może być ten czujnik?
Jaki format jest danych wysyłanych przez ten czujnik (jak odczytać z niego
temperaturę z dokładnością 1 stopnia)?
Cześć
dzięki