Une fonction pour saisir plus simplement certain rythmes ?

Bonjour,

Hier j'ai dû écrire une pièce où le rythme dominant était :

do8. do16 do8. do16, etc.

Au bout de plusieurs pages (certains seraient peut-être encore moins patients...) il devient pénible de devoir préciser le rythme derrière chaque nom de note. Je me demandais donc s'il existait une fonction qui réalise cela. Du genre :

\fonction_pratique 8 { do do do do }

Et :
\fonction_pratique 16 { do do do do } qui produirait le résultat :

do16. do32 do16. do32

Je ne sais pas si je suis très clair... En tout cas je n'ai rien trouvé dans la doc.

Bonne fin de journée à tous,
Nicolas.

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 (830 Bytes)

En gros ! Sauf que (et mes exemples étaient donc mal choisis) je veux pouvoir changer les notes.

Donc je m'explique mieux. Je voudrais pouvoir saisir quelque chose comme

\truc 8 { do do do re | mi re mi re |}

Et qe ce soit interprété comme :

do8. do16 do8. re16 | mi8. re16 mi8. re16

Voilà ! Peut-être que le code provenant du LSR permet de faire cela après légère modification. Mais je ne le comprends pas et je ne suis donc pas capable de l'adapter...

Merci tout de même,
Nicolas.