4º Tecnología


Entrar al siguiente enlace y realizar el test
TEST FINAL ROBÓTICA

//PROGRAMA PIANO POR LUZ
int luz;
void setup() {
  pinMode (13, OUTPUT);

}

void loop() {
luz=analogRead(A1);
if (luz>700){
  digitalWrite  (13,LOW);
  noTone(9);
 
  }
if (luz>600&&luz<700){
  digitalWrite  (13,HIGH);
  tone(9,261);
  delay(100);
  }
if (luz<500&&luz>400){
  digitalWrite  (13,HIGH);
  tone(9,293);
  delay(100);
  }
if (luz<400&&luz>300){
  digitalWrite  (13,HIGH);
  tone(9,329);
  delay(100);
  }
  if (luz<300&&luz>200){
  digitalWrite  (13,HIGH);
  tone(9,349);
  delay(100);
  }
  if (luz<200&&luz>100){
  digitalWrite  (13,HIGH);
  tone(9,392);
  delay(100);
  }
   if (luz<100&&luz>50){
  digitalWrite  (13,HIGH);
  tone(9,440);
  delay(100);
  }
if (luz<50){
  digitalWrite  (13,HIGH);
  tone(9,493);
  delay(100);
  }

}

Comentarios