Jump to content

Blogs

Our community blogs

  1. A simple example based on an All Interval Row for pitch material and euclidean rhythm for Flute rhythmic generation.

    ;; All interval row generation
    (setf row (air 16 :prime :type :pitch))
    ;;; Strings chords
    ;; Chords gen from Air
    (setf chords1 (harmonic-progression
                   '(0 0 0 0 2 2 2 2)
                   row
                   :size 4
                   :step '(1 2 2 1) ;; step throught row
                   :relative t      ;; chords relative path voice leading
                   :seed 8392
                   ))
    
    ;; Strings chords assembly with pitches from chords1 
    ;; and length generation (whole notes '(w) repeated 32 times)
    ;; dynamic = pp
    (setf chords1.omn (filter-tie   ;; tie repeated notes
                       (make-omn
                        :length (gen-repeat 32 '((w)))
                        :pitch chords1
                        :velocity '((pp))
                        )))
    
    ;;; Melody generation for Flute
    ;; Get the length (size) of chords1.omn
    (setf size (length chords1.omn))
    
    ;; Pitch material
    (setf melo1.pmat (rnd-order
                      (melodize
                       (gen-trim
                        size
                        (mclist
                         (harmonic-progression
                          '(0 0 0 0 2 2 2 2)
                          row
                          :size 5
                          :step '(1 2 2 1)
                          ))))))
    
    ;; Melodic generation with euclidean rhythm
    (setf melo1.omn (pitch-transpose
                     12
                     (make-omn
                      :pitch melo1.pmat
                      :length (euclidean-rhythm 
                               (gen-repeat size '(16)) 
                               1
                               12
                               's
                               :type 2
                               )
                      :velocity '((mf))
                      )))
    
    (def-score temp 
               (
                :key-signature 'chromatic 
                :time-signature '(4 4) 
                :composer "Stéphane Boussuge"
                :copyright "Copyright © 2017 s.boussuge"
                :tempo 64
                )
    
    (strings1
     :omn chords1.omn
     :channel 1
     :port 0
     :sound 'gm
     :program 'acoustic-grand-piano
     :controllers (1 (gen-dynamic-controller chords1.omn))
     )
    
    (flute1
     :omn melo1.omn
     :channel 2
     :port 0
     :sound 'gm
     :program 'acoustic-grand-piano
     :controllers (1 (gen-dynamic-controller melo1.omn))
     )
    )

     

    SB.

    AudioOutput.mp3

  2. Bonjour,

     

    Un des particularités d'Opusmodus qui me séduit totalement, c'est de pouvoir explorer des territoires microtonals, et au-delà des habituels quart, huitième, voir seizième de ton, avec des timbres de synthétiseurs virtuels ou hardware de qualité via une station audio numérique (STAN). C'est la possibilité avec une banque comme l'Ircam Solo Instruments d'obtenir des frottements, des glissements de fréquences, de vriller des timbres de trombone virtuel, flûte, clarinette, de les confronter avec des timbres électroniques, de leur faire jouer des hauteurs non tempérées comme du 500 ou 50 Hz, simuler avec des timbres acoustiques une ring modulation ou une modulation de fréquence.

     

    Cela fait des années que je m'intéresse à la microtonalité. J'ai commencé avec les possibilités que m'offrait mon premier synthétiseur hardware l'Ems Synthi Aks, puis j'ai commencé à vouloir comprendre comment calculer une fréquence microtonale précise avec une calculatrice puis avec Open Music afin d'obtenir des listes sur des tempéraments précis. Et à dire vrai, c'est le livre du compositeur Jean-Etienne Marie qui m'a donné les clés, m'a ouvert les portes de la microtonalité avec son ouvrage "L'Homme Musical" (chez Artaud) dans lequel il consacre un très long chapitre à la microtonalité. Avec notamment la publication, en partie, des tables de progression des tempéraments établies par Augusto Novaro pour calculer les fréquences Hz (1). Ces tables sont consultables sur le PDF mis en ligne sur le Net par la Augusto Novato Society dans l'ouvrage Sistema Natural de la Musica (publié en 1951) et dont les "progresiones géométricas" vont du 2e d'octave au 65e d'octave (pages 53 à 58). A ce livre, on peut ajouter "A Natural System of Music, based on the Approximation of Nature", qu'Augusto Novato a publié en 1927. Il explore les ratios concernant les harmoniques, les intervalles et leurs inversions, les notations, les "Geometric progressions" (arithmétiques et géométriques), etc.

     

    A la fin de l'Homme Musical, Jean-Etienne Marie donne dans son lexique où il illustre le terme Tempérament un exemple qui m'a toujours intrigué : "Sur un synthétiseur on peut par exemple obtenir la division en 17 intervalles égaux d'un intervalle de quarte augmentée".

     

    Aujourd'hui, outre la possibilité de calculer les 17 intervalles égaux - ce qui est possible aussi avec une calculette scientifique ou sur celles de nos ordinateurs - avec Opusmodus, ce dernier me permet de pouvoir - enfin - écouter ces 17 intervalles égaux d'une quinte diminuée ou triton comme le montre cette vidéo :

     

     

    J'ai commencé à calculer les fréquences Hz (2) avec Open Music pour obtenir leur liste, j'ai reproduit le calcul fréquence par fréquence (2) à partir de la formule que m'avait indiqué Stephane Boussuge tout au début de ma découverte d'Opusmodus puis j'ai effectué les ajustements avec les cents en vérifiant avec le Tuner de ma carte son (Motu 828 mk3) et celui de Studio One l'exactitude des fréquences ajustées par rapport à leur hauteur initiale. Pour ce faire, je me suis créé un petit "utilitaire" avec OPMO qui me permet d'ajuster rapidement chaque hauteur. Au préalable, pour vérifier la souplesse d'OPMO, j'ai inséré plusieurs fréquences non tempérées avant de lire les 17 parties égales de l'intervalle de quarte diminuée mais dans un ordre non ordonné. Les 17 fréquences ont été insérées dans une représentation circulaire où le cercle est divisé et noté en 17 parties égales, avec en regard leur ajustement en cents comme on peut le découvrir dans le début de la vidéo. Il y a trois lectures, la première est effectuée avec Pianoteq 5 et qui respecte les ajustements, la seconde, plus courte est lue avec le Player de Kontakt. Ce dernier filtre les ajustements midi et donc ne tient pas compte des ajustements envoyés par Opusmodus. La troisième lecture conjugue la lecture avec Pianoteq et le player de Kontakt.

     

    Je mets en lien une seconde vidéo et qui est plus classique dans la démarche. Il s'agit de l'ajustement et de la lecture des gammes en quart et huitièmes de ton. En préambule, un calcul est inscrit, il permet de calculer pour un intervalle de quinte (ou un autre) le nombre de quart de ton et de huitième de ton, et non pas comme je l'ai noté le nombre de demi-tons :

     

     

     

    - (1) Le calcul est simple à partir des tables de Novaro, on choisit une progression, disons un 17/31 d'octave - 1,4624 - d'une fréquence n - 261,63 Hz - et on multiplie la progression par la fréquence. Cette progression étant celle obtenue par le calcul 2 ^ (1/31)^17 = 1,4624 soit 1,4624 * 261,63 Hz = 382, 62 Hz.

     

    - (2) J'ai un problème concernant le calcul des fréquences : je n'arrive pas à trouver la solution pour obtenir la liste de l'ensemble des fréquences que je calcule. C'est à dire que je n'arrive pas incrémenter mon calcul à partir des fréquences ou des indices de progression comme je peux le faire avec Open Music. Je suppose qu'il y a une solution et j'aimerais bien la connaître.

    Pour la gamme chromatique, je contourne le problème en convertissant les hauteurs en Hz :

    (setf ListeTC (pitch-to-hertz (make-scale 'c1 85)))
    (setf rowHz (pitch-to-hertz (list row)))

     

    J'ai essayé différents calculs, mais là je tourne en rond...

  • Blog Statistics

    2
    Total Blogs
    9
    Total Entries
×