Thursday, December 18, 2014

Telemeteri Sensor Suhu dan kendali lampu via SMS dengan AT mega 16 wavecom dan bascom AVR

Pengukuran parameter tertentu secara jarak jauh, saya sebut di sini sebagai telemeteri, dimana data yang di cek secara jarak jauh adalah data suhu menggunakan media SMS untuk berkomunikasi data,







source code Telemeteri  Sensor Suhu dan kendali lampu via SMS dengan AT mega 16 wavecom dan bascom AVR

'-----------------------------------------------------
' Kontrol nyala - padam listrik via SMS
' serta cek suhu via sms
''-----------------------------------------------------
$regfile = "m16def.dat"                                     'Mikrokontroler ATMega16
$crystal = 16000000
$baud = 9600

'Ddrd.2 = 0
'Portd.2 = 1

'------- konfigurasi LCD
'Config Lcdpin = Pin , Rs = Porta.0 , E = Porta.2 , Db4 = Porta.4 ,
'Config Lcdpin = Pin , Db5 = Porta.5 , Db6 = Porta.6 , Db7 = Porta.7
'Config Lcd = 16 * 2
'Cursor Off
'Cls


Config Lcdpin = Pin , Db4 = Portc.3 , Db5 = Portc.2 , Db6 = PortC.1 , Db7 = Portc.0 , E = Portc.5 , Rs = Portc.7
Config Lcd = 16 * 2
cls
Cursor Off


'On Int0 Int_ext0
'Enable Interrupts
'Enable Int0

Config Portb = Output
portb = 255
wait 1
portb = 0


Config Adc = Single , Prescaler = Auto , Reference = Avcc
Start Adc

Dim Data_adc As Word , Adc_convert As Single , Adc_string As String * 10



$hwstack = 20
$swstack = 8
$framesize = 8

Declare Sub Getline(s As String)
Declare Sub Showsms(s As String )


Dim I As Byte , B As Byte
Dim Sret As String * 70 , Stemp As String * 70
Dim Pos_str1 As Byte , Pos_str2 As Byte , Long_str As Byte
Dim Inbox As String * 2
Dim No_sender As String * 15

Dim S1 As String * 6 , S2 As String * 6 , S3 As String * 6 , S4 As String * 6 , Alls As String * 25

Declare Sub Status

Config Serialin = Buffered , Size = 72
Enable Interrupts
Wait 1
Print "AT"


Lcd "SMS CONTROLLER"
'------ sistem interupsi diaktifkan
Enable Interrupts
Wait 1                                                      'Tunggu modem stabil
'------ tes komunikasi dengan modem
Do
  Print "AT" :                                              ' Waitms 100
  Getline Sret                                              ' get data from modem
  Lowerline
  Lcd Sret
Loop Until Sret = "OK"                                      ' modem must send OK
'------ tunggu 2 detik
Wait 2
'Print "AT+CMGF=1";
'Wait 1


Do
Getline Sret
I = Instr(sret , ":")
If I > 0 Then
Stemp = Left(sret , I)
Select Case Stemp
Case "+CMTI:" : Showsms Sret
End Select
End If
Loop
End

'***********************************************
Sub Getline(s As String)
S = ""
Do
B = Inkey()
Select Case B
Case 0 :
Case 13
Case 10 : If S <> "" Then Exit Do
Case Else
S = S + Chr(b)
End Select
Loop
End Sub

'**********************************************
Sub Showsms(s As String )
Pos_str1 = Instr(s , ",")
Long_str = Len(s)
Long_str = Long_str - Pos_str1
Inbox = Right(s , Long_str)
Print "AT+CMGR=" ; Inbox
Getline Stemp
Getline Sret
'__ambil nomor dulu_____no pengirim ada di no_sender ____
Pos_str1 = Instr(stemp , ",")
Incr Pos_str1
Pos_str2 = Instr(pos_str1 , Stemp , ",")
Incr Pos_str1
Decr Pos_str2
Long_str = Pos_str2 - Pos_str1
No_sender = Mid(stemp , Pos_str1 , Long_str)

'_________________________________________________________
Print "AT+CMGD=" ; Inbox

'-------------------------kontrol lampu
If Sret = "ER-07-s1 on" Then
Wait 1
Portb.0 = 1

Cls
Locate 1 , 1
Lcd Sret
Locate 2 , 1
Lcd No_sender


Print "AT+CMGS=";
   '----nomor HP tujuan : , bisa ganti yang lain
   Print No_sender
   '----- tunggu 700 ms
   Waitms 700
   '----- isi sms yang dikirim
   Print "Lampu 1 dinyalakan";
   '----- kode akhiran untuk perintah kirim sms
   Print Chr(26)
   '----- tunggu 1 detik
  Wait 1

Elseif Sret = "ER-07-s1 off" Then
Wait 1
PortB.0 = 0
Cls
Locate 1 , 1
Lcd Sret
Locate 2 , 1
Lcd No_sender

Print "AT+CMGS=";
   '----nomor HP tujuan : , bisa ganti yang lain
   Print No_sender
   '----- tunggu 700 ms
   Waitms 700
   '----- isi sms yang dikirim
   Print "Lampu 1 dipadamkan";
   '----- kode akhiran untuk perintah kirim sms
   Print Chr(26)
   '----- tunggu 1 detik
  Wait 1



Elseif Sret = "ER-07-s2 on" Then
Wait 1
Portb.1 = 1
Cls
Locate 1 , 1
Lcd Sret
Locate 2 , 1
Lcd No_sender


Print "AT+CMGS=";
   '----nomor HP tujuan : , bisa ganti yang lain
   Print No_sender
   '----- tunggu 700 ms
   Waitms 700
   '----- isi sms yang dikirim
   Print "Lampu 2 dinyalakan";
   '----- kode akhiran untuk perintah kirim sms
   Print Chr(26)
   '----- tunggu 1 detik
  Wait 1

Elseif Sret = "ER-07-s2 off" Then
Wait 1
Portb.1 = 0
Cls
Locate 1 , 1
Lcd Sret
Locate 2 , 1
Lcd No_sender

Print "AT+CMGS=";
   '----nomor HP tujuan : , bisa ganti yang lain
   Print No_sender
   '----- tunggu 700 ms
   Waitms 700
   '----- isi sms yang dikirim
   Print "Lampu 2 dipadamkan";
   '----- kode akhiran untuk perintah kirim sms
   Print Chr(26)
   '----- tunggu 1 detik
  Wait 1


Elseif Sret = "ER-07-s3 on" Then
Wait 1
Portb.2 = 1
Cls
Locate 1 , 1
Lcd Sret
Locate 2 , 1
Lcd No_sender


Print "AT+CMGS=";
   '----nomor HP tujuan : , bisa ganti yang lain
   Print No_sender
   '----- tunggu 700 ms
   Waitms 700
   '----- isi sms yang dikirim
   Print "Lampu 3 dinyalakan";
   '----- kode akhiran untuk perintah kirim sms
   Print Chr(26)
   '----- tunggu 1 detik
  Wait 1

Elseif Sret = "ER-07-s3 off" Then
Wait 1
PortB.2 = 0
Cls
Locate 1 , 1
Lcd Sret
Locate 2 , 1
Lcd No_sender

Print "AT+CMGS=";
   '----nomor HP tujuan : , bisa ganti yang lain
   Print No_sender
   '----- tunggu 700 ms
   Waitms 700
   '----- isi sms yang dikirim
   Print "Lampu 3 dipadamkan";
   '----- kode akhiran untuk perintah kirim sms
   Print Chr(26)
   '----- tunggu 1 detik
  Wait 1


Elseif Sret = "ER-07-s4 on" Then
Wait 1
PortB.3 = 1
Cls
Locate 1 , 1
Lcd Sret
Locate 2 , 1
Lcd No_sender


Print "AT+CMGS=";
   '----nomor HP tujuan : , bisa ganti yang lain
   Print No_sender
   '----- tunggu 700 ms
   Waitms 700
   '----- isi sms yang dikirim
   Print "Lampu 4 dinyalakan";
   '----- kode akhiran untuk perintah kirim sms
   Print Chr(26)
   '----- tunggu 1 detik
  Wait 1

Elseif Sret = "ER-07-s4 off" Then
Wait 1
Portb.3 = 0
Cls
Locate 1 , 1
Lcd Sret
Locate 2 , 1
Lcd No_sender

Print "AT+CMGS=";
   '----nomor HP tujuan : , bisa ganti yang lain
   Print No_sender
   '----- tunggu 700 ms
   Waitms 700
   '----- isi sms yang dikirim
   Print "Lampu 4 dipadamkan";
   '----- kode akhiran untuk perintah kirim sms
   Print Chr(26)
   '----- tunggu 1 detik
  Wait 1




Elseif Sret = "ER-07-s5 on" Then
Wait 1
PortB.4 = 1
Cls
Locate 1 , 1
Lcd Sret
Locate 2 , 1
Lcd No_sender


Print "AT+CMGS=";
   '----nomor HP tujuan : , bisa ganti yang lain
   Print No_sender
   '----- tunggu 700 ms
   Waitms 700
   '----- isi sms yang dikirim
   Print "Lampu 5 dinyalakan";
   '----- kode akhiran untuk perintah kirim sms
   Print Chr(26)
   '----- tunggu 1 detik
  Wait 1

Elseif Sret = "ER-07-s5 off" Then
Wait 1
Portb.4 = 0
Cls
Locate 1 , 1
Lcd Sret
Locate 2 , 1
Lcd No_sender

Print "AT+CMGS=";
   '----nomor HP tujuan : , bisa ganti yang lain
   Print No_sender
   '----- tunggu 700 ms
   Waitms 700
   '----- isi sms yang dikirim
   Print "Lampu 5 dipadamkan";
   '----- kode akhiran untuk perintah kirim sms
   Print Chr(26)
   '----- tunggu 1 detik
  Wait 1




Elseif Sret = "ER-07-s6 on" Then
Wait 1
PortB.5 = 1
Cls
Locate 1 , 1
Lcd Sret
Locate 2 , 1
Lcd No_sender


Print "AT+CMGS=";
   '----nomor HP tujuan : , bisa ganti yang lain
   Print No_sender
   '----- tunggu 700 ms
   Waitms 700
   '----- isi sms yang dikirim
   Print "Lampu 6 dinyalakan";
   '----- kode akhiran untuk perintah kirim sms
   Print Chr(26)
   '----- tunggu 1 detik
  Wait 1

Elseif Sret = "ER-07-s6 off" Then
Wait 1
PortB.5 = 0
Cls
Locate 1 , 1
Lcd Sret
Locate 2 , 1
Lcd No_sender

Print "AT+CMGS=";
   '----nomor HP tujuan : , bisa ganti yang lain
   Print No_sender
   '----- tunggu 700 ms
   Waitms 700
   '----- isi sms yang dikirim
   Print "Lampu 6 dipadamkan";
   '----- kode akhiran untuk perintah kirim sms
   Print Chr(26)
   '----- tunggu 1 detik
  Wait 1






Elseif Sret = "ER-07-suhu" Then
Wait 1

Cls
Locate 1 , 1
Lcd Sret
Locate 2 , 1
Lcd No_sender


 Data_adc = Getadc(0)
  Adc_convert = Data_adc
  Adc_convert = Adc_convert * 500
  Adc_convert = Adc_convert / 1023
  Adc_string = Fusing(adc_convert , "#.##")

  cls
  Locate 2 , 1
  Lcd "Suhu =" ; Adc_string ; " C "
  Waitms 200

Print "AT+CMGS=";
   '----nomor HP tujuan : , bisa ganti yang lain
   Print No_sender
   '----- tunggu 700 ms
   Waitms 700
   '----- isi sms yang dikirim
   Print Adc_string ; "Celcius"
   '----- kode akhiran untuk perintah kirim sms
   Print Chr(26)
   '----- tunggu 1 detik
  Wait 1

End If


End Sub



video ujicoba Telemeteri  Sensor Suhu dan kendali lampu via SMS dengan AT mega 16 wavecom dan bascom AVR

https://www.blogger.com/blogger.g?blogID=2644711086117012239#editor/target=post;postID=5554990425331950395;onPublishedMenu=allposts;onClosedMenu=allposts;postNum=0;src=link


membutuhkan Telemeteri  Sensor Suhu dan kendali lampu via SMS dengan AT mega 16 wavecom dan bascom AVR ?


 Contact Person : 
Facebook : Taufik Adi Sanjaya
No HP / Whats App : 0823 2613 3990
PIN BBM 5983E244
Alamat : Jalan Imogiri Timur KM 11, 
Blawong 1 , RT 01, Trimulyo, 
Jetis, Bantul 55781.

Anda membutuhkan komponen elektronik , Arduino, Sensor, Tutorial(paket belajar), jasa pembuatan alat berbasis mikrokontroler, kendali lampu via jaringan LAN, led running teks, pengendali lampu  atau peralatan listrik lainnya via internet dan sebagainya ? anda dapat membelinya di www.kedaiarduino.com
 www.kedaiarduino.com






Friday, December 12, 2014

Mencoba interface neo 6m gps arduino uno delphi 7

Posting kali ini saya memainkan interdace neo 6m gps arduino uno dengan delphi 7 , 



dalam percobaan ini, saya menggunakan hardware :

1 modul  neo 6m gps
1 modul arduino uno versi  SMD, harga lebih murah daripada arduino non SMD, fungsinya sama persis, 


untuk mengakses neo 6m gps saya menggunakan libary tiny gps dan software serial, fungsi library software serial adalah untuk membuat port komunikasi serial buatan yang secara default hanya ada di pin 0 dan 1 arduino uno, sehingga kita dapat memiliki port serial selainyang sudah ada di pin 0 dan 1 tersebut, dalam hal ini saya menggunakan pin 10 dan 11 pada aruino uni, pin 10 sebaga pin Rx dan pin 11 sebagi pin Tx, pin ini lah yang dihubungkan ke modul modul  neo 6m gps, 

nantinya arduino uno bertugas membaca data latitude dan logitude dari posisi GPS lalu ditampilka ke komputer melalui komunukasi serial dengan baudrate 9600

catatan :

baud rate modul  neo 6m gps adalah 9600
ketika dinyalakan modul  neo 6m gps membutuhkan waktu power up sekitar 30 detik - 5 menit untuk mendapatkan sinyal GPS sehingga dapat mengirim kan data lintang dan bujur ke komputer, 


aplikasi pada komputer untuik menerima data latitude dan logitude dari posisi GPS pada komputer dapat menggunakan software hyperteminal, namun dalam aplikasi pada postingan ini dipergunakan software yang dikembangkan dengan delphi 7 dimana nantinya data logitude dan laltitude dipisahkan dan ditampailkan pada komponen edit yang ada pada delphi 7.

 berikut ini adalah video ujicoba interface neo 6m gps arduino uno delphi 7 



Contact Person : 
Facebook : Taufik Adi Sanjaya
No HP / Whats App : 0823 2613 3990
PIN BBM 5983E244
Alamat : Jalan Imogiri Timur KM 11, 
Blawong 1 , RT 01, Trimulyo, 
Jetis, Bantul 55781.

Anda membutuhkan komponen elektronik , Arduino, Sensor, Tutorial(paket belajar), jasa pembuatan alat berbasis mikrokontroler, kendali lampu via jaringan LAN, led running teks, pengendali lampu  atau peralatan listrik lainnya via internet dan sebagainya ? anda dapat membelinya di www.kedaiarduino.com
 www.kedaiarduino.com




Wednesday, December 10, 2014

Alat kendali lampu berbasis internet 8 channel dengan interface android

alat kendali lampu berbasis internet 8 channel dengan interface android
Saat ini jaringan internet sudah menjadi bagian tak terpisahkan dari kehidupan manusia, mulai dari anak anak sampai orang tua sudah sangat akrab dengan internet ,
Alat ini berfungsi sebagai pengendali peralatan listrik jarak jauh berbasis internet speedy, jadi selama anda menggunakan jaringan internet speedy anda dapat melakukan pengendalian lampu rumah anda dengan menggunakan alat ini,
Alat ini mampu menangani 8  buah peralatan listrik semisal lampu pijar, lampu hemat energy dan sebagainya bebasis internet

Berikut ini video ujicoba kendali lampu via internet sebelum kami chasing


Selain itu jumlah channel juga tidak terbatas sebanyak 8 lampu saja, tersedia jumlah channel lain , 4channel, 12 channel, 16 channel dan sebagainya.

Membutuhkan  alat kendali lampu berbasis internet 8 channel dengan interface android?


Contact Person : 
Facebook : Taufik Adi Sanjaya
No HP / Whats App : 0823 2613 3990
PIN BBM 5983E244
Alamat : Jalan Imogiri Timur KM 11, 
Blawong 1 , RT 01, Trimulyo, 
Jetis, Bantul 55781.

Anda membutuhkan komponen elektronik , Arduino, Sensor, Tutorial(paket belajar), jasa pembuatan alat berbasis mikrokontroler, kendali lampu via jaringan LAN, led running teks, pengendali lampu  atau peralatan listrik lainnya via internet dan sebagainya ? anda dapat membelinya di www.kedaiarduino.com
 www.kedaiarduino.com



Ujicoba alat kendali relay 8 channel berbasis internet via delphi 7




Ujicoba  alat kendali relay  8 channel berbasis internet via delphi 7



Saat ini jaringan internet sudah menjadi bagian tak terpisahkan dari kehidupan manusia, mulai dari anak anak sampai orang tua sudah sangat akrab dengan internet ,


Alat ini berfungsi sebagai pengendali peralatan listrik jarak jauh berbasis internet speedy, jadi selama anda menggunakan jaringan internet speedy anda dapat melakukan pengendalian lampu rumah anda dengan menggunakan alat ini,


Alat ini mampu menangani 8  buah peralatan listrik semisal lampu pijar, lampu hemat energy dan sebagainya bebasis internet



Berikut ini video ujicoba kendali lampu via internet sebelum kami chasing



Selain itu jumlah channel juga tidak terbatas sebanyak 4 lampu saja, tersedia jumlah channel lain , 8 channel, 12 channel, 16 channel dan sebagainya.

membutuhkan  alat kendali relay  8 channel berbasis internet via delphi 7?

Contact Person : Taufik Adi Sanjaya
No HP / Whats App : 0823 2613 3990
PIN BBM 5983E244
Alamat : Jalan Imogiri Timur KM 11, 
Blawong 1 , RT 01, Trimulyo, 
Jetis, Bantul 55781.


Anda membutuhkan komponen elektronik , Arduino, Sensor, Tutorial(paket belajar), jasa pembuatan alat berbasis mikrokontroler, kendali lampu via jaringan LAN, dan sebagainya ? anda dapat membelinya di www.kedaiarduino.com
 www.kedaiarduino.com


Video ujicoba Paket Belajar Kontrol lampu melalui komunikasi Bluetooth Arduino – Android

Setelah agak lama saya ndak nulis di blog kesayangan saya ini, akhirnya saya beranikan diri untuk menulis lagi, (hahahaha lebay),

kali ini saya hanya akan memposting sebuah video mengenai ujicoba Paket Belajar Kontrol lampu melalui komunikasi Bluetooth Arduino – Android  dimana apada paket belajar terserbut terdiri atas :

1.    Arduino Uno + kabel
2.    Relay 4 channel
3.    Bluetooth
4.    CD berisi software Arduino, Android Aplication dengan Basic4Android, source Code /sketch Arduino,
5.    Buku panduan pemrograman Kontrol lampu melalui komunikasi Bluetooth Arduino – Android
CD + Panduan only : Rp.750.000,00
CD + Panduan + Arduino + Relay 4 Channel + Bluetooth = Rp. 1.250.000,00

video ujicoba Paket Belajar Kontrol relay melalui komunikasi Bluetooth Arduino – Android
dapat dilihat pada video di bawah ini :




Contact Person : Taufik Adi Sanjaya
No HP / Whats App : 0823 2613 3990
PIN BBM 5983E244
Alamat : Jalan Imogiri Timur KM 11, 
Blawong 1 , RT 01, Trimulyo, 
Jetis, Bantul 55781.


Anda membutuhkan komponen elektronik , Arduino, Sensor, Tutorial(paket belajar), jasa pembuatan alat berbasis mikrokontroler, kendali lampu via jaringan LAN, dan sebagainya ? anda dapat membelinya di www.kedaiarduino.com
 www.kedaiarduino.com

Tuesday, December 9, 2014

Sensor warna dengan output suara berbasis Arduino Uno

Sebenarnya judul Sensor warna dengan output suara berbasis Arduino Uno dapat di ubah menjadi Sensor warna dengan output suara berbasis Mikrokontroler AVR, baik at mega 16, 8 ataupun at mega varian lain, bahkan at tiny pun dapat di gunakan sebagai otak pengolah informasi yang diberikan oleh sensor warna untuk kemudian menghasilkan output suara


sensor warna nya memiliki skematik sebagai berikut :



Modul Hardware yang dipergunakan dalam tulisan ini adalah :


1. modul Arduino UNO, boleh versi aseli italy ataupun versi abal abal china (arduino uno rev clone),
2. modul serial ttl to play wave (hehehehe membingungkan?) cara kerjanya kirim perintah serial ke mdul tersebut , selanjutnya file wav yang ada di MMC yang terkoneksi pada modul akan di play oleh modul
3. penguat suara (modul mini amplifier)
4. speaker
5. power supplya
6. rangkaian sensor warna, 

gambar alat  Sensor warna dengan output suara berbasis Arduino Uno




source kode untuk  Sensor warna dengan output suara berbasis Arduino Uno adalah sebagai berikut :

#include <SoftwareSerial.h>

SoftwareSerial mySerial(10, 11); // RX, TX

const int analogInRed = A0; 
const int analogInGreen = A1; 
const int analogInBlue = A2; 
int sensorValueRed = 0;    
int sensorValueGreen = 0;    
int sensorValueBlue = 0;    

int k=15;

const int buttonPin = 3;     // the number of the pushbutton pin
const int buzzerPin = 2;      // the number of the buzzer pin
int buttonState = 0;

void setup() {
mySerial.begin(19200); 
mySerial.write(13);
mySerial.write(13);
mySerial.write(13);

delay(100);
//kirim stop
mySerial.print ("g") ;
//mySerial.print Chr(13) ;
mySerial.write(13);


//'seting single step
mySerial.print ("t") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
 
   pinMode(buzzerPin, OUTPUT);     
   pinMode(buttonPin, INPUT);
  
  digitalWrite(buzzerPin,LOW);
  delay(500);

  digitalWrite(buzzerPin,HIGH);
  delay(500);
  
  digitalWrite(buzzerPin,LOW);
  delay(500);

  digitalWrite(buzzerPin,HIGH);
  delay(500);
 
  digitalWrite(buzzerPin,LOW);
  delay(500);

  digitalWrite(buzzerPin,HIGH);
  delay(500);
 
  digitalWrite(buzzerPin,LOW);
  delay(500);

  digitalWrite(buttonPin,HIGH);
  delay(500);
 
 
  Serial.begin(19200);
}

void loop() {
  // read the analog in value:
 buttonState = digitalRead(buttonPin); 
if (buttonState==LOW) {
 
 sensorValueRed = analogRead(analogInRed);
  sensorValueGreen = analogRead(analogInGreen);
  sensorValueBlue = analogRead(analogInBlue);

  digitalWrite(buzzerPin,HIGH);
  delay(500);
 
  digitalWrite(buzzerPin,LOW);
  delay(500);
 
   digitalWrite(buzzerPin,HIGH);
  delay(500);
 
  digitalWrite(buzzerPin,LOW);
  delay(500);
 
 
if(abs(sensorValueRed-606)<k && abs(sensorValueGreen-172)<k && abs(sensorValueBlue-428)<k){
    Serial.println("HITAM");
 mySerial.print ("lxhitam") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
   } else


if(abs(sensorValueRed-239)<k && abs(sensorValueGreen-57)<k && abs(sensorValueBlue-154)<k){
    Serial.println("PUTIH");
   mySerial.print ("lxputih") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
} else
   

if(abs(sensorValueRed-338)<k && abs(sensorValueGreen-135)<k && abs(sensorValueBlue-342)<k){
    Serial.println("MERAH");
 mySerial.print ("lxmerah") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
}  else
   

if(abs(sensorValueRed-455)<k && abs(sensorValueGreen-86)<k && abs(sensorValueBlue-273)<k){
    Serial.println("HIJAU");
 mySerial.print ("lxhijau") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
}   else
   
if(abs(sensorValueRed-488)<k && abs(sensorValueGreen-97)<k && abs(sensorValueBlue-226)<k){
    Serial.println("BIRU");
 mySerial.print ("lxbiru") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
}  else
   
if(abs(sensorValueRed-255)<k && abs(sensorValueGreen-67)<k && abs(sensorValueBlue-222)<k){
    Serial.println("KUNING");
  mySerial.print ("lxkuning") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
}  else
   
if(abs(sensorValueRed-392)<k && abs(sensorValueGreen-77)<k && abs(sensorValueBlue-249)<k){
    Serial.println("HIJAU MUDA");
  mySerial.print ("lxhijau1") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
}   else
   
if(abs(sensorValueRed-489)<k && abs(sensorValueGreen-101)<k && abs(sensorValueBlue-311)<k){
    Serial.println("HIJAU TUA");
  mySerial.print ("lxhijau2") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
}   else     

if(abs(sensorValueRed-403)<k && abs(sensorValueGreen-78)<k && abs(sensorValueBlue-198)<k){
    Serial.println("BIRU MUDA");
 mySerial.print ("lxbiru1") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
}   else         

if(abs(sensorValueRed-506)<k && abs(sensorValueGreen-104)<k && abs(sensorValueBlue-234)<k){
    Serial.println("BIRU TUA");
 mySerial.print ("lxbiru2") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
}   else   


if(abs(sensorValueRed-462)<k && abs(sensorValueGreen-150)<k && abs(sensorValueBlue-372)<k){
    Serial.println("COKLAT");
    mySerial.print ("lxcoklat") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
}else         

if(abs(sensorValueRed-302)<k && abs(sensorValueGreen-122)<k && abs(sensorValueBlue-346)<k){
    Serial.println("ORANYE");
  mySerial.print ("lxoranye") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
}  else     


if(abs(sensorValueRed-402)<k && abs(sensorValueGreen-93)<k && abs(sensorValueBlue-221)<k){
    Serial.println("ABU ABU");
 mySerial.print ("lxabu") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
} else     

if(abs(sensorValueRed-562)<k && abs(sensorValueGreen-145)<k && abs(sensorValueBlue-304)<k){
    Serial.println("UNGU");
 mySerial.print ("lxungu") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
} else
if(abs(sensorValueRed-287)<k && abs(sensorValueGreen-87)<k && abs(sensorValueBlue-289)<k){
    Serial.println("KUNING TUA");
 mySerial.print ("lxkuning2") ;
//mySerial.print Chr(13) ;
mySerial.write(13);
}     else

if(abs(sensorValueRed-426)<k && abs(sensorValueGreen-134)<k && abs(sensorValueBlue-291)<k){
    Serial.println("PINK");
  mySerial.print ("lxpink") ;
//mySerial.print Chr(13) ;
mySerial.write(13);}           
  Serial.println(sensorValueRed);                      
  Serial.println(sensorValueGreen);                 
  Serial.println(sensorValueBlue); 
 Serial.println("=====================");
  delay(1000);  

}


panjang ya ?  ah enggak, itu kosing nya bentar aja, apalagi kopast nya

sensor warna dipasang di pin A0, A1, A2 yang merupakan keluaran dari sensor LDR yang di hadapkan dengna LED Merah, Hijau dan Biru .

beikut ini adalah video uji coba nya :



Contact Person : Taufik Adi Sanjaya
No HP / Whats App : 0823 2613 3990
PIN BBM 5983E244
Alamat : Jalan Imogiri Timur KM 11, 
Blawong 1 , RT 01, Trimulyo, 
Jetis, Bantul 55781.


Anda membutuhkan komponen elektronik , Arduino, Sensor, Tutorial(paket belajar), jasa pembuatan alat berbasis mikrokontroler, kendali lampu via jaringan LAN, dan sebagainya ? anda dapat membelinya di www.kedaiarduino.com
 www.kedaiarduino.com



Saturday, November 29, 2014

Sensor Warna sederhana dengan arduino UNO

Posting kali ini saya tuliskan tentang penggunaan LED RGB (red green blue) dan LDR sebagai sensor warna yang terbukti mampu membedakan 16 warna dalam percobaan yang saya lakukan

LDR di pergunakan untuk menangkap pantulan cahaya dari warna yang akan dideteksi, sedangkan led RGB dipergunakan untuk menghasilkan cahaya yang nantinya akan dibaca untuk mengetahui warna yang terdeteksi, prinsip bacanya adalah dengan adanya perubahan intensitas cahaya yang di pantulkan oleh masing masing warna yang terpapar cahaya yang dihasilkan led RGB, nilai ADC yang di baca oleh pin Analog Arduino pun akan berubah ubah, dengan melakukan sedikit saja eksperimen kita dapat langusung membaca data warna yang ada.

berikut ini adalah penampakan



berikut ini adalah source code utama dalam pembacaan Sensor Warna sederhana dengan arduino UNO, yang telah teruji untuk mendeteksi 16 warna


if(abs(sensorValueRed-588)<k && abs(sensorValueGreen-193)<k && abs(sensorValueBlue-445)<k){
    Serial.println("HITAM"); } else



if(abs(sensorValueRed-250)<k && abs(sensorValueGreen-63)<k && abs(sensorValueBlue-160)<k){
    Serial.println("PUTIH"); } else
   

if(abs(sensorValueRed-350)<k && abs(sensorValueGreen-153)<k && abs(sensorValueBlue-359)<k){
    Serial.println("MERAH"); }  else
   

if(abs(sensorValueRed-475)<k && abs(sensorValueGreen-97)<k && abs(sensorValueBlue-290)<k){
    Serial.println("HIJAU"); }   else
   

if(abs(sensorValueRed-488)<k && abs(sensorValueGreen-110)<k && abs(sensorValueBlue-232)<k){
    Serial.println("BIRU"); }  else
   

if(abs(sensorValueRed-270)<k && abs(sensorValueGreen-76)<k && abs(sensorValueBlue-245)<k){
    Serial.println("KUNING"); }  else
   

if(abs(sensorValueRed-397)<k && abs(sensorValueGreen-88)<k && abs(sensorValueBlue-271)<k){
    Serial.println("HIJAU MUDA"); }   else



   

if(abs(sensorValueRed-501)<k && abs(sensorValueGreen-114)<k && abs(sensorValueBlue-332)<k){
    Serial.println("HIJAU TUA"); }   else     


if(abs(sensorValueRed-414)<k && abs(sensorValueGreen-90)<k && abs(sensorValueBlue-206)<k){
    Serial.println("BIRU MUDA"); }   else         

if(abs(sensorValueRed-497)<k && abs(sensorValueGreen-116)<k && abs(sensorValueBlue-247)<k){
    Serial.println("BIRU TUA"); }   else   


if(abs(sensorValueRed-477)<k && abs(sensorValueGreen-168)<k && abs(sensorValueBlue-395)<k){
    Serial.println("COKLAT"); }else         

if(abs(sensorValueRed-306)<k && abs(sensorValueGreen-114)<k && abs(sensorValueBlue-320)<k){
    Serial.println("ORANYE"); }  else     


if(abs(sensorValueRed-419)<k && abs(sensorValueGreen-104)<k && abs(sensorValueBlue-254)<k){
    Serial.println("ABU ABU"); } else     


if(abs(sensorValueRed-419)<k && abs(sensorValueGreen-104)<k && abs(sensorValueBlue-254)<k){
    Serial.println("ABU ABU"); } else

if(abs(sensorValueRed-397)<k && abs(sensorValueGreen-105)<k && abs(sensorValueBlue-228)<k){
    Serial.println("UNGU"); } else

if(abs(sensorValueRed-300)<k && abs(sensorValueGreen-98)<k && abs(sensorValueBlue-297)<k){
    Serial.println("KUNING TUA"); }     else

if(abs(sensorValueRed-426)<k && abs(sensorValueGreen-149)<k && abs(sensorValueBlue-304)<k){
    Serial.println("PINK"); }  





sedangkan berikut ini adalah video uji coba Sensor Warna sederhana dengan arduino UNO




Contact Person : Taufik Adi Sanjaya
No HP / Whats App : 0823 2613 3990
PIN BBM 5983E244
Alamat : Jalan Imogiri Timur KM 11, 
Blawong 1 , RT 01, Trimulyo, 
Jetis, Bantul 55781.


Anda membutuhkan komponen elektronik , Arduino, Sensor, Tutorial(paket belajar), jasa pembuatan alat berbasis mikrokontroler, kendali lampu via jaringan LAN, dan sebagainya ? anda dapat membelinya di www.kedaiarduino.com
 www.kedaiarduino.com

Friday, November 14, 2014

Pengujian paket belajar basic 4 android untuk interface bluetooth - AVR AT mega - dan Bascom AVR




Gigi Biru, eh  bluetooth, saat ini menjadi tend baru dalam interface / antarmuka antar android dengan mikrokontroler, dapat difungsikan sebagai media untuk mengirim dan menerima data, yang pada ujung akhirya dapat dipergunakan dalam proses logging data data juga dapat dipergunakan dalam pengiriman data sehingga dapat dimanfaatkan dalam proses pengendalian jarak jauh nirkabel (tanpa kabel) dengan jarak dekat, maksimal 10-15 meter, jarak 0-15 meter merupakaan jarak yang masih dapat dijangkau oleh komunikasi bluettooth pada kondisi tanpa penutup (tidak ada penghalang) antara kedua bluetooth yang saling dikomunikasikan, 

Pada percobaan ini, bluetooth yang dipergunakan adalah seri hc 05 atau hc 06, namun yang ada di video adalah modul bluetooth hc 06 yang merupakan modul konverter serial to bluetooth interface sebagai slave saja, penggunaan nya pun cukup mudah, koneksikan VCC_Gnd sesuai dengan pin masing masing, serta koneksikan transmitter (tx), dengan Receiver (Rx) dengan konfigirasi Cross / silang. senjutnya aktfifkan bluetooth pada ponsel android, lakukan pairing dengan modul bluetooth yang ada pada hardware mikrokontroler, buka aplikasi android , lalu koneksikan, jika proses koneksi  antar kedua bluetooth yang ada di ponsel dengan yang ada di hardware mikrokontroler telah sukses ditandai dengan tidak berkedip nya lampu pada modul bluetooth HC 06, maka proses on off dapat dilakukan dengan menekan tombol on/off yang ada pada aplikadi android.

catatan : modul bluetooth hc 06 hanya dapat difungsikan sebagai slave sedangkan modul bluetooth HC 05 dapat difungsikan sebagai master, ndak usah pusing, kita akan menggunakan bluetooth sebagai mode slave saja sehingga modul bluetooth hc 06 sudah lebih dari cukup untuk melakukan proses kendali relay via bluetoorh android, atau bisa juga untuk menampilkan data sensor ke aplikasi android, selain itu state dari pin pin general purpose input output (GPIO) mikrokontoler pun dapat ditampilkan pada aplikasi android jika anda memerlukannya. 
Berikut ini adalah video pengujian kontrol relay dengan menggunakan aplikasi android (ekstensi *.apk), 



dalam video akan deitunjukkan proses pengkonesian hardaware via bluetooth, hingga proses ujicoba menyala matikan relay secara wireless dengan komunikasi bluetooth


Jika anda membutuhkan  Paket Belajar Kontrol lampu melalui komunikasi Bluetooth Bascom AVR– Android
Isi Paket  :
1.    Board AVR
2.    Relay 4 channel
3.    Bluetooth
4.    CD berisi software Arduino, Android Aplication dengan Basic4Android, source Code Bascom AVR
5.    Buku panduan pemrograman Kontrol lampu melalui komunikasi Bluetooth Bascom AVR – Android
CD + Panduan only : Rp.750.000,00
CD + Panduan + Bascom AVR + Relay 4 Channel + Bluetooth = Rp. 1.250.000,00

Contact Person : Taufik Adi Sanjaya
No HP / Whats App : 0823 2613 3990
PIN BBM 5983E244
Alamat : Jalan Imogiri Timur KM 11, 
Blawong 1 , RT 01, Trimulyo, 
Jetis, Bantul 55781.


Anda membutuhkan komponen elektronik , Arduino, Sensor, Tutorial(paket belajar), jasa pembuatan alat berbasis mikrokontroler, kendali lampu via jaringan LAN, dan sebagainya ? anda dapat membelinya di www.kedaiarduino.com
 www.kedaiarduino.com

Wednesday, November 5, 2014

Delphi terima SMS dengan komponen Twavecom

Komponen Twavecom untuk kirim, terima sms, kirim USSD code dsb tidak gratis, silakan hubungi saya untuk informasi harganya,

ini adalah gambar aplikasi testingDelphi terima SMS dengan komponen Twavecom


ini adalah video dokumentasi Delphi terima SMS dengan komponen Twavecom serta saat penggunaan USSD , kirim dan terima data USSD




Fitur :
TWavecom
  • send sms
  • send ussd
  • automatic detect sms in
  • even onreceivesms
  • even onreceiveussd
detail pricing nya sebagai berikut :
hanya VCL saja
  • Price  Rp. 1.500.000,-
  • Price 200$ paypal
VCL + source code
  • Price  Rp. 2.500.000,-
  • Price 300$ paypal
Note :
  • license universal unlimited
  • native vcl
DEMO aplikasi.exe DOWNLOAD DI SINI
Demo Komponen (dapat berjalan jika IDE Delphi terbuka) download
DEMO APLIKASI YANG DIBUAT DENGAN KOMPONEN TERSEBUT DOWNLAD

KONTAK
ADD FACEBOOK , lalu chat/ mesasage : http://www.facebook.com/t.adisanjaya

Contact Person : Taufik Adi Sanjaya
No HP / Whats App : 085743320570
Alamat : Jalan Imogiri Timur KM 11, 
Blawong 1 , RT 01, Trimulyo, 
Jetis, Bantul 55781.

Monday, November 3, 2014

Pemanfaatan DHT 11 + RELAY + AVR + Relay +Lampu + Kipas untuk kendali suhu dan kelembaban

Pada tulisan sebelum nya saya menuliskan tentang penggunaan sensor suhu dan kelembaban untuk membaca data suhu dan kelembaban ditampilkan ke LCD 2 baris 16 kolom, dan sudah mampu menunjukkan data suhu sesuai dengan suhu yang ditunjukkan thermometer dinding, untuk data kelembaban saya tidak memiliki alat lain sebagai kalibrator alias standard pembanding ketepatan hasil pengukuran kelembaban dengan sensor DHT11, jadi saya ndak berani berspekulasi dan menyatakan bahwa pembacaan sensor DHT11 sudah benar,

Sensor DHT 11 sendiri pada bagian body nya terlabel tulisan bahwa error pembacaan data suhu sekitar +/- 2 derajat Celcius, sedangkan error pembacaan data kelembaban sebesar +/- 5% namun saya sendiri tidak dapat membandingkan nya dengan alat yang dapat disebut sebagai standard pengukuran, oke ndak masalah 

Gambar di bawah ini menunjukkan  Pemanfaatan DHT 11 + RELAY + AVR + Relay +Lampu + Kipas untuk kendali suhu dan kelambaban




sedangkan berikut ini adalah video dokumentasi pengujian Pemanfaatan DHT 11 + RELAY + AVR + Relay +Lampu + Kipas untuk kendali suhu dan kelembaban



Pada video tersebut, nampak bahwa kipas dan lampu nyala dan padam berdasarkan setting point yang dibandingkan dengan data suhu dan kelembaban yang terbaca oleh sensor DHT 11


berikut ini adalah list soutrce kode pengambilan keputusan ON/OFF nya lampu berdasar kan source code yang ada

Sub prosesdata()

Do
   Waitms 1500
   Call Get_th(t , H)
   Cls
   locate 1 , 1
   Lcd "T:" ; T ; Chr(2) ; " SP T:" ; suhuatas0 ; Chr(2) ;

   locate 2 , 1
   Lcd "H:" ; H ; "%" ; " SP RH:" ; lembabatas0 ; "%"

if T > suhuatas0 then
   lampu = 1
end IF

if H > lembabatas0 then
   kipas = 1
end IF

if T < suhuatas0 then
   lampu = 0
end IF

if H < lembabatas0 then
kipas = 0
end if
End Sub

Loop


jika suhu di bawah setting point maka lampu sebagai pemanas akan dinyalakan

jika suhu di atas setting point maka lampu sebagai pemanas akan dipadamkan

jika kelembaban terbaca memiliki nilai di bawah setting point maka kipas dipadamkan

jika kelembaban terbaca memiliki nilai di atas setting point maka kipas dinyalakan 

sekian tulisan ini 

Apabila anda memerlukan alat  Pemanfaatan DHT 11 + RELAY + AVR + Relay +Lampu + Kipas untuk kendali suhu dan kelembaban dengan tampilan berbeda, atau funsi berbeda, kami siap menyediakannya , display bisa berupa tampilan pada monitor atau pada seven segment, ukuran 0,56 inch siap, 5 inch pun kamu siap menyediakan 

berikut ini contact person saya :

Contact Person : Taufik Adi Sanjaya
No HP / Whats App : 0823 2613 3990
PIN BBM 5983E244
Alamat : Jalan Imogiri Timur KM 11, 
Blawong 1 , RT 01, Trimulyo, 
Jetis, Bantul 55781.


Anda membutuhkan komponen elektronik , Arduino, Sensor, Tutorial(paket belajar), jasa pembuatan alat berbasis mikrokontroler, kendali lampu via jaringan LAN, dan sebagainya ? anda dapat membelinya di www.kedaiarduino.com
 www.kedaiarduino.com





Sunday, November 2, 2014

Sensor DHT 11 + AVR ATMega 8 + Bascom AVR untuk membaca data suhu dan kelembaban

Pagi yang cerah, walau sedikit gerah, jogja cukup panas akhir akhir ini, denger denger karena matahari sedang berada di sebelah selatan, di atas pulau jawa, jadi dapat dipastikan bahwa suhu di pulau jawa, bali, dan yang bersebelahan ke barat dan ke timur sedang panas panasnya, ga kebayang yang ada di khatulistiwa sana, kalo pas matahari di atas mereka, betapa panasnya..

Intronya segitu aja ya , intermezo. Posting kali ini saya iseng memainkan Sensor DHT 11 + AVR ATMega 8 + Bascom AVR untuk membaca data suhu dan kelembaban ,
sebenarnya sama kontrol on off pemanas dan kipas, tapi dokumentasi video dan foto fotonya emang ndak ada dipasang pemanas dan kipas nya, hanya relay - relay nya saja.


Ini dia gambar - gambar dokumentasi saya saat bermain  Sensor DHT 11 + AVR ATMega 8 + Bascom AVR untuk membaca data suhu dan kelembaban




 video saat uji coba Sensor DHT 11 + AVR ATMega 8 + Bascom AVR untuk membaca data suhu dan kelembaban silakan lihat di bawah ini :



jika anda membutuhkan Sensor DHT 11 + AVR ATMega 8 + Bascom AVR untuk membaca data suhu dan kelembaban boleh kontak saya di :


display Sensor DHT 11 + AVR ATMega 8 + Bascom AVR ke seven segment ukuran badak juga siap,. display Sensor DHT 11 + AVR ATMega 8 + Bascom AVR ke PC juga ndak jadi masalah, sampe ke peyimpanan data ke database microsoft acces siap, ke file TXT pun ndak jadi masalah

Contact Person : Taufik Adi Sanjaya
No HP / Whats App : 0823 2613 3990
PIN BBM 5983E244
Alamat : Jalan Imogiri Timur KM 11, 
Blawong 1 , RT 01, Trimulyo, 
Jetis, Bantul 55781.


Anda membutuhkan komponen elektronik , Arduino, Sensor, Tutorial(paket belajar), jasa pembuatan alat berbasis mikrokontroler, kendali lampu via jaringan LAN, dan sebagainya ? anda dapat membelinya di www.kedaiarduino.com
 www.kedaiarduino.com

Mengakali AVR : Menambah Pin Interupsi pada AVR AT MEGA 8,

Iseng iseng berhadiah, saya iseng aja main main AVR, iseng karena ada yang bayar maksudnya
untuk sebuah proyek kadang kita memerlukan pin interupsi yang tidak hanya 2 buah saja, ada kalanya kita butuh 4, 5,6,7,8 atau bahkan 30 pin interupsi (ah ini kegilaan saya aja, tidak disarankan dikit dikit interupsi, nanti ketua rapatnya bisa setress gara gara kebanyakan anda interupsi, apalagi udah sepuh, dan anda sampai naik ke panggung ketua rapat)

oke, idenya begini :
sebenarnya interupsi yang kita pergunakan tetap pin interupsi yang sudah ada secara default, namun kita akalin dengan mem-paralelnya dengan pin general purpose input output, sehingga tombol GPIO semisal kita tekan (dalam hal ini diset low actif) secara otomatis interupsi ikut terkena imbasnya (menjadi ikut berlogika 0), catatan: jangan lupa setting interupsi pada LOW LEVEL, sehingga ketika interupsi terjadi akan dapat dicek pin mana yang bersama sama pin interupsi mendapat logika ), lalu jalan kan interupsi yang bersesuaian, 

berikut ini gambar skematik Mengakali AVR : Menambah Pin Interupsi pada AVR AT MEGA 8,


berikut ini adalah source code Mengakali AVR : Menambah Pin Interupsi pada AVR AT MEGA 8

$regfile = "m8def.dat"
$crystal = 1000000
'--------------------------
Config Lcdpin = Pin , Db4 = Portc.2 , Db5 = Portc.3 , Db6 = Portc.4 , Db7 = Portc.5 , E = Portc.1 , Rs = Portc.0
Config Lcd = 16 * 2

Cursor Off
Cls

Tombol_up_suhu Alias Pinb.5
Tombol_down_suhu Alias Pinb.4
Tombol_up_Rh Alias PinB.3
Tombol_down_Rh alias PinB.2

Config Portb.5 = Input                                      'menu
Config Portb.4 = Input                                      'OK

Config PortB.3 = Input                                      'up
Config PortB.2 = Input                                      'down

Config PortD.2 = Input                                      'down
PortD.2 = 1

Config Pinb.5 = Input                                       'menu
Config Pinb.4 = Input                                       'OK

Config Pinb.3 = Input                                       'up
Config Pinb.2 = Input                                       'down

PINB.5 = 1
PINb.4 = 1
PINB.3 = 1
PINB.2 = 1

config PORTD.0 = output                                     'relay kipas
kipas alias PORTD.0
portD.0 = 0
wait 1
portD.0 = 1

config PORTD.1 = output
lampu alias PORTD.1                                         'relay lampu
portD.1 = 0
wait 1
portD.1 = 1

Config Int0 = Low Level
On Int0 Int_ext0

Enable Interrupts
Enable Int0

'dim batassuhu as eram Byte
'dim batasrh as eram Byte

dim suhuatas as Word
dim lembabatas as Word


utama:
do
cls
locate 1 , 1
lcd "Kontrol Suhu dan"
locate 2 , 1
lcd "Kelembaban"
wait 3
loop

End

Int_ext0:

 if tombol_up_suhu = 0 then
 incr suhuatas                                              '= suhuatas + 1
 if suhuatas > 100 then
 suhuatas = 0
 end IF
 cls
 locate 1 , 1
 lcd "Batas Suhu"
 locate 2 , 1
 lcd suhuatas , " Celcius"
 ''Writeeeprom suhuatas , 0
 waitms 250

 end IF

 if tombol_down_suhu = 0 then
 DECR suhuatas                                              '= suhuatas - 1
 if suhuatas < 1 then
 suhuatas = 100
 end IF
 cls
 locate 1 , 1
 lcd "Batas Suhu"
 locate 2 , 1
 lcd suhuatas , " Celcius"
'' Writeeeprom suhuatas , 0
   waitms 250
 end IF

 if tombol_up_rh = 0 then
 incr lembabatas                                            '= lembabatas + 1
 if lembabatas > 100 then
 lembabatas = 0
 end IF
 cls
 locate 1 , 1
 lcd "Batas Kelembaban"
 locate 2 , 1
 lcd lembabatas , " %"
 ''Writeeeprom suhuatas , 0
waitms 250

 end IF

if tombol_down_rh = 0 then
 decr lembabatas                                            '= lembabatas - 1
 if lembabatas < 1 then
 lembabatas = 100
 end IF

 cls
 locate 1 , 1
 lcd "Batas Kelembaban"
 locate 2 , 1
 lcd lembabatas , " %"
'' Writeeeprom suhuatas , 0   s
waitms 250
 end IF

Return

silakan download file simulasi dan source code Menambah Pin Interupsi pada AVR AT MEGA 8 KLIK DI SINI

Contact Person : Taufik Adi Sanjaya
No HP / Whats App : 0823 2613 3990
PIN BBM 5983E244
Alamat : Jalan Imogiri Timur KM 11, 
Blawong 1 , RT 01, Trimulyo, 
Jetis, Bantul 55781.


Anda membutuhkan komponen elektronik , Arduino, Sensor, Tutorial(paket belajar), jasa pembuatan alat berbasis mikrokontroler, kendali lampu via jaringan LAN, dan sebagainya ? anda dapat membelinya di www.kedaiarduino.com
 www.kedaiarduino.com

 
Design by Free WordPress Themes | Bloggerized by Lasantha - Premium Blogger Themes | Hot Sonakshi Sinha, Car Price in India