Selasa, 13 Mei 2014

Aplikasi - Sistem Lampu Taman Otomatis (Seri Pemantauan Cahaya [I])

Aplikasi kali ini adalah suatu sistem penyalaan dan pemadaman lampu taman secara otomatis. Penyalaan dan pemadaman lampu didasarkan pada intensitas cahaya di lingkungan taman tersebut. Lampu yang diaktifkan oleh sistem terdiri dari dua lampu taman. Saat intensitas cahaya tinggi, kedua lampu akan padam secara otomatis, sedangkan saat intensitas cahaya dalam kondisi ambang, salah satu lampu akan menyala, dan pada saat intensitas cahaya rendah, kedua lampu akan menyala. Sensor yang digunakan untuk mendeteksi intensitas cahaya adalah sensor LDR (Light Dependent Resistor) atau disebut juga photo-resistor. Mikrokontroler yang digunakan sebagai pusat kendali sistem adalah ATmega8535 dari keluarga AVR. Sedangkan agar mikrokontroler dapat menyalakan dan memadamkan lampu, digunakan relay sebagai driver-nya.

Ilustrasi:

 

*Sebaiknya posisi LDR dan lampu tidak terlalu berdekatan agar tidak ada umpan balik yang terlalu berlebihan.

Modul-Modul Depok Instruments yang Mendukung:
Blok Diagram:


Flowchart:


Skrip Program

BASCOM

$regfile = “m8535.dat”
$crystal = 8000000
$baud = 9600
Dim Dataadc As Word
Config Adc = Single , Prescaler = Auto
Start Adc
Config Portc = Output
Relay1 Alias Portc.0
Relay2 Alias Portc.1
Relay1 = 0
Relay2 = 0
Do
   Dataadc = Getadc(0)
    If Relay1 = 0 And Dataadc > 300 Then
      Relay1 = 1
      ‘Relay2 = 0
   Elseif Relay2 = 0 And Dataadc > 500 Then
      ‘Relay1 = 1
      Relay2 = 1
   Elseif Relay2 = 1 And Dataadc < 450 Then
      ‘Relay1 = 1
      Relay2 = 0
   Elseif Relay1 = 1 And Dataadc < 250 Then
      Relay1 = 0
      ‘Relay2 = 0
   End If
   Waitms 200
Loop

CVAVR:

0 komentar:

Posting Komentar