Dégroupement de durées

Bonjour,

Le sujet n'est pas vraiment explicite mais je ne sais pas comment appeler ça.
Je cherche un truc pour que

  do2 re2
  fa4 sol re mi

soit converti en

  do8 do do do
  do do do do
  re re re re
  re re re re
  fa fa fa fa
  sol sol sol sol
  re re re re
  mi mi mi mi

J'ai fouillé dans les snippets, mais rien trouvé qui correspond...

Ça existe quelque part ?

Merci

···

--
Cordialement, Daniel Cartron
« Le bonheur à deux ça dure le temps de compter jusqu'à trois. »
Sacha Guitry

Le lundi 2 mars 2015 09:19:08, vous avez écrit :

        do2 re2
        fa4 sol re mi

ooops écrit trop vite, c'est

do1 re
fa2 sol re mi

Personne n'a de piste ?

···

--
Cordialement, Daniel Cartron
« En essayant continuellement on finit par réussir. Donc : plus ça rate, plus
on a de chance que ça marche. »
Jacques Rouxel - Les shadoks

Oui Daniel, je pense qu'on l'avait tous compris comme cela.

Je me suis un peu penché sur le sujet il y a deux jours et je n'ai rien trouvé de magique.

Désolé,

Pierre

···

Le 4 mars 2015 06:02, Daniel Cartron <****@****> a écrit :

Le lundi 2 mars 2015 09:19:08, vous avez écrit :

do2 re2
fa4 sol re mi

ooops écrit trop vite, c'est

do1 re
fa2 sol re mi

Personne n'a de piste ?

--
Cordialement, Daniel Cartron
« En essayant continuellement on finit par réussir. Donc : plus ça rate, plus
on a de chance que ça marche. »
Jacques Rouxel - Les shadoks


liste de diffusion lilypond-user-fr
lilypond-user-fr@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user-fr

Le mercredi 4 mars 2015 21:27:57, vous avez écrit :

Encore une fois merci à Nicolas, voici le code qui marche (légèrement retouché
pour mieux convenir à ce que je veux faire) :

\version "2.16.2"
test = #(define-music-function
  (parser location duration music)
  (number? ly:music?)
    (map-some-music
      (lambda (evt)
        (let ((dur (ly:music-property evt 'duration #f)))
          (and dur (begin
            (let ((number-dur 0))
              (set! number-dur (expt 2 (ly:duration-log dur)))
              (set! (ly:music-property evt 'duration) (ly:make-duration (log2
duration) 0 1))
                #{
                  \unfoldRepeats { \repeat tremolo $(/ duration number-dur)
$evt }
                #}
            )
                                )
          )
        )
      )
    music)
)

Musique = \relative c' {
  \time 4/4
  c2 d4 e
}

  \test 8 \Musique

Reste à ajouter le traitement des notes pointées, et surtout réussir à
récupérer la métrique car le chiffre 8 passé à la fonction doit être le
dénominateur de la métrique...

···

--
Cordialement, Daniel Cartron
« Les dix meilleures années de la vie d'une femme? Entre vingt-cinq et vingt-
six ans. »
RIP