#include <16F873A.h>
#use delay(clock=4000000)
#fuses XT,NOWDT
#include ".\tones.c"
#byte portb = 6
void noche_de_paz();
void jingle_bell();
///////////////////////////////////////
#zero_ram
void main()
{
set_tris_b(0b00000000); //Configuracion de entradas y salidas del puerto B
while(true)
{
//noche_de_paz();
jingle_bell();
delay_ms(500);
}
}
void noche_de_paz()
{
generate_tone(Fb_NOTE[1],750);
generate_tone(Gb_NOTE[1],250);
generate_tone(Fb_NOTE[1],500);
generate_tone(Db_NOTE[1],500);
generate_tone(P_NOTE[1],500);
generate_tone(P_NOTE[1],250);
generate_tone(Fb_NOTE[1],750);
generate_tone(Gb_NOTE[1],250);
generate_tone(Fb_NOTE[1],500);
generate_tone(Db_NOTE[1],500);
generate_tone(P_NOTE[1],500);
generate_tone(P_NOTE[1],250);
generate_tone(Cb_NOTE[2],500);
generate_tone(Ab_NOTE[1],750);
generate_tone(P_NOTE[1],500);
generate_tone(P_NOTE[1],250);
generate_tone(b_NOTE[1],1000);
generate_tone(b_NOTE[1],500);
generate_tone(Fb_NOTE[1],750);
generate_tone(P_NOTE[1],500);
generate_tone(P_NOTE[1],250);
generate_tone(Gb_NOTE[1],1000);
generate_tone(Gb_NOTE[1],500);
generate_tone(b_NOTE[1],750);
generate_tone(Ab_NOTE[1],250);
generate_tone(Gb_NOTE[1],500);
generate_tone(Fb_NOTE[1],750);
generate_tone(Gb_NOTE[1],250);
generate_tone(Fb_NOTE[1],500);
generate_tone(Db_NOTE[1],750);
generate_tone(P_NOTE[1],500);
generate_tone(P_NOTE[1],250);
generate_tone(Gb_NOTE[1],1000);
generate_tone(Gb_NOTE[1],500);
generate_tone(b_NOTE[1],750);
generate_tone(A_NOTE[1],250);
generate_tone(Gb_NOTE[1],500);
generate_tone(Fb_NOTE[1],750);
generate_tone(Gb_NOTE[1],250);
generate_tone(Fb_NOTE[1],500);
generate_tone(D_NOTE[1],750);
generate_tone(P_NOTE[1],500);
generate_tone(P_NOTE[1],250);
generate_tone(Cb_NOTE[2],1000);
generate_tone(Cb_NOTE[2],500);
generate_tone(E_NOTE[2],750);
generate_tone(Cb_NOTE[2],250);
generate_tone(Ab_NOTE[1],500);
generate_tone(b_NOTE[1],998);
generate_tone(Db_NOTE[2],1000);
generate_tone(P_NOTE[1],500);
generate_tone(P_NOTE[1],250);
generate_tone(b_NOTE[1],500);
}
void jingle_bell()
{
generate_tone(B_note[1],500);
generate_tone(B_note[1],500);
generate_tone(B_note[1],500);
generate_tone(P_note[1],125);
generate_tone(B_note[1],500);
generate_tone(B_note[1],500);
generate_tone(B_note[1],500);
generate_tone(P_note[1],125);
generate_tone(B_note[1],250);
generate_tone(D_note[2],250);
generate_tone(G_note[1],250);
generate_tone(A_note[1],250);
generate_tone(B_note[1],500);
generate_tone(C_note[2],250);
generate_tone(C_note[2],250);
generate_tone(C_note[2],500);
generate_tone(B_note[1],250);
generate_tone(B_note[1],250);
generate_tone(B_note[1],500);
generate_tone(B_note[1],250);
generate_tone(A_note[1],250);
generate_tone(A_note[1],250);
generate_tone(B_note[1],250);
generate_tone(A_note[1],500);
generate_tone(D_note[2],250);
}