Posting kali ini saya akan memposting tentang cara koneksi microcontroller AVR 8535/16/32 ke hp android melalui Bluetooth,pada rangkaian minimum system dihububungkan dengan 8 buah relay dan modul Bluetooth HC05 langsung saja dilihat skema diagram minimum system nya:
Berikut gambar PCB nya :
Aplikasi android dapat anda download di google playstore nama aplikasi nya : "Smart Relay" developer "Cang Acin" penampakanya seperti di bawah ini:
Berikut Video Youtube nya:
untuk mengehemat waktu membuat PCB soldering dan programming anda dapat memesan modul yang sudah jadi dari kami:
dengan harga RP 350.000
anda sudah mendapatkan HC-05 + AVRatemega16 +modul relay 8 relay dan sudah langsung pakai hubungi M.Yassin di hp 085716502096 harga di atas belum termasuk ongkir cara pembelian melalui transfer ke rekening BCA 5470336422 an Muhammad Yassin
sangat murah dibandingkan bila anda memebali satuan HC-05,8 relay dan AVR 16 dan PCB juga menerima jasa Tugas Akhir (TA) dan Skripsi tentang microcontroler konek ke Android bisa juga di customize aplikasi androidnya
'------------------------------------------------------------------------------
$baud = 9600 'baud rate komuniksi serial
Enable Serial
Enable Urxc
Enable Interrupts
On Urxc Rxd
Dim Y As String * 50
Dim X As Byte
Dim A As Bit
Dim B As Bit
Dim C As Bit
Dim D As Bit
Dim E As Bit
Dim F As Bit
Dim G As Bit
Dim H As Bit
'-----------------------
Config Portc.0 = Output
Config Portc.1 = Output
Config Portc.2 = Output
Config Portc.3 = Output
Config Portc.4 = Output
Config Portc.5 = Output
Config Portc.6 = Output
Config Portc.7 = Output
'---------'program utama
Do
If A = 1 Then
Portc.0 = 0
End If
If A = 0 Then
Portc.0 = 1
End If
If B = 1 Then
Portc.1 = 0
End If
If B = 0 Then
Portc.1 = 1
End If
If C = 1 Then
Portc.2 = 0
End If
If C = 0 Then
Portc.2 = 1
End If
If D = 1 Then
Portc.3 = 0
End If
If D = 0 Then
Portc.3 = 1
End If
If E = 1 Then
Portc.4 = 0
End If
If E = 0 Then
Portc.4 = 1
End If
If F = 1 Then
Portc.5 = 0
End If
If F = 0 Then
Portc.5 = 1
End If
If G = 1 Then
Portc.6 = 0
End If
If G = 0 Then
Portc.6 = 1
End If
If H = 1 Then
Portc.7 = 0
End If
If H = 0 Then
Portc.7 = 1
End If