1. # Définir les fréquences des notes pour chaque octave
2. $frequences = @{
3.     'do'  = @( 261.63, 523.25, 1046.50 );
4.     're'  = @( 293.66, 587.33, 1174.66 );
5.     'mi'  = @( 329.63, 659.26, 1318.51 );
6.     'fa'  = @( 349.23, 698.46, 1396.91 );
7.     'sol' = @( 392.00, 783.99, 1567.98 );
8.     'la'  = @( 440.00, 880.00, 1760.00 );
9.     'si'  = @( 493.88, 987.77, 1975.53 );
10. }
11.  
12. # Définir les durées des notes
13. $durees = @{
14.     'E' = 250;
15.     'D' = 500;
16.     'Q' = 1000;
17.     'H' = 2000;
18.     'S' = 4000;
19. }
20.  
21. # Importer le fichier CSV
22. $enchainement = Import-Csv -Path "enchainement.csv"
23.  
24. # Parcourir chaque ligne du fichier CSV
25. foreach ($ligne in $enchainement) {
26.     # Vérifier si la ligne est une note ou une pause
27.     if ($ligne.Type -eq 'Note') {
28.         # Calculer la fréquence de la note
29.         $frequenceNote = $frequences[$ligne.ValeurNote][$ligne.Octave - 1]
30.  
31.         # Calculer la durée de la note en millisecondes
32.         $dureeNote = $durees[$ligne.DuréeNote]
33.  
34.         # Vérifier si la durée de la note est valide
35.         if ($dureeNote -gt 0) {
36.             # Jouer la note
37.             [console]::beep($frequenceNote, $dureeNote)
38.         }
39.  
40.         # Vérifier si la durée de la pause est valide
41.         if ($ligne.DuréePause -gt 0) {
42.             # Faire une pause
43.             Start-Sleep -Milliseconds $ligne.DuréePause
44.         }
45.     } elseif ($ligne.Type -eq 'Pause') {
46.         # Vérifier si la durée de la pause est valide
47.         if ($ligne.DuréePause -gt 0) {
48.             # Faire une pause
49.             Start-Sleep -Milliseconds $ligne.DuréePause
50.         }
51.     }
52. }