Re: manipuler les valeurs des notes

[Schneidy]

Bonjour Nicolas,

Il y a quelques années Gilles Thibault avait créé une fonction de ce type :

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\version "2.18.2"

divByTwo = #(define-music-function (parser location music) (ly:music?)
(music-map
  (lambda (evt)
   (let ((dur (ly:music-property evt 'duration)))
   (if (ly:duration? dur)
    (ly:music-set-property! evt 'duration
     (ly:make-duration
      (1+ (ly:duration-log dur))
      (ly:duration-dot-count dur)
      (car (ly:duration-factor dur))
      (cdr (ly:duration-factor dur)))))
   evt))
  music
)) 

%% et pour reprendre ton exemple =>

myMusic = 
\relative c' {
  c\longa c\breve c1 c2
  c4 c8 c16 c32 c64 c128 c128
}

\new Staff { 
  \time 8/1 
  \myMusic
}

\new Staff {
  \time 8/2 
  \divByTwo 
  \myMusic
}

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

Cordialement,
Pierre




--
View this message in context: 
http://lilypond-french-users.1298960.n2.nabble.com/manipuler-les-valeurs-des-notes-tp7581131p7581132.html
Sent from the LilyPond French Users mailing list archive at Nabble.com.