Hello, The problem of Accidentals mentioned in this snippet can be easily fixed like this.
Cheers, Valentin Am Montag, 27. Dezember 2021, 21:59:19 CET schrieb Mark Stephen Mrotek: > Paul, > > Have a look at > > https://lsr.di.unimi.it/LSR/Item?id=538 > > Mark > > -----Original Message----- > From: lilypond-user > [mailto:[email protected]] On Behalf Of > Paul Scott Sent: Monday, December 27, 2021 11:01 AM > To: Lilypond-User Mailing List <[email protected]> > Subject: optional cue notes > > How can I get two note heads on a single stem and have one of the note heads > be smaller? > > \version "2.23.5" > > \score{ > \new Staff { > \fixed c' { > << { a } > { \set Voice.fontSize = #-2 a' } >> > } > } > } > > This makes note heads small. I'm guessing this might be a scope question. > > TIA for any help with this, > > Paul
%% http://lsr.di.unimi.it/LSR/Item?id=538 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) (ly:music-set-property! (first elements) 'tweaks `(((Accidental . font-size) . -3) (font-size . -3) . ,(ly:music-property (car elements) 'tweaks))) (set! elements (cdr elements)))) copy) x)) x)) \relative c' \t { <f a c>4 <as fis c'> <c f, a> <c b f> | <c c'>4 <b b'> <a a'> g }
signature.asc
Description: This is a digitally signed message part.
