KL301

Mikroprosesor

Kelompok 08

Project name : Menampilkan temperatur ruangan menggunakan temperatur suhu.

Anggota kelompok 8

abdul fatah,
mohammad daud,
hairul anwar ,
zainal arifin,
ahmad sirojuddin

Muhammad Nurul Fajri

Tugas : Membuat alat dengan ketentuan sbb:
1. Menggunakan mikrokontroler misalnya ATmega8 atau ATmega8535.
2. Memiliki 1 buah sensor suhu LM35 sebagai input.
3. Memiliki 1 buah LCD sebagai output.
4. Cara kerja alat : LCD menampilkan temperatur berapa derajat celcius
sesuai masukan dari sensor suhu LM35.

Contoh diagram thermometer digital :

3.13_Thermometer Digital

Contoh program dengan BASCOM:

‘—————————————–

‘ThermoiLearning Digital

‘—————————————–

$regfile = “m8535def.dat”

‘==========================

Config Lcdpin = Pin , E = Portc.1 , Rs = Portc.0 ,

Config Lcdpin = Pin , Db4 = Portc.2 , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5

Config Lcd = 16 * 2

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

Start Adc

‘————————–

Dim Suhu_ref As Word

Dim Suhu As Word

‘————————–

Deflcdchar 0 , 12 , 18 , 18 , 12 , 32 , 32 , 32 , 32

‘————————–

Cls

Cursor Off

‘————————–

Do

Suhu_ref = Getadc(0)

Suhu = Suhu_ref * 5

Suhu = Suhu / 10

Locate 1 , 1

Lcd “**ThermoiLearning***”

Locate 2 , 1

Lcd “Suhu=”

Locate 2 , 6

Lcd “  

Locate 2 , 6

Lcd Suhu

Locate 2 , 9

Lcd Chr(0)

Locate 2 , 10

Lcd “C”

Locate 2 , 11

Lcd “     

Wait 1

Loop

‘————— end

One Response to Kelompok 08

Leave a Reply