Membuat Alat Pengukur Suhu Dengan LM35

Membuat Alat Pengukur Suhu Dengan LM35

         Kali ini akan dibahas mengenai bagaimana cara membuat alat untuk mengukur suhu ruangan, sensor yang dipakai kali ini yaitu LM35 yang mana memiliki spesifikasi yaitu kenaikan tiap derajat celcius adalah 10mV sehingga jika dikalkulasi seperti berikut.

suhu 30 derajat = 300 mV = 0,30 volt

suhu 29 derajat =  290 mV = 0,29 volt

dan seterusnya

         dengan demikian kita akan tahu berapa suhunya dari output tegangan yang diberikan oleh sensor suhu LM35, sensor suhu ini sangat umum dipasaran yang harganya sekitar 12 ribu sampai 15 ribu rupiah sehingga sangat terjangkau untuk kantong mahasiswa, berbeda jika menggunakan sensor SHT11 yang harganya sampai 300 ribuan. Port mikrokontroller yang digunakan yaitu port ADC atau portA, karena portA bisa mendeteksi tegangan dan bisa dikonversikan menjadi digital atau angka berikut minimum system ATMega16 dan cara memasang LM35.

                                                 Minimum Sistem ATMega16 + LCD



Skema LM35

Program Bascom AVR

$regfile = "m16def.dat"
$crystal = 12000000

Config Lcdpin = Pin , Rs = Portc.0 , E = Portc.1 , Db4 = Portc.2
Config Lcdpin = Pin , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5
Config Lcd = 16 * 2

Config Adc = Single , Prescaler = Auto , Reference = Avcc

Dim Dataadc As Word
Dim Tegangan1 As Single
Dim Tegangan2 As Single
Dim Suhu As Single

Dim Suhu2 As String * 5
Dim Vol As String * 5


Start Adc

Cursor Off
Cls

Do
'untuk mengambil nilai adc di pinA,7
Dataadc = Getadc(7)

'konversi adc ke tegangan
Tegangan1 = Dataadc * 5

'1023 adalah adc 10 bit, 255 untuk adc 8 bit
Tegangan2 = Tegangan1 / 1023

'konversi tegangan ke celcius
Suhu = Tegangan2 * 100

'membulatkan menjadi 2 angka dibelakang koma
Vol = Fusing(tegangan2 , "#.##")
Suhu2 = Fusing(suhu , "#.#")


Locate 1 , 1
'Lcd "data ADC = " ; Dataadc
Lcd "Suhu = " ; Suhu2 ; " oC"


Locate 2 , 1
Lcd "Volt = " ; Vol

Loop




VIDEO HASILNYA