// constants won't change
const int RELAY_PIN = 4;  // the Arduino pin, which connects to the IN pin of relay



int pinBuzzer = 12;


int C_ =  261/2;
int Cs_=  277/2;
int D_ =  293/2 ;
int Ds_=  311/2;
int E_ =  329/2 ;
int F_ =  349/2 ;
int Fs_=  369/2;
int G_ =  391/2 ;
int Gs_=  415/2;
int A_ =  440/2 ;
int As_=  466/2;
int B_ =  493/2 ;


int Sil = 5;
int C =  261;
int Cs=  277;
int D =  293 ;
int Ds=  311;
int E =  329 ;
int F =  349 ;
int Fs=  369;
int G =  391 ;
int Gs=  415;
int A =  440 ;
int As=  466;
int B =  493 ;



int C2   =524;
int Cs2  =555;
int D2   =588;
int Ds2  =623;
int E2   =660;
int F2   =699;
int Fs2  =740;
int G2   =784;
int Gs2  =831;
int A_2   = 880;
int As2  =933;
int B2   =988;


  int C3  =1047;
  int Cs3  =555*2;
  int D3   =588*2;
  int Ds3  =623*2;
  int E3   =660*2;
  int F3   =699*2;
  int Fs3  =740*2;
  int G3   =784*2;
  int Gs3  =831*2;
  int A_3   = 880*2;
  int As3  =933*2;
  int B3   =988*2;
  

  int C4  =524*4;
  int Cs4  =555*4;
  int D4   =588*4;
  int Ds4  =623*4;
  int E4   =660*4;
  int F4   =699*4;
  int Fs4  =740*4;
  int G4   =784*4;
  int Gs4  =831*4;
  int A_4   = 880*4;
  int As4  =933*4;
  int B4   =988*4;
  
int semi =88;
int corch = 2*semi;
int fusa = semi/2;
int negra = corch*2;
int np = corch*3;

int blanca = negra*2;
int redonda = blanca*2;
int rep = 3*negra;
int bnp = 3*negra+3*corch;

int retardo = 100;

void nota(int nota, int duracion){
  tone(pinBuzzer,nota, duracion);
  delay(duracion);
  noTone(pinBuzzer);
  delay(duracion);
}

void setup() {
  // initialize digital pin as an output.
  pinMode(RELAY_PIN, OUTPUT);

  
 delay(500);

}

void loop() {
 
Intro();
Intro_2();
DejareMiTierraPorti();
Tantan();
DejareMiTierraPorti();
DeDiaVivire();
DeNoche();
DeDiaVivire();  // (Seras como una luz)
MeVoyPero();
 AlPartir();

Forjaran();
AlPartir();
EsLigero();

//Intro();
delay(1000);  
}




void Intro(){  
  // sostenidos
  // C F G
//  // 1
nota(A_,semi);
nota(E,semi);
nota(A,semi);
nota(Cs2,semi);

nota(D2,semi);
nota(E2,semi);
nota(D2,semi);
nota(Cs2,semi);

nota(A,semi);

nota(Cs2,semi);
nota(E2,semi);
nota(A_2,semi);

nota(Gs,semi);

nota(B,semi);
nota(E2,semi);
nota(Gs2,semi);

/////
  nota(Fs_,semi);
  nota(Cs,semi);
  nota(Fs,semi);
  nota(A,semi);
  
  
  nota(B,semi);
  nota(Cs2,semi);
  nota(B,semi);
  nota(A,semi);
  
nota(Fs_,semi);
nota(A,semi);
nota(Cs2,semi);
nota(Fs2,semi);

nota(E_,semi);
nota(Gs,semi);
nota(B,semi);
nota(E2,semi);



}

void Intro_2(){  
  // sostenidos
  // C F G
//  // 1
nota(A_,semi);
nota(E,semi);
nota(A,semi);
nota(Cs2,semi);

nota(D2,semi);
nota(E2,semi);
nota(D2,semi);
nota(Cs2,semi);

nota(A,semi);

nota(Cs2,semi);
nota(E2,semi);
nota(A_2,semi);

nota(Gs,semi);

nota(B,semi);
nota(E2,semi);
nota(Gs2,semi);

/////
nota(Fs_,semi);
nota(Cs,semi);
nota(Fs,semi);
nota(A,semi);


nota(B,semi);
nota(Cs2,semi);
nota(B,semi);
nota(A,semi);

nota(Fs_,semi);
nota(A,semi);
nota(Cs2,semi);
nota(Fs2,semi);

nota(E_,corch);
nota(E,corch);
nota(A,corch);

}

void DejareMiTierraPorti(){
  nota(Cs3,semi);   
  nota(Cs3,semi);  

  nota(Cs3,corch);  
  nota(Cs3,semi);   
  nota(D3,corch);  
  
  nota(Cs3,semi);   
  nota(B2,corch);  

  nota(Cs3,corch);  
 
 
    nota(E_,corch);
    nota(A_,corch);

  // Dejare
  nota(Cs3,semi);   
  nota(Cs3,semi);  

  nota(Cs3,corch);  
  nota(Cs3,semi);   
  nota(E3,corch+semi);  
  nota(D3,corch);  
  nota(Cs3,corch);  
  nota(B2,corch);  
  
    nota(A_2,semi);  
//  nota(A_2,negra);  
//    nota(Sil,corch);    
//    nota(Sil,corch);   
//    nota(Sil,corch);  
//    nota(Sil,corch);  
        nota(Cs,semi);
        nota(Fs,semi);
        nota(A,semi);
        
        
        nota(B,semi);
        nota(Cs2,semi);
        nota(B,semi);
        nota(A,semi);
        
        nota(Fs_,semi);
        nota(A,semi);
        nota(Cs2,semi);
        nota(Fs2,semi);


    
  nota(A_2,semi);  
  nota(A_2, corch);  
  nota(B2,semi);  
  nota(A_2,semi);  

//    nota(Sil,corch);    
//    nota(Sil,corch);   
//    nota(Sil,corch);  
//    nota(Sil,corch);  
//  
 

nota(Cs,semi);
nota(Fs,semi);
nota(A,semi);


nota(B,semi);
nota(Cs2,semi);
nota(B,semi);
nota(A,semi);

nota(Fs_,semi);
nota(A,semi);
nota(Cs2,semi);
nota(Fs2,semi);
  
}

void Tantan(){
nota(E_,corch);
nota(E,corch);
nota(A,corch);
}

void DeDiaVivire(){

  // de dia vivire
  nota(Sil,corch);
   
   nota(A_2,corch);
   
         nota(E3,fusa/2);
         nota(F3,fusa/2);
     nota(Fs3,corch-fusa);
     nota(Fs3,corch);
     nota(Fs3,corch);
     nota(E3,semi);
     nota(Fs3,negra);
     nota(Sil,semi);
 

  // de dia vivire
  nota(Sil,corch);
   
   nota(Cs3,corch);
   
         nota(D3,fusa/2);
         nota(Ds3,fusa/2);
     nota(E3,corch-fusa);
     nota(E3,corch);
     nota(E3,corch);
       nota(Fs3,semi);
     nota(Cs3,corch);
     nota(A_2,negra);
}

void DeNoche(){

  // de noche
  nota(Sil,corch);
   
   nota(A_2,corch);
   
         nota(E3,fusa/2);
         nota(F3,fusa/2);
     nota(Fs3,corch-fusa);
     nota(Fs3,corch);
     nota(Fs3,corch);
     nota(E3,semi);
     nota(Fs3,corch);
     nota(Fs3,corch);
     nota(Fs3,corch);
      nota(Cs3, corch+semi);  //  Com
    
       nota(E3,negra); // Pa
       nota(Fs3,corch);
       nota(Cs3,negra+corch);
      
 
}


void MeVoyPero(){
   nota(Sil,corch);
 
   nota(Cs3,corch);
    nota(D3,corch+semi);
    nota(D3,semi);
 
    nota(Cs3,semi); 
    nota(Cs3,corch);
 nota(B2,corch+semi); 
 nota(B2,corch);
 
   nota(A_2,corch); 
   nota(B2,corch); 
   nota(Cs3,corch);
   
   nota(B2,semi); 
   nota(B2,corch); 
   nota(A_2,semi); 
   nota(B2,negra); 
   
   nota(Sil,corch);   
   nota(Sil,corch); 
   //nota(Sil,corch);   
  
   int n=8+4;
   nota(Cs3,corch/n);  
   nota(D3,corch/n);  
   nota(Ds3,corch/n);  
   nota(E3,corch/n);  
   nota(F3,corch/n);  
   nota(Fs3,corch/n);  
   nota(G3,corch/n);  
   nota(Gs3,corch/n);  
   nota(A3,corch/n);  
   nota(As3,corch/n);  
   nota(B3,corch/n);  
   nota(C3,corch/n);  
   
   nota(Cs4,corch);
   
   nota(B3,semi); 
   nota(B3,corch); 
   nota(A_3,semi); 
   nota(B3,negra); 
   
   nota(Sil,corch); 
   nota(Sil,corch); 
   nota(Sil,corch); 
}

void AlPartir(){

nota(Cs3, negra);
nota(Cs3, negra);
nota(B2, negra);
  nota(E_, corch);
nota(Cs3, corch);
nota(B2, corch);
nota(A_2, corch);
nota(A_2, corch );
nota(Fs2, semi);
nota(A_2, semi+negra);

// Dondelsol
nota(Cs3,corch);
nota(D3,corch);
nota(E3,corch+semi);
nota(E3,semi);
nota(E3,corch);
nota(E3,corch);

nota(Fs3,corch);
nota(E3,corch);
nota(D3,corch);
nota(A_2,corch);
nota(Cs3,blanca+negra);
}

void Forjaran(){

//forjaran
nota(Cs3,corch);
nota(E3,corch);
nota(Fs3,negra);

nota(Fs3,corch);
nota(Fs3,semi);
nota(E3,corch);
nota(Cs3,negra+semi);

// Las piedras del camino
nota(E3,corch);
nota(D3,corch);
nota(Cs3,corch);
nota(B2,corch);
nota(A_2,corch);
nota(Fs2,corch);
nota(E2,negra);

// Las penas 

nota(E2,corch);
nota(A_2,corch);
nota(A_2,corch);
nota(Cs3,corch);
nota(E3,corch);
nota(D3,corch);
nota(Cs3,corch);
nota(B2,corch);
nota(A_2,corch);
nota(B2,blanca);
nota(Sil,negra);
nota(Sil,negra);
}


void EsLigero(){

//forjaran
nota(Cs3,corch);
nota(E3,corch);
nota(Fs3,negra);

nota(Fs3,corch);
nota(Fs3,semi);
nota(E3,corch);
nota(Cs3,negra+semi);

// Las piedras del camino
nota(E3,corch);
nota(D3,corch);
nota(Cs3,corch);
nota(B2,corch);
nota(A_2,corch);
nota(Fs2,corch);
nota(E2,negra);

// Las penas 

nota(E2,corch);
nota(A_2,corch);
nota(A_2,corch);
nota(Cs3,corch);
nota(E3,corch);
nota(D3,corch);
nota(Cs3,corch);
nota(B2,corch);
nota(A_2,corch);
nota(A_2,negra+corch);
nota(Gs2,corch);
nota(A_2,corch);



////////////////

nota(A,semi);
nota(Cs2,semi);

nota(D2,semi);
nota(E2,semi);
nota(D2,semi);
nota(Cs2,semi);

nota(A,semi);

nota(Cs2,semi);
nota(E2,semi);
nota(A_2,semi);

nota(Gs,semi);

nota(B,semi);
nota(E2,semi);
nota(Gs2,semi);

/////
  nota(Fs_,semi);
  nota(Cs,semi);
  nota(Fs,semi);
  nota(A,semi);
  
  
  nota(B,semi);
  nota(Cs2,semi);
  nota(B,semi);
  nota(A,semi);
  
nota(Fs_,semi);
nota(A,semi);
nota(Cs2,semi);
nota(Fs2,semi);

nota(E_,semi);
nota(Gs,semi);
nota(B,semi);
nota(E2,semi);




}