/* PROGRAMA CANCION MARTINILLO
AUTOR: CARLOS E. LOPEZ */
#include <stdio.h>
#include <windows.h>
#include <conio.h>
main()
{
char tecla;
printf("\tTecla: Q - MARTINILLO\t");
do
{
tecla=getch();
switch (tecla)
{
/* MARTINILLO
so| la si so|
so| la si so|
si do* re*
si do* re*
re* mi* re* do* si so|
re* mi* re* do* si so|
con alguno de estos finales:
1- la re* so| (BIS)
2- la mi so| (BIS)
3- so| re so| (BIS)
*/
case 'q': {
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490);/**/
Beep(880,500);
Beep(587,500);
Beep(783,550);
Beep(880,500);
Beep(587,500);
Beep(783,550);
Sleep (500);
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490);/**/
Beep(880,500);
Beep(587,500);
Beep(783,550);
Beep(880,500);
Beep(587,500);
Beep(783,550);
}
break;
case 'Q': {
Beep(783,400); /*COMUNICARME MAÑANA CON MARIO CARRILLO EXT 113*/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490); /**/
Beep(880,450);
Beep(587,500);
Beep(783,550);
Beep(880,450);
Beep(587,500);
Beep(783,550);
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490);/**/
Beep(880,450);
Beep(587,500);
Beep(783,550);
Beep(880,450);
Beep(587,500);
Beep(783,550);
}
break;
default:
printf("\n\tTECLEA BIEN GUEY!!\n\n");
break;
}
}
while(1==1);
return 0;
}
/* EL PROGRAMA COMPLETO QUE HICE INCLUYE 13 CANCIONES, SI LO KIEREN ME AVISAN... LA CELULA QUE EXPLOTA, IMAGINE, HEY JUDE,
OBLADI OBLADA, WIND OF CHANGE, CIELITO LINDO, PARA ELISA, MOLINOS DE VIENTO, FIESTA PAGANA, EL TEMA DEL OSITO GOMINOLA ETC... */
AUTOR: CARLOS E. LOPEZ */
#include <stdio.h>
#include <windows.h>
#include <conio.h>
main()
{
char tecla;
printf("\tTecla: Q - MARTINILLO\t");
do
{
tecla=getch();
switch (tecla)
{
/* MARTINILLO
so| la si so|
so| la si so|
si do* re*
si do* re*
re* mi* re* do* si so|
re* mi* re* do* si so|
con alguno de estos finales:
1- la re* so| (BIS)
2- la mi so| (BIS)
3- so| re so| (BIS)
*/
case 'q': {
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490);/**/
Beep(880,500);
Beep(587,500);
Beep(783,550);
Beep(880,500);
Beep(587,500);
Beep(783,550);
Sleep (500);
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490);/**/
Beep(880,500);
Beep(587,500);
Beep(783,550);
Beep(880,500);
Beep(587,500);
Beep(783,550);
}
break;
case 'Q': {
Beep(783,400); /*COMUNICARME MAÑANA CON MARIO CARRILLO EXT 113*/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490); /**/
Beep(880,450);
Beep(587,500);
Beep(783,550);
Beep(880,450);
Beep(587,500);
Beep(783,550);
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(783,400); /**/
Beep(880,400);
Beep(987,400);
Beep(783,400); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(987,400);
Beep(1046,400);
Beep(1174,500); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490); /**/
Beep(1174,170);
Beep(1318,170);
Beep(1174,170);
Beep(1046,200);
Beep(987,420);
Beep(783,490);/**/
Beep(880,450);
Beep(587,500);
Beep(783,550);
Beep(880,450);
Beep(587,500);
Beep(783,550);
}
break;
default:
printf("\n\tTECLEA BIEN GUEY!!\n\n");
break;
}
}
while(1==1);
return 0;
}
/* EL PROGRAMA COMPLETO QUE HICE INCLUYE 13 CANCIONES, SI LO KIEREN ME AVISAN... LA CELULA QUE EXPLOTA, IMAGINE, HEY JUDE,
OBLADI OBLADA, WIND OF CHANGE, CIELITO LINDO, PARA ELISA, MOLINOS DE VIENTO, FIESTA PAGANA, EL TEMA DEL OSITO GOMINOLA ETC... */