Sekilas tentang Akuisisi Data Suhu dengan ADC Internal Mikrokontroller ATMEGA 8535 (bagian 1), bahwa salah satu fitur yang telah dimiliki oleh mikrokontroler adalah mampu untuk melakukan konversi sinyal analog menjadi sinyal dalam level digital (Analog to Digital Inverter).
Dibagian kedua ini, mungkin lebih akan dibahas tentang bentuk rangkain serta program yang akan dibuat:
Berikut rangkaiannya:
Untuk bentuk rangkaiannya system minimum mikrokontroler dapat dibaca diartikel system minimum mikrokontroler ATMEGA 8535. Lalu dihubungkan dengan output berupa LCD 16 x 2 yang dihubung kan dengan portB pada mikrokontroler. Di pin A.0 (kita ketahui bahwa ADC pada mikrokontroler terletak di portA).
Berikut rangkain sensor suhu dengan LM 35
Lakukan pengukuran ketika suhu ruangan 0 derajat berapa tegangan yang masuk ke mikrokontroler, lalu lakukan pula pengukuran ketika suhu ruangan 100 derajat celcius.
Ketika sudah kita dapatkan tegangan referensi tersebut, masukkan di rumus ADC, sehingga di dapatkan program:
$regfile = "8535def.dat" ' specify the used micro
$crystal = 1000000
Config Lcdpin = Pin , Db4 = Portb.3 , Db5 = Portb.2 , Db6 = Portb.1 , Db7 = Portb.0 , E = Portb.4 , Rs = Portb.5
Config Lcd = 16 * 2
Config Adc = Single , Prescaler = Auto
Start Adc
Cursor Off
Config Portd = Output
Dim Adc1 As Word
Dim Suhu1 As Integer
Do
Cls
Adc1 = Getadc(1)
Suhu1 = Adc1 * 2,4
Locate 1 , 1
Lcd "suhu=" ; Suhu1
Loop
Sekian, semoga bermanfaat
Salam santun..
keyword: belajar ADC, ADC Internal ATMega 8535, Analog to digital converter, program ADC, mengukur suhu, ADC suhu
Dibagian kedua ini, mungkin lebih akan dibahas tentang bentuk rangkain serta program yang akan dibuat:
Berikut rangkaiannya:
Gambar 1. Rangkain Sensor suhu Lm 35
Berikut rangkain sensor suhu dengan LM 35
Lakukan pengukuran ketika suhu ruangan 0 derajat berapa tegangan yang masuk ke mikrokontroler, lalu lakukan pula pengukuran ketika suhu ruangan 100 derajat celcius.
Ketika sudah kita dapatkan tegangan referensi tersebut, masukkan di rumus ADC, sehingga di dapatkan program:
$regfile = "8535def.dat" ' specify the used micro
$crystal = 1000000
Config Lcdpin = Pin , Db4 = Portb.3 , Db5 = Portb.2 , Db6 = Portb.1 , Db7 = Portb.0 , E = Portb.4 , Rs = Portb.5
Config Lcd = 16 * 2
Config Adc = Single , Prescaler = Auto
Start Adc
Cursor Off
Config Portd = Output
Dim Adc1 As Word
Dim Suhu1 As Integer
Do
Cls
Adc1 = Getadc(1)
Suhu1 = Adc1 * 2,4
Locate 1 , 1
Lcd "suhu=" ; Suhu1
Loop
Sekian, semoga bermanfaat
Salam santun..
keyword: belajar ADC, ADC Internal ATMega 8535, Analog to digital converter, program ADC, mengukur suhu, ADC suhu
suhu1 = adc1*2,4 ??
BalasHapuskok di kali 2,4 y mas ??
mas imam: sesuai dengan hasil kalibrasi kita
BalasHapusnumpang nanya mas win.....
BalasHapuslisting di atas kalau mau di tambah 2tombol seting sebagai pembatas suhu terendah dan tertinggi.contohnya tombol 1 untuk menentukan seting suhu tertinggi dan tombol 2 untuk menentukan setting suhu terendah. bagaimana cara penulisan listingnya mas?????sebelumnya terima kasih atas penjelasannya.......
salam!!!