Memanfaatkan Remote Control TV Sony untuk mengendalikan alat elektronik

Kita bisa Memanfaatkan Remote Control TV Sony untuk mengendalikan alat elektronik apapun. Contoh sederhana dibawah ini kita akan membuat pengendali penyalaan lampu. Beberpa Lampu akan kita nyalakan secara remote.

Lalu apa saja yang diperlukan untuk Memanfaatkan Remote Control TV Sony untuk mengendalikan alat elektronik ini. Tentu saja sebuah remote  control sony, sensor remote infra merah, controller, dan beberapa buah lampu.

Rangkaian controler lampu remote control menggunakan atmega16.

Skema Remote kontroler
Pemrograman remote control tv sony
Data angka Remote Tv Sony

Data data angka diatas di dapat dengan code pemrograman dibawah ini. Code di tulis menggunakan bahasa BascomAVR
Catat semua data tombol atau gunakan gambar diatas.

Data  command remote sony
Membaca data remote tv sony

Demikian sobat cara mengendalikan alat elektronik menggunakan remote control yang dapat kita program sendiri menggunakan bahasa bascomAVR.

Code program pembacaan data remote tv sony.

Config Timer0 = Timer , Prescale = 256
Stop Timer0

Config Pind.3 = Input
Set Portd.3
Pin_ir Alias Pind.3

Config Int1 = Falling
On Int1 Isr_int1

Dim Data_ir As Word
Dim Cnt_ir As Byte
Dim Flag_ir_start As Bit
Dim Flag_ir_ok As Bit

Cls
Cursor Off
Locate 1 , 3
Lcd "SONY DECODER"

Wait 1

Enable Interrupts
Enable Int1

Do
 If Flag_ir_ok = 1 Then
   Reset Flag_ir_ok
   Disable Int1
   Gosub Isr_int1
       ' tempatkan kode akses penyalaan                  'lampu Dibawah ini

   Cls
   Cursor Off
   Locate 1 , 3
   Lcd "Data= " ; Data_ir

   Reset Flag_ir_ok

   Enable Int1
 End If
 Wait 1
Loop

Isr_int1:

 Timer0 = 0

 Start Timer0
 Bitwait Pin_ir , Set
 Stop Timer0

 If Cnt_ir = 0 Then
 If Timer0 > 90 And Timer0 < 114 Then
 Set Flag_ir_start
 Incr Cnt_ir
 End If
 End If

 If Flag_ir_start = 1 And Cnt_ir > 0 Then

 Decr Cnt_ir
 If Timer0 < 32 Then
 Data_ir.cnt_ir = 0
 Else
 Data_ir.cnt_ir = 1
 End If

 Cnt_ir = Cnt_ir + 2
 If Cnt_ir > 11 Then
 Shift Data_ir , Right , 1
 Reset Flag_ir_start
 Set Flag_ir_ok
 Cnt_ir = 0
 End If

 End If

Return

Artikel Terkait

Memanfaatkan Remote Control TV Sony untuk mengendalikan alat elektronik
4/ 5