Peter Crighton <[email protected]> writes: > How can I make some notes of a chord (for example background vocals) > smaller than the lead melody? I know of tweaking the font-size, but I > don't want to do this for every single note… Is there an easier way?
I wrote the following trying to do the same thing. Here's s snippet example:
\include "english.ly"
t = #(define-music-function (parser location x) (ly:music?)
(music-map (lambda (x)
(if (eq? (ly:music-property x 'name) 'EventChord)
(let ((copy (ly:music-deep-copy x)))
(let ((elements (cdr (ly:music-property copy 'elements))))
(while (pair? elements)
(set! (ly:music-property (first elements) 'tweaks)
(acons 'font-size -3 (ly:music-property (car elements)
'tweaks)))
(set! elements (cdr elements))))
copy) x))
x))
\relative f' {
\clef treble
\key bf \major
\t { r4 r8 <bf g ef bf> <ef bf g g'>4 <d bf f! f'!> |
<c bf f f'>2 ~ <c a f f'>4 <a f c' f> |
<bf d f>1 ~ | }
}
The function will make all but the first note head mentioned in the chord be displayed normally, with any other note heads in the chord using font-size -3. Here is the output:
<<inline: test36.png>>
-- Michael Welsh Duggan ([email protected])
_______________________________________________ lilypond-user mailing list [email protected] https://lists.gnu.org/mailman/listinfo/lilypond-user
