Hi,
I would like to use 1-wire temperature measurement in my home but have not found a suitable and discrete temperature probe, i.e., one that my wife would let me put in the public rooms !
Can people please tell me what they are using or how they hide their temperature probes so that they are not too obvious/ugly ?
regards
Dave
Room temperature monitors
Room temperature monitors
Instead of 1-wire part, I have used cheap( $.6)10K-Ohm thermistor with 1K pull up that can be accurate to within .25 Degree C.
I could not upload the .pdf file, but here is the Basic listing for
temperature sensing.
- - - - - - - - - - - -
Const Device = CB280
Input 24
Dim ain As Integer
Do
ain=Adin(0)
Debug Goxy,1,1
Debug "Current Temp in the cave: ",Float GetTemp(ain)
Delay 100
Loop
End
Function GetTemp(inp As Integer) As Single
Dim Voltage As Single
Dim R2 As Single
Dim T2 As Single
Voltage= (inp*5.0)/1024
'Using 10K resistor, so 10000
R2=(10000*Voltage)/(5-Voltage)
'Max's Magic Formula for Thermistors!
T2=1/((1/298.15)-((Log(10000/R2)/Exp(1))/4100))
'Convert Kelvin to Celcius degrees.
T2=T2-273.15
GetTemp=T2
End Function
- - - - - - -
You might check ComfileTech website http://cubloc.com/data/01.php
for more detail. There is a table lookup version that does not need
the math functions, but is only accurate to +/-.5C.
Good Luck
Steve
Stephen Yang
Sunnyvale, CA 94089
U.S.A.
I could not upload the .pdf file, but here is the Basic listing for
temperature sensing.
- - - - - - - - - - - -
Const Device = CB280
Input 24
Dim ain As Integer
Do
ain=Adin(0)
Debug Goxy,1,1
Debug "Current Temp in the cave: ",Float GetTemp(ain)
Delay 100
Loop
End
Function GetTemp(inp As Integer) As Single
Dim Voltage As Single
Dim R2 As Single
Dim T2 As Single
Voltage= (inp*5.0)/1024
'Using 10K resistor, so 10000
R2=(10000*Voltage)/(5-Voltage)
'Max's Magic Formula for Thermistors!
T2=1/((1/298.15)-((Log(10000/R2)/Exp(1))/4100))
'Convert Kelvin to Celcius degrees.
T2=T2-273.15
GetTemp=T2
End Function
- - - - - - -
You might check ComfileTech website http://cubloc.com/data/01.php
for more detail. There is a table lookup version that does not need
the math functions, but is only accurate to +/-.5C.
Good Luck
Steve
Stephen Yang
Sunnyvale, CA 94089
U.S.A.