Go Down

Topic: Video killed the radio star en 8 bits (Read 444 times) previous topic - next topic

Forcas36

Aug 03, 2019, 02:05 am Last Edit: Aug 03, 2019, 03:12 am by Forcas36
Buenas, he hecho el código de la canción video killed the radio star en 8 bits ideal para usarse en piezoeléctricos y en buzzers(aunque personalmente prefiero el piezoeléctrico). 

Code: [Select]

//NOTAS
long lasize = 932.33,
     sollaze = 830.61,
     doreze = 554.37;

long  dooun = 1046.50,
      doreun = 1108.73,
      remiun = 1244.51,
      faun = 1396.91,
      fasolun = 1479.98,
      sollaun = 1661.22,
      lasiun = 1975.53;

long doredo = 2217.46;

int ajuste = 30;
void setup()
{
  pinMode(11, OUTPUT);
}

void loop()
{
    //intro 0:18
    tone(11, doreun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, doreun);
    delay(150 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, remiun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, remiun);
    delay(150);

    //intro parte 2
    tone(11, doreun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, doreun);
    delay(150 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, remiun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, remiun);
    delay(150 + ajuste);




    //intro primer complemento
    tone(11, doreun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, doreun);
    delay(150 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, remiun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, remiun);
    delay(300 + ajuste);
    noTone(11);
    delay(300 + ajuste);


    //intro 2
    tone(11, doreun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, doreun);
    delay(150 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, remiun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, remiun);
    delay(150 + ajuste);

    //intro 2 parte 2
    tone(11, doreun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, doreun);
    delay(150 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, remiun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, remiun);
    delay(150 + ajuste);

    //intro 2 complemento 2
    tone(11, doreun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, doreun);
    delay(50 + ajuste);
    tone(11, remiun);
    delay(50 + ajuste);
    noTone(11);
    delay(150 + ajuste);
    tone(11, remiun);
    delay(300 + ajuste);
    noTone(11);
    delay(300 + ajuste);

    //preludio a auu auu ah
    tone(11, doreun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, doreun);
    delay(150 + ajuste);
    tone(11, dooun);
    delay(100 + ajuste);
    noTone(11);
    delay(50 + ajuste);
    tone(11, dooun);
    delay(150 + ajuste);

    tone(11, lasize);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, lasize);
    delay(150 + ajuste);
    tone(11, sollaze);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, lasize);
    delay(150 + ajuste);
    noTone(11);
    delay(25 + ajuste);
    tone(11, sollaze);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, sollaze);
    delay(150 + ajuste);
    tone(11, lasize);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, sollaze);
    delay(300 + ajuste);
    noTone(11);
    delay(300 + ajuste);

    //auu auu ah
    tone(11, sollaun);
    delay(350 + ajuste);
    tone(11, doredo);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, lasiun);
    delay(400 + ajuste);
    noTone(11);
    delay(450 + ajuste);

    //you need to tell them
    tone(11, doreun);
    delay(150 + ajuste);
    tone(11, remiun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, doreun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, faun);
    delay(250 + ajuste);
    tone(11, remiun);
    delay(150 + ajuste);
    tone(11, doreun);
    delay(150 + ajuste);
    noTone(11);
    delay(25 + ajuste);

    //auu auu ah segundo
    tone(11, sollaun);
    delay(350 + ajuste);
    tone(11, doredo);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, lasiun);
    delay(400 + ajuste);
    noTone(11);
    delay(450 + ajuste);

    //you are the first one
    tone(11, doreun);
    delay(150 + ajuste);
    tone(11, remiun);
    delay(100 + ajuste);
    tone(11, doreun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, faun);
    delay(250 + ajuste);
    tone(11, remiun);
    delay(150 + ajuste);
    tone(11, doreun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);


    //radio killed the radio star
    tone(11, faun);
    delay(150 + ajuste);
    tone(11, sollaun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, sollaun);
    delay(150 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, sollaun);
    delay(200 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, sollaun);
    delay(50);
    noTone(11);
    delay(100 + ajuste);
    tone(11, sollaun);
    delay(300 + ajuste);
    tone(11, lasiun);
    delay(150 + ajuste);
    tone(11, fasolun);
    delay(150 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, fasolun);
    delay(300 + ajuste);
    noTone(11);
    delay(300 + ajuste);


    //segundo radio killed the radio star
    tone(11, faun);
    delay(150 + ajuste);
    tone(11, sollaun);
    delay(50 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, sollaun);
    delay(150 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, sollaun);
    delay(200 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, sollaun);
    delay(50);
    noTone(11);
    delay(100 + ajuste);
    tone(11, sollaun);
    delay(300 + ajuste);
    tone(11, lasiun);
    delay(150 + ajuste);
    tone(11, fasolun);
    delay(150 + ajuste);
    noTone(11);
    delay(100 + ajuste);
    tone(11, fasolun);
    delay(300 + ajuste);
    noTone(11);
    delay(300 + ajuste);

  //final in my mind and in my car

  tone(11, faun);
  delay(100 + ajuste);
  noTone(11);
  delay(50 + ajuste);
  tone(11, faun);
  delay(300 + ajuste);
  tone(11, remiun);
  delay(300 + ajuste);
  noTone(11);
  delay(100 + ajuste);
  tone(11, remiun);
  delay(150 + ajuste);
  tone(11, fasolun);
  delay(300 + ajuste);
  noTone(11);
  delay(25 + ajuste);
  tone(11, doreun);
  delay(200 + ajuste);
  noTone(11);
  delay(100 + ajuste);
  tone(11, doreun);
  delay(600 + ajuste);
  noTone(11);
  delay(300 + ajuste);

  tone(11,remiun);//conexion
  delay(150+ajuste);

  tone(11, faun);
  delay(100 + ajuste);
  noTone(11);
  delay(50 + ajuste);
  tone(11, faun);
  delay(300 + ajuste);
  tone(11, remiun);
  delay(300 + ajuste);
  noTone(11);
  delay(100 + ajuste);
  tone(11, remiun);
  delay(150 + ajuste);
  tone(11, fasolun);
  delay(300 + ajuste);
  noTone(11);
  delay(25 + ajuste);
  tone(11, doreun);
  delay(200 + ajuste);
  noTone(11);
  delay(100 + ajuste);
  tone(11, doreun);
  delay(600 + ajuste);
  noTone(11);
  delay(300 + ajuste);

  //ultimos tonos
  tone(11, doreun);
  delay(300+ ajuste);
  noTone(11);
  delay(150+ ajuste);
  tone(11, lasize);
  delay(50+ ajuste);
  noTone(11);
  delay(100+ ajuste);
  tone(11, doreun);
  delay(50+ ajuste);
  noTone(11);
  delay(100+ ajuste);
  tone(11, remiun);
  delay(150+ ajuste);
  tone(11, faun);
  delay(100+ ajuste);
  noTone(11);
  delay(100+ ajuste);
  tone(11, doreun);
  delay(300+ ajuste);
  tone(11, lasize);
  delay(100+ ajuste);
  noTone(11);
  delay(1200+ajuste);

  //repeticion ultimos tonos
  tone(11, doreun);
  delay(300+ ajuste);
  noTone(11);
  delay(150+ ajuste);
  tone(11, lasize);
  delay(50+ ajuste);
  noTone(11);
  delay(100+ ajuste);
  tone(11, doreun);
  delay(50+ ajuste);
  noTone(11);
  delay(100+ ajuste);
  tone(11, remiun);
  delay(150+ ajuste);
  tone(11, faun);
  delay(100+ ajuste);
  noTone(11);
  delay(100+ ajuste);
  tone(11, doreun);
  delay(300+ ajuste);
  tone(11, lasize);
  delay(100+ ajuste);
  noTone(11);
  delay(5000+ajuste);
}

Go Up