Senin, 23 April 2018

MOTOR SERVO


NAMA  : ADIAN                                 NIM       : 153600049
NAMA  : TEDDY SEPTIAN                NIM       : 153600042

TUJUAN PERCOBAAN
Membuat dua motor servo sebagai pembuka dua portal atau pintu.

PROGRAM MICROKONTROL


#include <Servo.h>

Servo servobody, servojari;

int pos = 0;
int pos1 = 0;  

void setup() {
  servobody.attach(9);
  servojari.attach(10); 
}

void loop() {
 
  for (pos = 0, pos1=90; pos <= 90,pos1>=0; pos += 1,pos1 -=1)

  {
    servojari.write(pos1);
    servobody.write(pos);            
    delay(15);                     
  }
 
  for (pos = 90,pos1=0;pos >=0 ,pos1 <= 90; pos -= 1,pos1 +=1)
  {
    servobody.write(pos);
    servojari.write(pos1);            
    delay(15);                      
  } 
}

HASIL


Selasa, 17 April 2018

MEMBUAT PUSH BUTTON UNTUK MENGUBAH ARAH RUNNING LED


NAMA  : ADIAN                                 NIM       : 153600049
NAMA  : TEDDY SEPTIAN                NIM       : 153600042

TUJUAN PERCOBAAN
Membuat Push Button untuk Mengubah arah Running LED Ke Kanan Dan Ke Kiri.

PROGRAM MICROKONTROL

int led[]={4,5,6,7,8,9};
int tombol=3;
int n;
void setup() {
 pinMode(tombol,INPUT);
 for (n=1;n<7;n++){
  pinMode(led[n],OUTPUT);
 }
}
void geserkanan()
{
  int n;
  for (n=0;n<7;n++){
    digitalWrite(led[n],HIGH);
    delay(100);
    digitalWrite(led[n],LOW);
  }
}
void geserkiri()
{
  int n;
  for (n=7;n>0;n--){
    digitalWrite(led[n],HIGH);
    delay(100);
    digitalWrite(led[n],LOW);
  }
}
void loop() {
int x=digitalRead(tombol);
delay (10);
if(x==0){
  geserkanan();
  delay (100);
}
else{
  geserkiri();
  delay(100);
}
}

HASIL



MENYALAKAN DAN MEMATIKAN LED DENGAN PUSH BUTTON DENGAN ARDUINO


NAMA  : ADIAN                                 NIM       : 153600049
NAMA  : TEDDY SEPTIAN                NIM       : 153600042

TUJUAN PERCOBAAN
Membuat Push Button untuk Menyalakan dan Mematikan lampu LED.

PROGRAM MICROKONTROL

int a=0;
int x=0;
void setup() {
  Serial.begin(9600);
  pinMode(3, INPUT_PULLUP);
  pinMode(13, OUTPUT);

}

void loop() {
 x=digitalRead(3);
  Serial.println(x);
  delay(200);


  if (x == HIGH)
  if (a==0){
    digitalWrite(13, HIGH);
    a=1;
    x=0;
  } else {
    a=0;
    x=1;
    digitalWrite(13, LOW);
  }
}


HASIL

Rabu, 11 April 2018

MEMBUAT NADA LAGU PADA ARDUINO


NAMA  : ADIAN                                 NIM       : 153600049
NAMA  : TEDDY SEPTIAN                NIM       : 153600042

TUJUAN PERCOBAAN
Membuat nada lagu cicak cicak didinding dengan mengatur frekuensi.
PROGRAM MICROKONTROL
void setup() {
 pinMode(8,OUTPUT);

}

void loop() {
noTone(8);
delay(1000);
tone(8,396,200);
delay(300);
noTone(8);
tone(8,330,200);
delay(300);

noTone(8);
tone(8,396,200);
delay(300);
noTone(8);
tone(8,330,200);
delay(300);

noTone(8);
tone(8,330,200);
delay(300);
noTone(8);
tone(8,352,200);
delay(300);

noTone(8);
tone(8,396,200);
delay(600);

noTone(8);
tone(8,352,200);
delay(300);
noTone(8);
tone(8,297,200);
delay(300);

noTone(8);
tone(8,352,200);
delay(300);
noTone(8);
tone(8,440,200);
delay(300);

noTone(8);
tone(8,396,200);
delay(300);
noTone(8);
tone(8,352,200);
delay(300);

noTone(8);
tone(8,330,200);
delay(600);

//baris 2

noTone(8);
tone(8,440,200);
delay(300);
noTone(8);
tone(8,352,200);
delay(300);

noTone(8);
tone(8,440,200);
delay(300);
noTone(8);
tone(8,352,200);
delay(300);

noTone(8);
tone(8,440,200);
delay(300);
noTone(8);
tone(8,495,200);
delay(300);

noTone(8);
tone(8,528,200);
delay(600);

noTone(8);
tone(8,528,200);
delay(600);

noTone(8);
tone(8,330,200);
delay(300);
noTone(8);
tone(8,396,200);
delay(300);

noTone(8);
tone(8,352,200);
delay(300);
noTone(8);
tone(8,297,200);
delay(300);

noTone(8);
tone(8,264,200);
delay(600);


}

HASIL


Rabu, 04 April 2018

PERCOBAAN RUNNING LED ARDUINO


PERCOBAAN RUNNING LED


NAMA  : ADIAN                                 NIM       : 153600049
NAMA  : TEDDY SEPTIAN                NIM       : 153600042

TUJUAN PERCOBAAN
Mengatur dan memprogram microkontrol menghidupkan lampu LED secara berurutan bolak balik atau membuat running LED. Dengan kecepatan nyala yang ditentukan.

PROGRAM MICROKONTROL
int LED []= {2,3,4,5,6,7};
void setup() {
int n;
  for (n=0;n<6;n++){
    pinMode (LED[n],OUTPUT);
  }

}

void loop() {
 int n;
 int tunda=100;
 for (n=0;n<6;n++){
  digitalWrite (LED[n],HIGH);
  delay(tunda);
  digitalWrite (LED[n],LOW);
  delay(tunda);
 }
 for (n=6;n>0;n--){
  digitalWrite (LED[n],HIGH);
  delay(tunda);
  digitalWrite (LED[n],LOW);
  delay(tunda);
 }
}

HASIL PERCOBAAN


PERCOBAAN PROGRAM PASCAL DASAR 1

NAMA  : ADIAN                                 NIM       : 153600049 NAMA  : TEDDY SEPTIAN                NIM       : 153600042 Peng...