Asi si budeš muset vyrobit nějakou tabulku na převod odporu na teplotu.
Nevím jaký potřebuješ teplotní rozsah.
Nebo zkusit takový LM35(není zrovna levný), LM335...
jen pro inspiraci -
http://www.avrprojects.net/articles.php?lng=en&pg=62
jen jsem si tak trochu hrál:
'-------------------------------------------------------------------
'
' TEPLOMĚR S LM335 -40°C - 100°C
'
' LM335 měří teplotu ve stupních Kelvina
' je proto třeba provést konverzi na stupně Celsia
'
' zapojení viz katalogový list
'-------------------------------------------------------------------
'-------------------------------------------------------------------
' Základní nastavení pro zkušební desku MEGA 8535
' (c)
nekmil@cbox.cz
'
'-------------------------------------------------------------------
$regfile = "M8535.DAT"
$crystal = 60000000
$hwstack = 32
$swstack = 10
$framesize = 40
$baud = 19200
'$sim 'pouze pro simulaci pro nahrání do procesoru vypnout(komentářem ')
'-------------------------------------------------------------------
'připojeni displeje standardně na Port A
'zde připojeno na PORTC protože na PORTA jsou vstupy AD převodníku
Config Lcdpin = Pin , Db4 = Portc.4 , Db5 = Portc.5 , Db6 = Portc.6 , _
Db7 = Portc.7 , E = Portc.1 , Rs = Portc.0
'Typ Displeje
Config Lcd = 16 * 2
Cls
Cursor Off
'-------------------------------------------------------------------
Dim Temp As String * 4
Dim K As Single , W As Word , V As Single
Config Adc = Single , Prescaler = Auto , Reference = Avcc 'config ADC
K = 0.004882 'K=Reference/1024
Start Adc
Locate 1 , 2
Lcd "TEPLOMER LM335"
'zde budeme měřit napětí na senzoru
Do
W = Getadc(0) 'W obsahuje hodnotu po převodu, ADC(0)<-> PA.0
V = K * W 'vynásobíme konstantou
V = V - 2.7315 'zde převedeme Kelvin na Celsius
V = V * 100
Temp = Fusing(v , "#.#") 'zaokrouhlíme na 1 desetinné místo
Locate 2 , 5
Lcd Temp ; " " ; Chr(&Hdf) ; "C" ' zobrazení vypadá asi takto "25,6 °C"
Loop
End 'end program
Díky
a dokonce v °C