Projetos eletrônica: como programar música em um selo básica

Video: Eletrônica na Pratica : Circuitos e Esquemas

Com seu processador BASIC Stamp, comandos PBASIC e um alto-falante piezo, você pode fazer seus projetos eletrônicos cantar. Aqui está um exemplo de programa que desempenha duas músicas em um alto-falante piezo: “Mary Had a Little Lamb” e a canção feliz aniversário. O antigo é reproduzido quando você pressionar SW1- o último quando você pressiona SW2.

Video: COMO COLOCAR UMA MUSICA NO SEU PROJETO DO VISUAL BASIC 2008 By NikkiHacker

Para simplificar o código que gera as notas musicais, o programa define várias constantes que representam a frequência para cada uma das notas exigidas pelas músicas. Por exemplo, a constante NoteC6 é 1.046, a frequência em Hz de C no sexto oitava de um teclado de piano.

As constantes abrangem duas oitavas completas, que é muita variedade para as músicas a serem reproduzidas. Ambas as músicas são tocadas na chave de C, então há apartamentos ou farelos são obrigatórios.

O programa também configura constantes para a duração de uma semínima, meia nota e nota inteira. As constantes tornar mais fácil para especificar um campo particular para um período específico em um FREQOUT comando.

Assim, tocando uma melodia é simplesmente uma questão de escrever uma seqüência de FREQOUT comandos para tocar as notas corretas para as durações corretas na ordem correta. Isso é precisamente o que os sub-rotinas rotulada Maria e Aniversário Faz.

Video: Summer Hits 2017 Top Músicas Eletrônicas mais tocadas (Brasil)

`Programa Song` Doug Lowe `15 de julho de 2011 `` Este programa desempenha uma das duas canções no alto-falante piezo` no pino 0.` Se SW1 no pino 14 é pressionado, as peças do programa "Mary tinha um cordeirinho."`Se SW2 no pino 10 é pressionado, as peças do programa "Bom Dia a todos."`{$ SELO BS2}` {$ PBASIC 2,5} SW1PIN 14SW2PIN 10Speaker PIN 0NoteC6 CON 1046NoteD6 CON 1175NoteE6 CON 1318NoteF6 CON 1370NoteG6 CON 1568NoteA6 CON 1760NoteB6 CON 1975NoteC7 CON 2093NoteD7 CON 2349NoteE7 CON 2637NoteF7 CON 2794NoteG7 CON 3136NoteA7 CON 3520NoteB7 CON 3951NoteC8 CON 4186Whole CON 1000Half CON 500Quarter CON 250DOIF SW1 = 1 THENGOSUB MaryENDIFIF SW2 = 1 THENGOSUB MorningENDIFLOOPMary: FREQOUT alto-falante, quarto, NoteE7 `Mar-FREQOUT alto-falante, quarto, NoteD7` yFREQOUT alto-falante, quarto, NoteC7 `HadFREQOUT alto-falante, quarto, NoteD7` aFREQOUT alto-falante, quarto, NoteE7 `Lit-FREQOUT alto-falante, quarto, NoteE7` tleFREQOUT alto-falante, quarto, NoteE7 `LambPAUSE QuarterFREQOUT alto-falante, quarto, NoteD7` Lit-FREQOUT alto-falante, quarto, NoteD7 `tleFREQOUT alto-falante, quarto, NoteD7` LambPAUSE QuarterFREQOUT alto-falante, quarto, NoteE7 `Lit -FREQOUT Speaker, Quartos, NoteG7 `tleFREQOUT Speaker, Quartos, NoteG7` LambPAUSE QuarterFREQOUT Speaker, Quartos, NoteE7 `Mar-FREQOUT Speaker, Quartos, NoteD7 `yFREQOUT Speaker, Quartos, NoteC7` HadFREQOUT Speaker, Quartos, NoteD7 `aFREQOUT Speaker, Quartos, NoteE7` Lit-FREQOUT Speaker, Quartos, NoteE7 `tleFREQOUT Speaker, Quartos, NoteE7` LambFREQOUT Speaker, Quartos, NoteE7 `ItsFREQOUT Speaker, Quarter , NoteD7 `FleeceFREQOUT Speaker, Quartos, NoteD7` WasFREQOUT Speaker, Quartos, NoteE7 `WhiteFREQOUT Speaker, Quartos, NoteD7` AsFREQOUT Speaker, Quartos, NoteC7 `SnowPAUSE HalfRETURNMorning: FREQOUT Speaker, Half, NoteC7` GoodFREQOUT Speaker, Half, NoteD7 `Morn- FREQOUT Speaker, Half, NoteC7 `ingFREQOUT Speaker, Half, NoteF7` ToFREQOUT Speaker, inteiro, NoteE7 `YouFREQOUT Speaker, Half, NoteC7` GoodFREQOUT Speaker, Half, NoteD7 `Morn-FREQOUT Speaker, Half, NoteC7` ingFREQOUT Speaker, Half, NoteG7 `ToFREQOUT Speaker, inteiro, NoteF7` YouFREQOUT Speaker, Half, NoteC7 `GoodFREQOUT Speaker, Half, NoteC8` Morn-FREQOUT Speaker, Half, NoteA7 `ingFREQOUT Speaker, Half, NoteF7` DearFREQOUT Speaker, Half, NoteE7 `Child-FREQUENTE OUT Speaker, Inteiro, NoteD7 `renFREQOUT Speaker, Half, NoteB7` GoodFREQOUT Speaker, Half, NoteA7 `Morn-FREQOUT Speaker, Half, NoteF7` ingFREQOUT Speaker, Half, NoteG7 `ToFREQOUT Speaker, Inteiro, NoteF7` AllRETURN