Subject: Custom note Heads

From: pacpac <[email-masked]>
Date: Sun, 19 May 2013 06:35:46 -0700 (PDT)

Rebonjour,

J'essaye d'appliquer le snippet http://lsr.dsi.unimi.it/LSR/Item?id=617 pour
customiser une fois pour toutes mes notes.

Cependant le résultat que j'obtiens en exécutant ce snippet ne fonctionne
que pour les groupes de notes mais pas pour les notes seules . Pour être
plus clair :
- <toml sn> affichera bien les deux glyphs customs
- toml sn affichera les glyph standards.

Etonnant non ? Je ne peux pas rentrer dans l'analyse du scheme du snippet
qui dépasse mes compétences, alors si vous avez une idée...

Merci, 
Pascal

--
View this message in context: http://lilypond-french-users.1298960.n2.nabble.com/Custom-note-Heads-tp7579715.html
Sent from the LilyPond French Users mailing list archive at Nabble.com.

---

From: Eluze <[email-masked]>
Date: Sun, 19 May 2013 06:55:10 -0700 (PDT)

pacpac wrote
> Rebonjour,
> 
> J'essaye d'appliquer le snippet http://lsr.dsi.unimi.it/LSR/Item?id=617
> pour customiser une fois pour toutes mes notes.
> 
> - 
> <toml sn>
>  affichera bien les deux glyphs customs

il y a une restriction dans ce code qui ne s'appliquera qu'aux notes
simultanées que j'ai éliminé (;;) 

#(define (mod-notehead music)
  ;; (if (eq? (ly:music-property music 'name) 'EventChord)
       (let ((n (length (ly:music-property music 'elements))))
         (do ((i 0 (1+ i))) ((= i n))
           (let* ((ne (list-ref (ly:music-property music 'elements) i))
                  (dt (ly:music-property ne 'drum-type))
                  (st (assoc dt stencil-mapping)))
             (if st
                 (ly:music-set-property! ne 'tweaks (list (cons 'stencil
(cdr st)))))))) ;; )
   music)

et ça semble marcher!

Eluze

--
View this message in context: http://lilypond-french-users.1298960.n2.nabble.com/Custom-note-Heads-tp7579715p7579716.html
Sent from the LilyPond French Users mailing list archive at Nabble.com.

---

From: pacpac <[email-masked]>
Date: Sun, 19 May 2013 07:27:59 -0700 (PDT)

Splendide ! Je n'ai plus qu'a repasser sur toutes mes partitions pour les
simplifier. Cela aura été rapide pour un expert mais l'effet est grand :)

--
View this message in context: http://lilypond-french-users.1298960.n2.nabble.com/Custom-note-Heads-tp7579715p7579717.html
Sent from the LilyPond French Users mailing list archive at Nabble.com.