re: Une fonction pour saisir plus simplement certain rythmes ?

[martial R]

Bonjour

un truc comme ça ?
picorer sur LSR
http://lsr.dsi.unimi.it/LSR/Snippet?id=302

%%%fonction rythym
#(define (make-note-req p d)
  (make-music 'NoteEvent
   'duration d
   'pitch p))

#(define (make-note p d)
  (make-music 'EventChord
   'elements (list (make-note-req p d))))

#(define (seq-music-list elts)
  (make-music 'SequentialMusic
   'elements elts))


dblcrh = #(define-music-function (parser location note) (ly:music?)
                   (let* ((p (ly:music-property
                    (car (ly:music-property note 'elements))
                      'pitch)))
          (seq-music-list (list
            (make-note p (ly:make-duration 3 1))
            (make-note p (ly:make-duration 4 0))
          ))))
%%--------------------------
\score {
   \new Staff {
       \time 3/4

       \dblcrh c'
       \dblcrh e'
       \dblcrh c'
   }
}
%%--------------------------

duration-function.ly
Description: Text Data