lilypond-user-fr
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Dégroupement de durées


From: Daniel Cartron
Subject: Re: Dégroupement de durées
Date: Fri, 06 Mar 2015 11:26:47 +0100
User-agent: KMail/4.13.3 (Linux/3.13.0-46-generic; KDE/4.13.3; x86_64; ; )

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



reply via email to

[Prev in Thread] Current Thread [Next in Thread]