lilypond-user
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: Small notes in chords


From: Michael Welsh Duggan
Subject: Re: Small notes in chords
Date: Thu, 09 Jun 2011 19:58:51 -0400
User-agent: Gnus/5.110018 (No Gnus v0.18) Emacs/24.0.50 (gnu/linux)

Peter Crighton <address@hidden> 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:

PNG image

-- 
Michael Welsh Duggan
(address@hidden)

reply via email to

[Prev in Thread] Current Thread [Next in Thread]