#define NOTE_B0 31 #define NOTE_C1 33 #define NOTE_CS1 35 #define NOTE_D1 37 #define NOTE_DS1 39 #define NOTE_E1 41 #define NOTE_F1 44 #define NOTE_FS1 46 #define NOTE_G1 49 #define NOTE_GS1 52 #define NOTE_A1 55 #define NOTE_AS1 58 #define NOTE_B1 62 #define NOTE_C2 65 #define NOTE_CS2 69 #define NOTE_D2 73 #define NOTE_DS2 78 #define NOTE_E2 82 #define NOTE_F2 87 #define NOTE_FS2 93 #define NOTE_G2 98 #define NOTE_GS2 104 #define NOTE_A2 110 #define NOTE_AS2 117 #define NOTE_B2 123 #define NOTE_C3 131 #define NOTE_CS3 139 #define NOTE_D3 147 #define NOTE_DS3 156 #define NOTE_E3 165 #define NOTE_F3 175 #define NOTE_FS3 185 #define NOTE_G3 196 #define NOTE_GS3 208 #define NOTE_A3 220 #define NOTE_AS3 233 #define NOTE_B3 247 #define NOTE_C4 262 #define NOTE_CS4 277 #define NOTE_D4 294 #define NOTE_DS4 311 #define NOTE_E4 330 #define NOTE_F4 349 #define NOTE_FS4 370 #define NOTE_G4 392 #define NOTE_GS4 415 #define NOTE_A4 440 #define NOTE_AS4 466 #define NOTE_B4 494 #define NOTE_C5 523 #define NOTE_CS5 554 #define NOTE_D5 587 #define NOTE_DS5 622 #define NOTE_E5 659 #define NOTE_F5 698 #define NOTE_FS5 740 #define NOTE_G5 784 #define NOTE_GS5 831 #define NOTE_A5 880 #define NOTE_AS5 932 #define NOTE_B5 988 #define NOTE_C6 1047 #define NOTE_CS6 1109 #define NOTE_D6 1175 #define NOTE_DS6 1245 #define NOTE_E6 1319 #define NOTE_F6 1397 #define NOTE_FS6 1480 #define NOTE_G6 1568 #define NOTE_GS6 1661 #define NOTE_A6 1760 #define NOTE_AS6 1865 #define NOTE_B6 1976 #define NOTE_C7 2093 #define NOTE_CS7 2217 #define NOTE_D7 2349 #define NOTE_DS7 2489 #define NOTE_E7 2637 #define NOTE_F7 2794 #define NOTE_FS7 2960 #define NOTE_G7 3136 #define NOTE_GS7 3322 #define NOTE_A7 3520 #define NOTE_AS7 3729 #define NOTE_B7 3951 #define NOTE_C8 4186 #define NOTE_CS8 4435 #define NOTE_D8 4699 #define NOTE_DS8 4978 #define REST 0 int rojo = 6; int verde = 9; int azul = 10; int melody1[] = { NOTE_E4,4, NOTE_E4,4, NOTE_F4,4, NOTE_G4,4,//1 NOTE_G4,4, NOTE_F4,4, NOTE_E4,4, NOTE_D4,4, NOTE_C4,4, NOTE_C4,4, NOTE_D4,4, NOTE_E4,4, NOTE_E4,-4, NOTE_D4,8, NOTE_D4,2, NOTE_E4,4, NOTE_E4,4, NOTE_F4,4, NOTE_G4,4,//4 NOTE_G4,4, NOTE_F4,4, NOTE_E4,4, NOTE_D4,4, NOTE_C4,4, NOTE_C4,4, NOTE_D4,4, NOTE_E4,4, NOTE_D4,-4, NOTE_C4,8, NOTE_C4,2, NOTE_D4,4, NOTE_D4,4, NOTE_E4,4, NOTE_C4,4,//8 NOTE_D4,4, NOTE_E4,8, NOTE_F4,8, NOTE_E4,4, NOTE_C4,4, NOTE_D4,4, NOTE_E4,8, NOTE_F4,8, NOTE_E4,4, NOTE_D4,4, NOTE_C4,4, NOTE_D4,4, NOTE_G3,2, NOTE_E4,4, NOTE_E4,4, NOTE_F4,4, NOTE_G4,4,//12 NOTE_G4,4, NOTE_F4,4, NOTE_E4,4, NOTE_D4,4, NOTE_C4,4, NOTE_C4,4, NOTE_D4,4, NOTE_E4,4, NOTE_D4,-4, NOTE_C4,8, NOTE_C4,2 }; const int melody2[] PROGMEM = { //Para Elisa--Beethoven //de 1-9 NOTE_E5, 16, NOTE_DS5, 16, //1 NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, -8, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, -8, NOTE_E4, 16, NOTE_GS4, 16, NOTE_B4, 16, NOTE_C5, 8, REST, 16, NOTE_E4, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16,//6 NOTE_A4, -8, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, -8, NOTE_E4, 16, NOTE_C5, 16, NOTE_B4, 16, NOTE_A4 , 4, REST, 8, //9 - 1st ending //repeticion NOTE_E5, 16, NOTE_DS5, 16, //1 NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, -8, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, -8, NOTE_E4, 16, NOTE_GS4, 16, NOTE_B4, 16, NOTE_C5, 8, REST, 16, NOTE_E4, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16,//6 NOTE_A4, -8, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, -8, NOTE_E4, 16, NOTE_C5, 16, NOTE_B4, 16, NOTE_A4, 8, REST, 16, NOTE_B4, 16, NOTE_C5, 16, NOTE_D5, 16, //10 - 2nd ending //continuacion NOTE_E5, -8, NOTE_G4, 16, NOTE_F5, 16, NOTE_E5, 16, NOTE_D5, -8, NOTE_F4, 16, NOTE_E5, 16, NOTE_D5, 16, //12 NOTE_C5, -8, NOTE_E4, 16, NOTE_D5, 16, NOTE_C5, 16, //13 NOTE_B4, 8, REST, 16, NOTE_E4, 16, NOTE_E5, 16, REST, 16, REST, 16, NOTE_E5, 16, NOTE_E6, 16, REST, 16, REST, 16, NOTE_DS5, 16, NOTE_E5, 16, REST, 16, REST, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, 8, REST, 16, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, 8, REST, 16, NOTE_E4, 16, NOTE_GS4, 16, NOTE_B4, 16, //19 NOTE_C5, 8, REST, 16, NOTE_E4, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, 8, REST, 16, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, 8, REST, 16, NOTE_E4, 16, NOTE_C5, 16, NOTE_B4, 16, NOTE_A4, 8, REST, 16, NOTE_B4, 16, NOTE_C5, 16, NOTE_D5, 16, //24 (1st ending) //repeticion NOTE_E5, -8, NOTE_G4, 16, NOTE_F5, 16, NOTE_E5, 16, NOTE_D5, -8, NOTE_F4, 16, NOTE_E5, 16, NOTE_D5, 16, //12 NOTE_C5, -8, NOTE_E4, 16, NOTE_D5, 16, NOTE_C5, 16, //13 NOTE_B4, 8, REST, 16, NOTE_E4, 16, NOTE_E5, 16, REST, 16, REST, 16, NOTE_E5, 16, NOTE_E6, 16, REST, 16, REST, 16, NOTE_DS5, 16, NOTE_E5, 16, REST, 16, REST, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, 8, REST, 16, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, 8, REST, 16, NOTE_E4, 16, NOTE_GS4, 16, NOTE_B4, 16, //19 NOTE_C5, 8, REST, 16, NOTE_E4, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, 8, REST, 16, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, 8, REST, 16, NOTE_E4, 16, NOTE_C5, 16, NOTE_B4, 16, NOTE_A4, 8, REST, 16, NOTE_C5, 16, NOTE_C5, 16, NOTE_C5, 16, //25 - 2nd ending //continuacion NOTE_C5 , 4, NOTE_F5, -16, NOTE_E5, 32, //26 NOTE_E5, 8, NOTE_D5, 8, NOTE_AS5, -16, NOTE_A5, 32, NOTE_A5, 16, NOTE_G5, 16, NOTE_F5, 16, NOTE_E5, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_AS4, 8, NOTE_A4, 8, NOTE_A4, 32, NOTE_G4, 32, NOTE_A4, 32, NOTE_B4, 32, NOTE_C5 , 4, NOTE_D5, 16, NOTE_DS5, 16, NOTE_E5, -8, NOTE_E5, 16, NOTE_F5, 16, NOTE_A4, 16, NOTE_C5 , 4, NOTE_D5, -16, NOTE_B4, 32, NOTE_C5, 32, NOTE_G5, 32, NOTE_G4, 32, NOTE_G5, 32, NOTE_A4, 32, NOTE_G5, 32, NOTE_B4, 32, NOTE_G5, 32, NOTE_C5, 32, NOTE_G5, 32, NOTE_D5, 32, NOTE_G5, 32, //33 NOTE_E5, 32, NOTE_G5, 32, NOTE_C6, 32, NOTE_B5, 32, NOTE_A5, 32, NOTE_G5, 32, NOTE_F5, 32, NOTE_E5, 32, NOTE_D5, 32, NOTE_G5, 32, NOTE_F5, 32, NOTE_D5, 32, NOTE_C5, 32, NOTE_G5, 32, NOTE_G4, 32, NOTE_G5, 32, NOTE_A4, 32, NOTE_G5, 32, NOTE_B4, 32, NOTE_G5, 32, NOTE_C5, 32, NOTE_G5, 32, NOTE_D5, 32, NOTE_G5, 32, NOTE_E5, 32, NOTE_G5, 32, NOTE_C6, 32, NOTE_B5, 32, NOTE_A5, 32, NOTE_G5, 32, NOTE_F5, 32, NOTE_E5, 32, NOTE_D5, 32, NOTE_G5, 32, NOTE_F5, 32, NOTE_D5, 32, //36 NOTE_E5, 32, NOTE_F5, 32, NOTE_E5, 32, NOTE_DS5, 32, NOTE_E5, 32, NOTE_B4, 32, NOTE_E5, 32, NOTE_DS5, 32, NOTE_E5, 32, NOTE_B4, 32, NOTE_E5, 32, NOTE_DS5, 32, NOTE_E5, -8, NOTE_B4, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, -8, NOTE_B4, 16, NOTE_E5, 16, REST, 16, REST, 16, NOTE_DS5, 16, NOTE_E5, 16, REST, 16, REST, 16, NOTE_DS5, 16, //40 NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, 8, REST, 16, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, 8, REST, 16, NOTE_E4, 16, NOTE_GS4, 16, NOTE_B4, 16, NOTE_C5, 8, REST, 16, NOTE_E4, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, 8, REST, 16, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, //46 NOTE_B4, 8, REST, 16, NOTE_E4, 16, NOTE_C5, 16, NOTE_B4, 16, NOTE_A4, 8, REST, 16, NOTE_B4, 16, NOTE_C5, 16, NOTE_D5, 16, NOTE_E5, -8, NOTE_G4, 16, NOTE_F5, 16, NOTE_E5, 16, NOTE_D5, -8, NOTE_F4, 16, NOTE_E5, 16, NOTE_D5, 16, NOTE_C5, -8, NOTE_E4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_B4, 8, REST, 16, NOTE_E4, 16, NOTE_E5, 16, REST, 16, REST, 16, NOTE_E5, 16, NOTE_E6, 16, REST, 16, REST, 16, NOTE_DS5, 16, NOTE_E5, 16, REST, 16, REST, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_D5, 16, //54 NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, 8, REST, 16, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, 8, REST, 16, NOTE_E4, 16, NOTE_GS4, 16, NOTE_B4, 16, NOTE_C5, 8, REST, 16, NOTE_E4, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, 8, REST, 16, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, //60 NOTE_B4, 8, REST, 16, NOTE_E4, 16, NOTE_C5, 16, NOTE_B4, 16, NOTE_A4, 8, REST, 16, REST, 16, REST, 8, NOTE_CS5 , -4, NOTE_D5 , 4, NOTE_E5, 16, NOTE_F5, 16, NOTE_F5 , 4, NOTE_F5, 8, NOTE_E5 , -4, NOTE_D5 , 4, NOTE_C5, 16, NOTE_B4, 16, NOTE_A4 , 4, NOTE_A4, 8, NOTE_A4, 8, NOTE_C5, 8, NOTE_B4, 8, NOTE_A4 , -4, NOTE_CS5 , -4, NOTE_D5 , 4, NOTE_E5, 16, NOTE_F5, 16, //72 NOTE_F5 , 4, NOTE_F5, 8, NOTE_F5 , -4, NOTE_DS5 , 4, NOTE_D5, 16, NOTE_C5, 16, NOTE_AS4 , 4, NOTE_A4, 8, NOTE_GS4 , 4, NOTE_G4, 8, NOTE_A4 , -4, NOTE_B4 , 4, REST, 8, NOTE_A3, -32, NOTE_C4, -32, NOTE_E4, -32, NOTE_A4, -32, NOTE_C5, -32, NOTE_E5, -32, NOTE_D5, -32, NOTE_C5, -32, NOTE_B4, -32, NOTE_A4, -32, NOTE_C5, -32, NOTE_E5, -32, NOTE_A5, -32, NOTE_C6, -32, NOTE_E6, -32, NOTE_D6, -32, NOTE_C6, -32, NOTE_B5, -32, //80 NOTE_A4, -32, NOTE_C5, -32, NOTE_E5, -32, NOTE_A5, -32, NOTE_C6, -32, NOTE_E6, -32, NOTE_D6, -32, NOTE_C6, -32, NOTE_B5, -32, NOTE_AS5, -32, NOTE_A5, -32, NOTE_GS5, -32, NOTE_G5, -32, NOTE_FS5, -32, NOTE_F5, -32, NOTE_E5, -32, NOTE_DS5, -32, NOTE_D5, -32, NOTE_CS5, -32, NOTE_C5, -32, NOTE_B4, -32, NOTE_AS4, -32, NOTE_A4, -32, NOTE_GS4, -32, NOTE_G4, -32, NOTE_FS4, -32, NOTE_F4, -32, //84 NOTE_E4, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, -8, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, -8, NOTE_E4, 16, NOTE_GS4, 16, NOTE_B4, 16, NOTE_C5, 8, REST, 16, NOTE_E4, 16, NOTE_E5, 16, NOTE_DS5, 16, //88 NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, -8, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, -8, NOTE_E4, 16, NOTE_C5, 16, NOTE_B4, 16, NOTE_A4, -8, REST, -8, REST, -8, NOTE_G4, 16, NOTE_F5, 16, NOTE_E5, 16, NOTE_D5 , 4, REST, 8, REST, -8, NOTE_E4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_B4, -8, NOTE_E4, 16, NOTE_E5, 8, //96 NOTE_E5, 8, NOTE_E6, -8, NOTE_DS5, 16, NOTE_E5, 16, REST, 16, REST, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, -8, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, -8, NOTE_E4, 16, NOTE_GS4, 16, NOTE_B4, 16, NOTE_C5, 8, REST, 16, NOTE_E4, 16, NOTE_E5, 16, NOTE_DS5, 16, //102 NOTE_E5, 16, NOTE_DS5, 16, NOTE_E5, 16, NOTE_B4, 16, NOTE_D5, 16, NOTE_C5, 16, NOTE_A4, -8, NOTE_C4, 16, NOTE_E4, 16, NOTE_A4, 16, NOTE_B4, -8, NOTE_E4, 16, NOTE_C5, 16, NOTE_B4, 16, NOTE_A4 , -4, }; int melody3[] = { //Minueto en G de Petzold NOTE_D5,4, NOTE_G4,8, NOTE_A4,8, NOTE_B4,8, NOTE_C5,8, //1 NOTE_D5,4, NOTE_G4,4, NOTE_G4,4, NOTE_E5,4, NOTE_C5,8, NOTE_D5,8, NOTE_E5,8, NOTE_FS5,8, NOTE_G5,4, NOTE_G4,4, NOTE_G4,4, NOTE_C5,4, NOTE_D5,8, NOTE_C5,8, NOTE_B4,8, NOTE_A4,8, NOTE_B4,4, NOTE_C5,8, NOTE_B4,8, NOTE_A4,8, NOTE_G4,8,//6 NOTE_FS4,4, NOTE_G4,8, NOTE_A4,8, NOTE_B4,8, NOTE_G4,8, NOTE_A4,-2, NOTE_D5,4, NOTE_G4,8, NOTE_A4,8, NOTE_B4,8, NOTE_C5,8, NOTE_D5,4, NOTE_G4,4, NOTE_G4,4, NOTE_E5,4, NOTE_C5,8, NOTE_D5,8, NOTE_E5,8, NOTE_FS5,8, NOTE_G5,4, NOTE_G4,4, NOTE_G4,4, NOTE_C5,4, NOTE_D5,8, NOTE_C5,8, NOTE_B4,8, NOTE_A4,8, //12 NOTE_B4,4, NOTE_C5,8, NOTE_B4,8, NOTE_A4,8, NOTE_G4,8, NOTE_A4,4, NOTE_B4,8, NOTE_A4,8, NOTE_G4,8, NOTE_FS4,8, NOTE_G4,-2, //repetición NOTE_D5,4, NOTE_G4,8, NOTE_A4,8, NOTE_B4,8, NOTE_C5,8, //1 NOTE_D5,4, NOTE_G4,4, NOTE_G4,4, NOTE_E5,4, NOTE_C5,8, NOTE_D5,8, NOTE_E5,8, NOTE_FS5,8, NOTE_G5,4, NOTE_G4,4, NOTE_G4,4, NOTE_C5,4, NOTE_D5,8, NOTE_C5,8, NOTE_B4,8, NOTE_A4,8, NOTE_B4,4, NOTE_C5,8, NOTE_B4,8, NOTE_A4,8, NOTE_G4,8,//6 NOTE_FS4,4, NOTE_G4,8, NOTE_A4,8, NOTE_B4,8, NOTE_G4,8, NOTE_A4,-2, NOTE_D5,4, NOTE_G4,8, NOTE_A4,8, NOTE_B4,8, NOTE_C5,8, NOTE_D5,4, NOTE_G4,4, NOTE_G4,4, NOTE_E5,4, NOTE_C5,8, NOTE_D5,8, NOTE_E5,8, NOTE_FS5,8, NOTE_G5,4, NOTE_G4,4, NOTE_G4,4, NOTE_C5,4, NOTE_D5,8, NOTE_C5,8, NOTE_B4,8, NOTE_A4,8, //12 NOTE_B4,4, NOTE_C5,8, NOTE_B4,8, NOTE_A4,8, NOTE_G4,8, NOTE_A4,4, NOTE_B4,8, NOTE_A4,8, NOTE_G4,8, NOTE_FS4,8, NOTE_G4,-2, //continuación NOTE_B5,4, NOTE_G5,8, NOTE_A5,8, NOTE_B5,8, NOTE_G5,8,//17 NOTE_A5,4, NOTE_D5,8, NOTE_E5,8, NOTE_FS5,8, NOTE_D5,8, NOTE_G5,4, NOTE_E5,8, NOTE_FS5,8, NOTE_G5,8, NOTE_D5,8, NOTE_CS5,4, NOTE_B4,8, NOTE_CS5,8, NOTE_A4,4, NOTE_A4,8, NOTE_B4,8, NOTE_CS5,8, NOTE_D5,8, NOTE_E5,8, NOTE_FS5,8, NOTE_G5,4, NOTE_FS5,4, NOTE_E5,4, //22 NOTE_FS5,4, NOTE_A4,4, NOTE_CS5,4, NOTE_D5,-2, NOTE_D5,4, NOTE_G4,8, NOTE_FS5,8, NOTE_G4,4, NOTE_E5,4, NOTE_G4,8, NOTE_FS4,8, NOTE_G4,4, NOTE_D5,4, NOTE_C5,4, NOTE_B4,4, NOTE_A4,8, NOTE_G4,8, NOTE_FS4,8, NOTE_G4,8, NOTE_A4,4, //28 NOTE_D4,8, NOTE_E4,8, NOTE_FS4,8, NOTE_G4,8, NOTE_A4,8, NOTE_B4,8, NOTE_C5,4, NOTE_B4,4, NOTE_A4,4, NOTE_B4,8, NOTE_D5,8, NOTE_G4,4, NOTE_FS4,4, NOTE_G4,-2, }; //Duración de las notas //Duración de tempos int notes=sizeof(melody1)/sizeof(melody1[0])/2; int notes2=sizeof(melody2)/sizeof(melody2[0])/2; int notes3 = sizeof(melody3) / sizeof(melody3[0]) / 2; int tempo = 114; int tempo2 = 80; int tempo3 = 140; int wholenote = (60000 * 4) / tempo; int wholenote2 = (60000 * 4) / tempo2; int wholenote3 = (60000 * 4) / tempo3; int divider = 0, noteDuration = 0; //importar librerias #include #include //LCD de 4 pines LiquidCrystal_I2C lcd(0x27, 16, 2); //Variables encargadas de guardar valores const int buzzer = 11; int contador = 0; int siguiente; int anterior; int thisNote = 0; int playBuzz; int flagPlay = 0; //Inicializar pantalla LCD, botones y led RGB void setup(){ Wire.begin(); lcd.begin(16, 2); lcd.clear(); lcd.backlight(); pinMode(buzzer, OUTPUT); //botones para cambiar de canción pinMode(4, INPUT_PULLUP); pinMode(7, INPUT_PULLUP); pinMode(rojo, OUTPUT); pinMode(verde, OUTPUT); pinMode(azul, OUTPUT); } void loop(){ //Función para poner pausa en las canciones playBuzz = digitalRead(3); if (playBuzz == LOW && flagPlay == 0){ flagPlay = 1; } else if ( playBuzz == LOW && flagPlay == 1){ flagPlay = 0; } if (contador == 0){ //Color verde analogWrite(rojo,0); analogWrite(verde,255); analogWrite(azul,0); lcd.clear(); lcd.setCursor(0, 0); lcd.print("Oda a la alegria"); lcd.setCursor(0, 1); lcd.print("Beethoven"); //Calcular duración de las notas divider = melody1[thisNote + 1]; if (divider > 0) { noteDuration = (wholenote) / divider; } else if (divider < 0) { // dotted notes are represented with negative durations!! noteDuration = (wholenote) / abs(divider); noteDuration *= 1.5; // increases the duration in half for dotted notes } if (flagPlay == 0){//leerá el estado del tercer botón y hará la pausa // tocar solamente parte de la melodía tone(buzzer, melody1[thisNote], noteDuration*0.9); // Wait for the specief duration before playing the next note. siguiente = digitalRead(4); anterior = digitalRead(7); delay(noteDuration); thisNote = thisNote + 2; // cortar el buzzer noTone(buzzer); if (siguiente == LOW){ contador = 1; thisNote = 0; } if (anterior == LOW){ contador = 2; thisNote = 0; } } } else if (contador == 1){ //Cambiar color del led a rojo analogWrite(rojo,255); analogWrite(verde,0); analogWrite(azul,0); lcd.clear(); lcd.setCursor(0, 0); lcd.print("Para Elisa"); lcd.setCursor(0, 1); lcd.print("Beethoven"); for (int thisNote = 0; thisNote < notes2 * 2; thisNote = thisNote + 2) { // calculates the duration of each note divider = pgm_read_word_near(melody2+thisNote + 1); if (divider > 0) { // regular note, just proceed noteDuration = (wholenote2) / divider; } else if (divider < 0) { noteDuration = (wholenote2) / abs(divider); noteDuration *= 1.5; // increases the duration in half for dotted notes } // tocar parte de la nota tone(buzzer, pgm_read_word_near(melody2+thisNote), noteDuration * 0.9); siguiente = digitalRead(4); anterior = digitalRead(7); //esperar para la nota delay(noteDuration); // cortar buzzer noTone(buzzer); if (siguiente == LOW){ contador = 2; } if (anterior == LOW){ contador = 0; } if (contador != 1){ break; } } }else if (contador == 2){ //Color del led a azul analogWrite(rojo,0); analogWrite(verde,0); analogWrite(azul,255); lcd.clear(); lcd.setCursor(0, 0); lcd.print("Minueto en G"); lcd.setCursor(0, 1); lcd.print("Petzold"); for (int thisNote = 0; thisNote < notes3 * 2; thisNote = thisNote + 2) { divider = melody3[thisNote + 1]; if (divider > 0) { noteDuration = (wholenote3) / divider; } else if (divider < 0) { noteDuration = (wholenote3) / abs(divider); noteDuration *= 1.5; // increases the duration in half for dotted notes } // solo tocar 90% de la nota tone(buzzer, melody3[thisNote], noteDuration * 0.9); siguiente = digitalRead(4); anterior = digitalRead(7); // esperar para la nota delay(noteDuration); // Cortar sonido buzzer noTone(buzzer); if (siguiente == LOW){ contador = 0; } siguiente = digitalRead(4); anterior = digitalRead(7); if (anterior == LOW){ contador = 1; } if (contador != 2){ break; } } } }