Temperaturmessung mit KTY10

[Roberto]

Hallo

Habe mir das jetzt so gelöst  

 Dim Ad0 As Word
 Dim A As Long

Ad0 = Getadc(0)
A = Ad0 - 491
A = A * 63
A = A / 100
A = A + 22

LCD A

0,63 (63/100) ist der ADC-Wert pro Grad Celsius zwischen 22 und 90 Grad
491 ist der ADC-Wert bei 22 Grad