Beethoven
Publicado por Thiago 23/03/2006
[ Hits: 8.924 ]
Este programa toca o hino da alegria de Beethoven.
Não está com a rítmica perfeita mas o que vale é a intenção.
Este programa só funciona no Windows mas irei postar uma versão para Linux.
/* Programa: beethoven.c Autor: thiagoamm Data: 23/03/06 */ /* Bibliotecas internas */ #include <stdio.h> #include <stdlib.h> #include <windows.h> /* Pausas */ #define breve 8000 #define semibreve 4000 #define minima 2000 #define seminima 1000 #define colcheia 500 #define semicolcheia 250 #define fusa 125 #define semifusa 62.5 /* Frequencia das notas */ #define DO 261 #define RE 294 #define MI 326 #define FA 348 #define SOL 391 #define LA 435 #define SI 489 #define Do 522 /* Funcao principal */ int main(void) { int i; for (i = 0; i <= 1000; i++) { /* Primeira parte */ Beep(MI,colcheia);Beep(MI,colcheia);Beep(FA,colcheia); Beep(SOL,colcheia);Beep(SOL,colcheia);Beep(FA,colcheia); Beep(MI,colcheia);Beep(RE,colcheia);Beep(DO,colcheia); Beep(DO,colcheia);Beep(RE,colcheia);Beep(MI,colcheia); Beep(MI,700);Beep(RE,semicolcheia);Beep(RE,seminima); /* Pausa */ Beep(0,semibreve); /* Segunda parte */ Beep(MI,colcheia);Beep(MI,colcheia);Beep(FA,colcheia); Beep(SOL,colcheia);Beep(SOL,colcheia);Beep(FA,colcheia); Beep(MI,colcheia);Beep(RE,colcheia);Beep(DO,colcheia); Beep(DO,colcheia);Beep(RE,colcheia);Beep(MI,colcheia); Beep(RE,600);Beep(RE,300);Beep(DO,350);Beep(DO,600); /* Pausa */ Beep(0,semibreve); /* Terceira parte */ Beep(RE,colcheia);Beep(RE,colcheia);Beep(MI,colcheia);Beep(DO,colcheia); Beep(RE,colcheia);Beep(FA,colcheia);Beep(MI,colcheia);Beep(DO,colcheia); Beep(RE,colcheia);Beep(FA,colcheia);Beep(MI,colcheia);Beep(DO,colcheia); Beep(RE,colcheia);Beep(SOL,500);Beep(SOL,900); /* Pausa */ Beep(0,semibreve); /* BIS --> Seguna parte */ Beep(MI,colcheia);Beep(MI,colcheia);Beep(FA,colcheia); Beep(SOL,colcheia);Beep(SOL,colcheia);Beep(FA,colcheia); Beep(MI,colcheia);Beep(RE,colcheia);Beep(DO,colcheia); Beep(DO,colcheia);Beep(RE,colcheia);Beep(MI,colcheia); Beep(RE,600);Beep(RE,300);Beep(DO,350);Beep(DO,600); /* Pausa */ Beep(0,breve); } return(0); }
Conta e substitui caracteres de uma frase
Aprenda a Gerenciar Permissões de Arquivos no Linux
Como transformar um áudio em vídeo com efeito de forma de onda (wave form)
Como aprovar Pull Requests em seu repositório Github via linha de comando
Visualizar arquivos em formato markdown (ex.: README.md) pelo terminal
Dando - teoricamente - um gás no Gnome-Shell do Arch Linux
Como instalar o Google Cloud CLI no Ubuntu/Debian
Mantenha seu Sistema Leve e Rápido com a Limpeza do APT!
Procurando vídeos de YouTube pelo terminal e assistindo via mpv (2025)
Sinto uma leve lentidão ao arrastar, miniminizar e restauras as janela... (3)
Alguém já usou o framework Avalonia para desenvolver interfaces de usu... (4)
Ajuda Pra Melhoria do NFTABLES. (8)
Pastas da raiz foram para a área de trabalho [RESOLVIDO] (7)