// ---------------------------------------------------------------------------
// (| " SuperMarioBross_buzzer.ino                                         "|)
// (| " Este es un sencillo ejemplo de Melodia de SuperMarioBross con tonos"|)
// (| " en Arduino usando un buzzer pasivo. Se utilizara un resistor de    "|)
// (| " 220Ω para limitar la corriente consumidad por el buzzer y se       "|)
// (| " activara el resistor de pull-up interno de Arduino para mantener el"|)
// (| " pin D2 en alto y leer asi un bajo cuando sea pulsado.              "|)
// (| "                                                                    "|)
// (| " Un buzzer es un zumbador piezoelectrico.                           "|)
// (| "                                                                    "|)
// (| " Un pin del pulsador va al pin 2 del Arduino UNO Rev3 / NANO y el   "|)
// (| " otro extremo va a GND.                                             "|)
// (| " El pin positivo o signal del buzzer va al pin 9 del Arduino UNO    "|)
// (| " Rev3/NANO medianta un resistor de 220Ω  y el otro extremo va a GND."|)
// (| "                                                                    "|)
// (| " Este código de ejemplo es de dominio público.                      "|)
// (| "                                                                    "|)
// (| " Maker: jorgechac©                                                  "|)
// (| " Visita https://jorgechac.blogspot.com/                             "|)
// (| "                                                                    "|)
// (| " Venta de accesorios Arduino/Raspberry Pi Pico/ESP32                "|)
// (| " Whatsapp y Ventas NEQUI +573177295861                              "|)
// (| " Bucaramanga - Colombia                                             "|)
// (| " Simulación https://wokwi.com/projects/341210107398324819           "|)
// ---------------------------------------------------------------------------

int boton = 2;    //Pin 2 de arduino para leer el boton "iniciar melodia"
int pinSound = 9; //Pin 9 de arduino para el + del zumbador

void setup() {
pinMode (pinSound,OUTPUT);     // Pin para reproducir la frecuencia del tono
pinMode (boton, INPUT_PULLUP); // Pulsador para accionar la melodia 
}

void melody_marioBros()
{
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(916.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 391, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 329, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 493, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 466, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 391, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 880, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 493, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 391, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 329, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 493, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 466, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 391, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 880, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 493, 83.3333333333);
    delay(83.3333333333);
    delay(541.666666667);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 739, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 622, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 415, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 739, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 622, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 1046, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 1046, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 1046, 83.3333333333);
    delay(83.3333333333);
    delay(666.666666667);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 739, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 622, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 415, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 622, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(1166.66666667);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 739, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 622, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 415, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 739, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 622, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 1046, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 1046, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 1046, 83.3333333333);
    delay(83.3333333333);
    delay(666.666666667);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 739, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 622, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 415, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 622, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(916.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 391, 83.3333333333);
    delay(83.3333333333);
    delay(416.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(1041.66666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 391, 83.3333333333);
    delay(83.3333333333);
    delay(416.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(916.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 391, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 329, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 493, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 466, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 391, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 880, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 493, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 391, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 329, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 493, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 466, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 391, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 880, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 493, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 391, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 415, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(416.666666667);
    tone(pinSound, 493, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 880, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 880, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 880, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 783, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 391, 83.3333333333);
    delay(83.3333333333);
    delay(416.666666667);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 391, 83.3333333333);
    delay(83.3333333333);
    delay(291.666666667);
    tone(pinSound, 415, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 440, 83.3333333333);
    delay(83.3333333333);
    delay(416.666666667);
    tone(pinSound, 493, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(166.666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(41.6666666667);
    tone(pinSound, 698, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 659, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 587, 83.3333333333);
    delay(83.3333333333);
    delay(83.3333333333);
    tone(pinSound, 523, 83.3333333333);
    delay(83.3333333333);
    delay(916.666666667);
    tone(pinSound, 130, 102.272625);
    delay(113.63625);
    tone(pinSound, 261, 102.272625);
    delay(113.63625);
    tone(pinSound, 110, 102.272625);
    delay(113.63625);
    tone(pinSound, 220, 102.272625);
    delay(113.63625);
    tone(pinSound, 116, 102.272625);
    delay(113.63625);
    tone(pinSound, 233, 102.272625);
    delay(113.63625);
    delay(1136.3625);
    tone(pinSound, 130, 102.272625);
    delay(113.63625);
    tone(pinSound, 261, 102.272625);
    delay(113.63625);
    tone(pinSound, 110, 102.272625);
    delay(113.63625);
    tone(pinSound, 220, 102.272625);
    delay(113.63625);
    tone(pinSound, 116, 102.272625);
    delay(113.63625);
    tone(pinSound, 233, 102.272625);
    delay(113.63625);
    delay(1136.3625);
    tone(pinSound, 87, 102.272625);
    delay(113.63625);
    tone(pinSound, 174, 102.272625);
    delay(113.63625);
    tone(pinSound, 73, 102.272625);
    delay(113.63625);
    tone(pinSound, 146, 102.272625);
    delay(113.63625);
    tone(pinSound, 77, 102.272625);
    delay(113.63625);
    tone(pinSound, 155, 102.272625);
    delay(113.63625);
    delay(1136.3625);
    tone(pinSound, 87, 102.272625);
    delay(113.63625);
    tone(pinSound, 174, 102.272625);
    delay(113.63625);
    tone(pinSound, 73, 102.272625);
    delay(113.63625);
    tone(pinSound, 146, 102.272625);
    delay(113.63625);
    tone(pinSound, 77, 102.272625);
    delay(113.63625);
    tone(pinSound, 155, 102.272625);
    delay(113.63625);
    delay(909.09);
    tone(pinSound, 155, 68.18175);
    delay(75.7575);
    tone(pinSound, 146, 68.18175);
    delay(75.7575);
    tone(pinSound, 138, 68.18175);
    delay(75.7575);
    tone(pinSound, 130, 102.272625);
    delay(113.63625);
    delay(113.63625);
    tone(pinSound, 155, 102.272625);
    delay(113.63625);
    delay(113.63625);
    tone(pinSound, 146, 102.272625);
    delay(113.63625);
    delay(113.63625);
    tone(pinSound, 103, 102.272625);
    delay(113.63625);
    delay(113.63625);
    tone(pinSound, 97, 102.272625);
    delay(113.63625);
    delay(113.63625);
    tone(pinSound, 138, 102.272625);
    delay(113.63625);
    delay(113.63625);
    tone(pinSound, 130, 68.18175);
    delay(75.7575);
    tone(pinSound, 184, 68.18175);
    delay(75.7575);
    tone(pinSound, 174, 68.18175);
    delay(75.7575);
    tone(pinSound, 164, 68.18175);
    delay(75.7575);
    tone(pinSound, 233, 68.18175);
    delay(75.7575);
    tone(pinSound, 220, 68.18175);
    delay(75.7575);
    tone(pinSound, 207, 102.272625);
    delay(113.63625);
    delay(37.87875);
    tone(pinSound, 155, 102.272625);
    delay(113.63625);
    delay(37.87875);
    tone(pinSound, 123, 102.272625);
    delay(113.63625);
    delay(37.87875);
    tone(pinSound, 116, 102.272625);
    delay(113.63625);
    delay(37.87875);
    tone(pinSound, 110, 102.272625);
    delay(113.63625);
    delay(37.87875);
    tone(pinSound, 103, 102.272625);
    delay(113.63625);    
  }
       
void loop() {
   if(digitalRead(boton)==LOW)
   {
     melody_marioBros();
     delay(1000);
     noTone(9);
   }
}