Digital Thermometer Tampilan “Bargraph” dengan Mikrokontroler AVR
Pernah saya posting disini tentang membaca suhu dengan sensor LM35. Hasilnya ditampilkan ke LCD dan dikirim ke komputer. Aplikasi mikrokontroler yang sekarang ini kita tambah tampilannya ke dalam bargraph.
Pakai LCD biasa, ukuran 16×2. Di baris pertama kita buat bargraphnya. Sensor tetep pakai LM35 ya. Masukkan ke ADC0 dari Atmega8535. Rangkaian dapat dilihat disini :
Masih mengandalkan BASCOM-AVR programnya :
$regfile = “m8535.dat”
$crystal = 16000000
Dim W As Word , T As Word , Led As Byte , Led1 As Byte , I As Byte
Declare Sub Lcd_bar()
Deflcdchar 0 , 32 , 32 , 32 , 32 , 32 , 32 , 32 , 32 ‘ replace ? with number (0-7)
Deflcdchar 1 , 16 , 16 , 16 , 16 , 16 , 16 , 16 , 16 ‘ replace ? with number (0-7)
Deflcdchar 2 , 24 , 24 , 24 , 24 , 24 , 24 , 24 , 24 ‘ replace ? with number (0-7)
Deflcdchar 3 , 28 , 28 , 28 , 28 , 28 , 28 , 28 , 28 ‘ replace ? with number (0-7)
Deflcdchar 4 , 30 , 30 , 30 , 30 , 30 , 30 , 30 , 30 ‘ replace ? with number (0-7)
Deflcdchar 5 , 31 , 31 , 31 , 31 , 31 , 31 , 31 , 31 ‘ replace ? with number (0-7)
Deflcdchar 6 , 12 , 18 , 18 , 12 , 32 , 32 , 32 , 32 ‘ replace ? with number (0-7)
Config Adc = Single , Prescaler = Auto , Reference = Avcc
Config Lcdpin = Pin , Rs = Portc.0 , E = Portc.2 , Db4 = Portc.4 ,
Config Lcdpin = Pin , Db5 = Portc.5 , Db6 = Portc.6 , Db7 = Portc.7
Config Lcd = 16 * 2
Cls
Cursor Off
Locate 2 , 1
Lcd “Suhu:”
Start Adc
Do
W = Getadc(0)
T = W / 2
Locate 2 , 6
Lcd T ; Chr(6) ; “C “
Waitms 200
Lcd_bar
Loop
End
Sub Lcd_bar:
Led = T / 5
Led1 = T Mod 5
If Led > 1 Then
Locate 1 , 1
For I = 1 To Led
Lcd Chr(5)
Next
If Led >= 1 Then Lcd Chr(led1) ; ” “
Elseif Led < 1 Then
Locate 1 , 1
Lcd Chr(t) ; ” “
Else
Locate 1 , 1
Lcd Chr(led1) ; ” “
End If
End Sub
Hasilnya ini bro :
Modul atau hardware pakai Master Mikro. Selain dipakai untuk belajar mikrokontroler, dapat digunakan untuk aplikasi mikrokntroler.
klo yang saya buat di pinC1 tak hubungkan ke RW mas itu bisa g?makasih
bisa mas
Ad program bahasa C nya ngk mas…klu ad boleh minta mas….terima kasih…
Belum ada mas, lum sempat buat..
Heemm gitu…n terima kasih atas infonya…
yang bahasa C ada gak mas.?
Belum sempat bikin mas, Insya Allah kalau pas waktunya ada..
Trims dah mampir
rangkaian itu buat atmega 16 bisa mas ? buat tugas nih, mohon infonya ..
Bisa mas.