Aplikasi-001. Termometer Digital + Alarm Kebakaran (Seri Pemantauan Suhu [I])

Abstrak:

Termometer digital ini berbasis sensor suhu LM35. Nilai suhu yang dibaca oleh sensor ditampilkan pada 4 digit 7-Segment dengan nilai ketelitian 2 digit di belakang koma dengan satuan oC. Kemudian mikrokontroler ATMEGA8535 digunakan sebagai pengendali sistem dengan perangkat lunak penulis skrip program-nya adalah BASCOM (Basic Compiler). Selain itu, ada pula tambahan buzzer sebagai indikator suhu panas yang luar biasa / kebakaran yang akan berbunyi pada suhu 55oC.

Modul-Modul Depok Instruments yang Mendukung:

Blok Diagram:

Instalasi:

  1. Hubungkan data keluaran modul sensor DI-WLM35TS (DI-Waterproof LM35 Temperature Sensor) pada terminal D7 DI-Smart Extension Board.
  2. Hubungkan Buzzer pada terminal D0 DI-Smart Extension Board.
  3. Hubungkan dua buah modul DI-D7s secara cascade.
  4. Hubungkan pin enable modul DI-D7s pada terminal D1 dan D2 DI-Smart Extension Board.
  5. Hubungkan port data modul DI-D7s pada Port-C DI-Smart AVR System.
  6. Hubungkan modul DI-Smart Extension Board pada Port-A DI-Smart AVR System (PORTA.0 = Buzzer, PORTA.1 = enable DI-D7s [pecahan], PORTA.2 = enable DI-D7s [bulat], dan PORTA.7 = Data Sensor).
  7. Hubungkan sumber tegangan 9-12 VDC pada terminal power DI-Smart AVR System.
  8. Unduh skrip program di bawah ini.
  9. Selamat mencoba.

Skrip Program:

$regfile = “m8535.dat”  ‘Mikrokontroler yang digunakan = ATMEGA8535
$crystal = 8000000      ‘Kristal Oscilator yang digunakan = 8 MHz

‘Inisialisasi RAM yang akan digunakan sebagai register:
Dim Data7 As Byte
Dim Koma7 As Byte
Dim Dataadc As Word
Dim Suhu As Single
Dim S10 As String * 10
Dim S2a As String * 2
Dim S2b As String * 2
Dim Panjang As Byte

‘Inisialisasi ADC:
Config Adc = Single , Prescaler = Auto
Start Adc

‘Inisialisasi PORT I/O:
Config Porta.0 = Output ‘Inisialisasi PORTA.0 sebagi output
Config Porta.5 = Output
Config Porta.6 = Output
Buzzer Alias Porta.0    ‘PORTA.0 = Buzzer
Enlo Alias Porta.5      ‘PORTA.5 = Pengendali 7-Segment (bilangan pecahan)
Enhi Alias Porta.6      ‘PORTA.6 = Pengendali 7-Segment (bilangan bulat)
Config Portc = Output   ‘Inisialisasi PORTC sebagai output
Buzzer = 1              ‘Buzzer = OFF (Buzzer = active-low)

Enlo = 1                ‘7-Segment pecahan = di-latch (tidak menerima data)
Enhi = 1                ‘7-Segment bulat = di-latch

Do
Dataadc = Getadc(7)  ‘Ambil data ADC kanal 7 (PORTA.7)

‘Proses kalibrasi data suhu:
Suhu = Dataadc / 10.23
Suhu = Suhu * 5.03
S10 = Fusing(suhu , “#.##”)
Panjang = Len(s10)
Panjang = Panjang – 3
S2a = Left(s10 , Panjang)
S2b = Right(s10 , 2)
Data7 = Val(s2a)
Koma7 = Val(s2b)

‘Proses menampilkan data bilangan pecahan ke 7-Segment:
Portc = Makebcd(koma7)
Enlo = 0             ‘7-Segment pecahan diaktifkan (siap menerima data)
nop
nop
Enlo = 1             ‘7-Segment bulat di-latch

‘Proses menampilkan data bilangan bulat ke 7-Segment:
Portc = Makebcd(data7)
Enhi = 0
nop
nop
Enhi = 1

Waitms 200           ‘Tunda 200ms
Loop

Iklan

18 thoughts on “Aplikasi-001. Termometer Digital + Alarm Kebakaran (Seri Pemantauan Suhu [I])

  1. Sensor suhu kalau dimasukkan kedalam drum tertutup dengan panas diatas 100 o C bisa ndhak, soalnya saya butuh untuk memantau proses sterilisasi tanah dengan sistem pemanasan menggunakan uap air , terimakasih …

    Suka

    1. Yth. Sdr. Sutrisno,

      Untuk suhu di atas 100 derajat celcius, butuh sensor yang tahan terhadap suhu tersebut. Untuk sensor suhu yang mumpuni mungkin termocouple.

      Trims,
      Salam,
      Depok Instruments Support

      Suka

  2. pak mau tanya, Apakah program diatas sudah benar ya? mengingat instruksi instalasinya (PORTA.0 = Buzzer, PORTA.1 = enable DI-D7s [pecahan], PORTA.2 = enable DI-D7s [bulat], dan PORTA.7 = Data Sensor) karena diprogran yg di config adalah PORT A.5 untuk 7-segmen pecahan, PORT A.6 untuk 7-segmen bulat. saya ingin menggunakan program ini dengan mengambil data dari ADC 595 untuk termocouple bukan LM35 apakah bisa? adakah program yg harus saya tambahkan instruksinya? mohon bantuannya.. terimakasih

    Suka

  3. mas kalau terjadi alarm berbunyi apa bisa kita reset alarm nya?
    Kalau lebih dari 1 buah sensor lm35, apa yg harus di rubah?atau ada tambahan codenya?
    terima kasih mas.

    Suka

  4. Saya mau order 4 termometer, tapi saya tidak tau tentang elektronika. Apakah saya bisa mendapatkan dalam bentuk jadi (saya tinggal pakai saja) dan berapa biaya? Termometer ini akan saya gunakan untuk keperluan pengukuran suhu dalam kotak tertutup berukuran 40 cm x 40 cm x 30 cm. Mohon infonya…. makasih…..

    Suka

  5. heemmm…berarti program diatas itu bisa ngebaca sensor suhu mencapai 0.01 oC dan yg saya tanyakan apakah kenaikan suhunya itu satu per satu contoh seperti 32.01 oC…32.02 oC…32.03 oC..dan seterusnya…??..

    Suka

Tinggalkan Balasan

Please log in using one of these methods to post your comment:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s