lm35

[saeidjan]

'Config Adc = Single , Prescaler = 128 , Reference = Internal
Enable Adcc
If Ss = 1 Then
Start Adc
Temp = Getadc(0)
Shift Temp , Right , 2

Stop Adc
Ts = Str(temp)
Ts = Format(ts , " ")

Locate 1 , 7
Lcd Ts
End If
خوب چون من میخواستم هر یک دقیقه یکبار دمای روی ال سی دی رفرش بشه به این شکل استفاده کردم اما با دستور شیفت که دیدی ما دقت عدد رو به 8 بیت کاهش میدیم تا دما رو با دقت تا دمای صحیح نمایش داده بشه. بهر حال پیکربندی و دستکاری بیتهای بدست آمده امیدوارم به منظورت برسی.
خوب حالا پایه خروجی اون سنسورت رو به یکی از پایه های میکرو مه تو دیتاشیت نوشته ADC وصل کن و از اون یک مقاومت 10 کیلو به زمین وصل کن. کار تموم شد عزیز ازش لذت ببر