SENSOR INFRARED DENGAN ARDUINO UNO BAHASA PEMROGRAMAN BASCOM AVR

Konsep dasar dari sensor IR adalah mendeteksi suati benda dengan cara mentransmisikan atau boleh dikatakan memancarkan sinyal infrared oleh IR transmiter (putih) ke benda yg terdeteksi lalu benda tersebut akan memantulkan kembali dan ditangkap oleh IR Receiver (hitam).

Langsung ke topik pembahasan saja iya gais,,,

Gambar atau skema rangkaian adalah seperti berikut

Dari gambar bisa kita lihat bersama bahwa pin B4 dan B5 dari arduino diatur sebagai output dan pin D2 sebagai input. Untuk lebih jelasnya bisa dilihat dari Bahasa Pemrogramannya.

Seperti apa programnya langsung lihat saja.....

' Name: Jetro Rajagukguk'

' Hobby: Elektronika Simulation'

$regfile = "m328pdef.dat"

$crystal = 16000000

$baud = 1200

Config Lcdpin = Pin , Db4 = Portd.4 , Db5 = Portd.5 , Db6 = Portd.6 , Db7 = Portd.7 , E = Portb.1 , Rs = Portb.0

Config Lcd = 16 * 2

Config Portb.4 = Output

Config Portb.5 = Output

Buzzer Alias Portb.5

Config Portd.2 = Input

Cursor Off

Do

Cls

Locate 1 , 1 : Lcd "INFRARED SENSOR"

Locate 2 , 1 : Lcd "SMILE!!!"

Waitms 100

If Pind.2 = 0 Then

Portb.5 = 0

Reset Buzzer

Portb.4 = 0

Cursor Off

Cls

Locate 1 , 1 : Lcd "No Object"

Locate 2 , 1 : Lcd "Detected"

Waitms 100

Elseif Pind.2 = 1 Then

Portb.5 = 1

Gosub Sounds

Portb.4 = 1

Cursor Off

Cls

Locate 1 , 1 : Lcd "Object"

Locate 2 , 1 : Lcd "Detected!!!"

Waitms 100

End If

Loop

Sounds:

Sound Buzzer , 124 , 675

Sound Buzzer , 110 , 758

Waitms 300

Sound Buzzer , 124 , 675

Sound Buzzer , 110 , 758

Waitms 200

Return

Semoga bermaanfaat teman-teman..