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 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   =524*2;
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 tempo = 130;  
int semi = 60000/( tempo * 4 *2);

int corch = 2*semi;
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 b =blanca;
int r =2*b;
int n = negra;
int c = corch;
int s = semi;
int f = s/2;
int sf = f/2;

int cp = c+s;
int Sil = 10;

int retardo = 115;

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

void setup() {

}

void loop() {


Intro();
Estrofa();

Estribillo();

delay(1500);
}


void Intro(){
    // [1]
    nota(Sil,s);
    nota(C3 ,s);

    nota(Sil,s);
    nota(C3 ,s);

    nota(Sil,c);
    nota(A_2,c);

    nota(Sil,c);
    nota(C3 ,c);

    nota(Sil,c);
    nota(A_2,c);

    // [2]
    nota(Sil,s);
    nota(B2 ,s);

    nota(Sil,s);
    nota(B2 ,s);

    nota(Sil,c);
    nota( G2,c);

    nota(Sil,c);
    nota( B2,c);

    nota(Sil,c);
    nota( G2,c);


    // [3]
    nota(Sil,s);
    nota(B2 ,s);

    nota(Sil,s);
    nota(B2 ,s);

    nota(Sil,c);
    nota( G2,c);

    nota(Sil,c);
    nota( B2,c);

    nota(Sil,c);
    nota( G2,c);

    // [4]
    nota(Sil,s);
    nota(C3 ,s);

    nota(Sil,s);
    nota(C3 ,s);

    nota(Sil,c);
    nota(A_2,c);

    nota(Sil,c);
    nota(C3 ,c);

    nota(Sil,c);
    nota(A_2,c);


}


void Estrofa(){

   // [5]
  nota_sf6(A_2,n);
  nota(A_2,n);
  
  nota(Sil,s);
  nota(Sil,s);

  nota(A_2,c);
  nota( E2,c);
  nota( G2,n);
  // ...[6]
  nota( G2,c);
  nota( G2,c);
  nota( G2,c);
  nota( G2,c);
  nota( G2,c);

  nota( F2,c);
  nota( G2,np);

  // ...[7]...
  nota( G2,c);
  nota( G2,c);
  nota( G2,c);
  nota( G2,c);
  nota( G2,c);

  nota(A_2,n);
  
  // [8] ....
  nota(E2,np);

  nota(A_2,c);
  nota(A_2,c);
  nota( B2,c);
  nota(A_2,c+n);

  // ...[9]
  nota(A_2,c);
  nota(A_2,c);
  nota(A_2,c);
  nota(A_2,c);

  nota( E2,c);

  nota( G2,c+n);
  // [10]
  nota(Sil,c);

  nota(F2,c);
  nota(G2,c);
  nota(G2,c);
  nota(G2,c);
  nota(F2,c);
  
  // [11]

  nota(G2,c);
  nota(G2,c);

  nota(Sil,c);
  nota(F2,c);

  nota(G2,c);
  nota(G2,c);
  nota(G2,c);

  nota(A_2,c+n);

  }

void Estribillo(){
 
  // Estribillo
  // [12]
  nota_sf( A_2 , c);
  nota( A_2 , c);
  nota( A_2 ,n );
  nota( B2 , n);

  // [13]
  nota( C3,n);
  nota(A_2,n);
  
  nota(Sil, s);
  nota(Sil, s);

  nota(E2,c);
  nota(C3,c);
  nota(B2,n+c);
  
  // ...[14]
  nota(Sil, s);
  nota(Sil, s);

  nota(G2,c);
  nota(G2,c);
  nota(G2,c);
  nota(G2,c);
  nota(A_2,c);

  // [15]

  nota(B2,c);
  nota(B2,c);
  nota(B2,c);
  nota(B2,c);

  nota(B2,c);
  nota(B2,c);
  nota(G2,c);
  nota(A_2,c+n);

  // ...[16]
  nota(Sil, s);
  nota(Sil, s);

  nota(A_2,c);
  nota(A_2,c);
  nota(A_2,c);

  nota(B2,n);


  // [17}

  nota(C3,c);
  nota(B2,c);

  nota(C3,n);

  nota(Sil, s);
  nota(Sil, s);

  nota(C3, c);
  nota(D3, c);
  nota(B2, c+n);

  // ...[18]

  nota(Sil, s);
  nota(Sil, s);

  nota(B2, c);
  nota(B2, c);
  nota(B2, c);
  nota(B2, c);
  nota(A_2, c);

  // [19]
  nota(B2,c);
  nota(B2,c);
  nota(B2,c);
  nota(B2,c);

  nota(B2,c);
  nota(B2,c);
  nota(B2,c);
  nota(G2,c);

  // [20]
  nota(A_2, n);

  nota(A_2, c);
  nota(A_2, c);

  nota(A_2, n);

  nota( B2, n);

  // [21]
  nota( C3, n);
  nota(A_2, n);

  nota(Sil, s);
  nota(Sil, s);

  nota( E2, c);
  nota( C3, c);
  nota( B2, c+n);

  // ...[22]
  
  nota(Sil, s);
  nota(Sil, s);

  nota(G2, c);
  nota(G2, c);
  nota(G2, c);
  nota(G2, c);
  
  nota(A_2, c);

  // [23]
  nota(B2, c);
  nota(B2, c);
  nota(B2, n);


  nota(Sil, s);
  nota(Sil, s);

  nota(B2, c);
  nota(D3, c);
  nota(C3, c+n);
  
  //... [24]
  nota(Sil, s);
  nota(Sil, s);

  nota(A_2, c);
  nota(A_2, c);
  nota(A_2, c);
  nota( B2, n);

  // [25]
  nota(C3,c);
  nota(B2,c);
  nota(C3,n);

  nota(Sil, s);
  nota(Sil, s);

  nota(C3,c);
  nota(D3,c);
  nota(B2,c+n);
  // ...[26]
  
  nota(Sil, s);
  nota(Sil, s);

  nota(B2,c);
  nota(B2,c);
  nota(B2,c);
  nota(B2,c);
  nota(A_2,c);

  // [27]
    nota(B2,c);
    nota(B2,c);
    nota(B2,c);
    nota(B2,c);

  
    nota(B2,c);
    nota(B2,c);
    nota(B2,c);
    nota(G2,c);

  // [28]
  nota_sf(A_2,b);
  nota(Sil,b);

}

void nota_sf6(int N ,int d ){

    int  ttt = sf/2;
    nota( N*0.70710678118 , ttt);
    nota( N*0.74915353843 , ttt);
    nota( N*0.79370052598 , ttt);
    nota( N*0.84089641525 , ttt);
    nota( N*0.89089871814 , ttt);
    nota( N*0.94387431268 , ttt);
    
    nota( N              , d - 6*ttt);


}


void nota_sf(int N ,int d ){

    int  ttt = sf/2;
    
    nota( N*0.84089641525 , ttt);
    nota( N*0.89089871814 , ttt);
    nota( N*0.94387431268 , ttt);
    
    nota( N              , d - 3*ttt);


}