|
From: | Pierre Perol-Schneider |
Subject: | Re: articulations |
Date: | Mon, 12 Nov 2018 11:27:55 +0100 |
Oh mais c'est magique, ça : et plein de nouvelles perspectives pour
d'autres déclinaisons de la même farine.
Merci !
JMArc
Le 12/11/2018 à 10:36, Christophe Pochon a écrit :
> \version "2.19.65"
>
> addArticulation =
> #(define-music-function (scripts music) (list? ly:music?)
> (define (add mus)
> (let* ((art (ly:music-property mus 'articulations))
> (types (map (lambda (a) (ly:music-property a
> 'articulation-type))
> art))
> (types (lset-union string=? types scripts)))
> (ly:music-set-property!
> mus 'articulations (map make-articulation types))))
> (for-some-music
> (lambda (mus)
> (cond
> ((music-is-of-type? mus 'event-chord) (add mus))
> ((music-is-of-type? mus 'note-event) (add mus))
> (else #f)))
> music)
> music)
>
> {
> \addArticulation #'("staccato" "accent") { c <c e g>-> d c'-! }
> }
_______________________________________________
liste de diffusion lilypond-user-fr
address@hidden
https://lists.gnu.org/mailman/listinfo/lilypond-user-fr
[Prev in Thread] | Current Thread | [Next in Thread] |