Komunikasi ARDUINO dengan Microsoft Visual Basic 6.0

I. Tujuan
  - Agar siswa Mengetahui Pemograman Microsoft Visual Basic
  - Agar siswa dapat mengembangkan komunikasi Serial dengan Software lain.
  - Dapat Mengoperasikan ARDUINO Lewat Software
  - Dapat Membuat Software untuk Mengoperasikan Arduino

II. Alat dan Bahan
  - Kabel jumper Male
  - LED
  - Resistor 330 ohm
  - Arduino UNO R3 SMD
  - Seven Segment
  - Seperangkat PC
  - Kabel data Arduino/Printer
  - Protoboard / Breadboard

III. Cara Kerja
  - Jika tombol ON di tekan Maka Led akan Menyala.
  - Jika tombol OFF di tekan Maka Led dan Seven Segmen akan Mati
  - Jika tombol "7 Segmen" di tekan maka Seven Segmen akan menyala secara memutar dari kaki a sampai g
  - Jika tombol ON dan "7 Segmen" di tekan maka Led akan Menyala dan Seven Segmen juga akan Memutar

IV. Langkah Kerja
  - Download Microsoft Visual Basic 6.0 KLIK
  - INSTAL Microsoft Visual basic. (contoh menginstal bisa searching di mbah google)
  - Buka Microsoft Visual basic
  - Buat Layout Yang di inginkan. di bawah ini contoh layout yang saya buat.

              keterangan :
                              - untuk Membuat "ON","OFF", dan "7 Segmen" .mengunakan Command button pada Microsoft Visual Basic.
                              - Untuk membuat Indikator LED. menggunakan Shape.
                              - gambar Seperti telefon jadul di atas berfungsi sebagai alat komunikasi arduino dengan Komputer

  - Buka Software Arduino IDE.
  - Buat Program komunikasi serial. Berikut contoh Program Arduino yang telah saya buat:

char val;                                             
int Led = 13;
#define a 2
#define b 3
 #define c 4
 #define d 5
 #define e 6
 #define f 7
 #define g 8


void setup() {
   pinMode(Led,OUTPUT);
   Serial.begin(9600);
   pinMode(a,OUTPUT);
   pinMode(b,OUTPUT);
   pinMode(c,OUTPUT);
   pinMode(d,OUTPUT);
   pinMode(e,OUTPUT);
   pinMode(f,OUTPUT);
   pinMode(g,OUTPUT);
}

void loop() {
    if( Serial.available() >0 )  
{
    val = Serial.read();
    Serial.println(val);
}
    if( val == '1' )          
       { digitalWrite(Led,HIGH);
       Serial.write("nyala");
       }
    else if( val == '0' )          
       { digitalWrite(Led,LOW); }
digitalWrite(a,LOW);
digitalWrite(b,LOW);
digitalWrite(c,LOW);
digitalWrite(d,LOW);
digitalWrite(e,LOW);
digitalWrite(f,LOW);
digitalWrite(g,LOW);
if (val == 'a'){
  ss();}
}

void ss(){
  digitalWrite(a,HIGH);
  delay(200);
digitalWrite(a,LOW);
delay(200);
 digitalWrite(b,HIGH);
  delay(200);
digitalWrite(b,LOW);
 delay(200);
  digitalWrite(c,HIGH);
  delay(200);
digitalWrite(c,LOW);
 delay(200);
 digitalWrite(d,HIGH);
  delay(200);
digitalWrite(d,LOW);
delay(200);
 digitalWrite(e,HIGH);
  delay(200);
digitalWrite(e,LOW);
 delay(200);
  digitalWrite(f,HIGH);
  delay(200);
digitalWrite(f,LOW);
 delay(200);
}
  - Hubungkan Arduino dan PC dengan Kabel data
  - Compile dan Upload Program ke arduino
  - Buat Program pada Microsoft Visual basic. Berikut contoh Program saya

  - Selesai membuat program Pada Microsoft Visual basic lalu play untuk melihat hasil Pemograman.

LIHAT HASIL KERJA

daftar Pustaka : http://www.hadiblacksite.com/2013/03/download-visual-basic-60-enterprise.html

By : Andi Gilang P

SMK LEONARDO KLATEN

(AGP)