Usando VB para controlar Arduino (4 / 5 paso)

Paso 4: Sketch de Arduino

Añadir el siguiente código a su arduino.

ledPin1 int = 2;
int ledPin2 = 3;

ledPin3 int = 4;

ledPin4 int = 5;

ledPin5 int = 6;

void setup() {}

Serial.Begin (9600); //set serie velocidad. Introduzca este valor de velocidad en baudios

}

void loop() {}

mientras que (Serial.available() == 0); no hacer nada si no enviado

int val = Serial.read() - '0'; deducir el valor ascii de '0' para encontrar el valor numérico del número enviado

Si (val == 1) {//for botón 1

digitalWrite(ledPin1,HIGH);

Delay(500);

digitalWrite(ledPin2,HIGH);

Delay(500);

digitalWrite(ledPin3,HIGH);

Delay(500);

digitalWrite(ledPin4,HIGH);

Delay(500);

digitalWrite(ledPin5,HIGH);

Delay(500);

}

else if (val == 2) {//for botón 2

digitalWrite(ledPin5,LOW);

Delay(500);

digitalWrite(ledPin4,LOW);

Delay(500);

digitalWrite(ledPin3,LOW);

Delay(500);

digitalWrite(ledPin2,LOW);

Delay(500);

digitalWrite(ledPin1,LOW);

Delay(500);

}

else if (val == 3) {//for botón 3

digitalWrite(ledPin1,HIGH);

digitalWrite(ledPin2,HIGH);

digitalWrite(ledPin3,HIGH);

digitalWrite(ledPin4,HIGH);

digitalWrite(ledPin5,HIGH);

} else if (val == 4) {//for botón 4

digitalWrite(ledPin1,LOW);

digitalWrite(ledPin2,LOW);

digitalWrite(ledPin3,LOW);

digitalWrite(ledPin4,LOW);

digitalWrite(ledPin5,LOW);

} else {//if nadie sobre el comando, no

}

Serial.Flush(); claro puerto serie

}