'COMPOSITEUR' DE MORCEAUX (PAR FICHIER OU CONSOLE) EN 'SCRIPT' AVEC LA FONCTION BEEP()

//code réalisé par Alberto Bietti

#include <iostream>
#include <fstream>
#include <sstream>
#include <windows.h>

using namespace std;

//fréquences des notes
enum {SOL=200, LA=220, SI=250, DO=265, RE=300, MI=340, FA_DIESE=380, SOL2=400, PAUSE=0};

int tofreq(char ch)    //retourne la fréquence d'un note avec le caractère donné
{
     switch(ch)
     {
               case 'Q': case 'q': return SOL;
               case 'S': case 's': return LA;
               case 'D': case 'd': return SI;
               case 'F': case 'f': return DO;
               case 'G': case 'g': return RE;
               case 'H': case 'h': return MI;
               case 'J': case 'j': return FA_DIESE;
               case 'K': case 'k': return SOL2;
               case 'P': case 'p': return PAUSE;
               default: return 0;
     }                          
}

int tonb(char ch)
{
    switch(ch)
    {
              case '1': return 1;
              case '2': return 2;
              case '3': return 3;
              case '4': return 4;
              case '5': return 5;
              case '6': return 6;
              case '7': return 7;
              case '8': return 8;
              case '9': return 9;
              default: return 1;
    }
}
              


                                
int main()                      
{
    istream* stream;            //pointeur vers la input stream principale
    
    char res;
    cout <<"load from file ('a'), demo ('d') or input (else)? "; //choix de la source
    cin >> res;
    if (res == 'a') stream = new ifstream("music.txt");       //source: fichier 'music.txt'
    else if (res == 'd') stream = new istringstream(          //source: démo: frère Jacque!! :
                         "Q2S2D2Q2Q2S2D2Q2D2F2G4D2F2G4G1H1G1F1D2Q2G1H1G1F1D2Q2S2G2Q4S2G2Q4");
    else stream = &cin;  //source: entrée par l'utilisateur dans la console
    
    char ch;
    int freq;                      //fréquence
    int dur;                       //durée
    while (stream->get(ch))
    {
          freq = tofreq(ch);
          if (ch != '\n') {
             stream->get(ch);
             dur = tonb(ch);
          }
          else dur = 1;
          Beep(freq, 100*dur);     //faire un Beep
           
          
    }

    system("pause");
    return 0;
}