On 6/4/2018 4:55 PM, Aaron Hill wrote:
On 2018-06-04 12:09, Ben wrote:
Wow. Um, this is awesome. Yes it works beautifully. How difficult
would it be to allow this function to accept chords? Or would that
simply be best served as creating another function like \addTremChords
or something?
Not that hard. You just need to accept both NoteEvent and EventChord:
%%%%
\version "2.19.81"
addTremolos =
#(define-music-function (number music) (integer? ly:music?)
(music-map
(lambda (mus)
(if (or (eq? 'NoteEvent (ly:music-property mus 'name))
(eq? 'EventChord (ly:music-property mus 'name)))
(let ((art (ly:music-property mus 'articulations '())))
(ly:music-set-property!
mus
'articulations
(cons
(make-music
'TremoloEvent
'tremolo-type number)
art))))
mus)
music))
\addTremolos 16 { b' r a' <e' g'> }
%%%%
-- Aaron Hill
Thank you guys so much. This makes things so much easier on the eyes in
input files for those high-density tremolo scores! Much appreciated!
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user
