2013/7/28 Givaldo de Cidra <givaldodeci...@gmail.com> > > > \set Staff.keySignature '= # (((1. 0.), SHARP) ((1. 3.), natural)) > > I want the key signature have a natural sign of caution. > > Is it possible?
Hi, I'm a bit ashamed not having found a better method. It's Fischer-Technik/Tinkertoy at it's worst. Anyway, here it is: \version "2.16.2" #(define NEARNULL 1/10000000000000) #(define OTHERNEARNULL -1/10000000000000) very-kludgy-method-to-get-parenthesized-accidentals-in-key-signature = \override Staff.KeySignature #'before-line-breaking = #(lambda (grob) (let* ((glyph-name-alist (ly:grob-property grob 'glyph-name-alist)) (lst (list (cons NEARNULL "accidentals.leftparen") (cons OTHERNEARNULL "accidentals.rightparen")))) (ly:grob-set-property! grob 'glyph-name-alist (append lst glyph-name-alist)))) \layout { \context { \Staff \very-kludgy-method-to-get-parenthesized-accidentals-in-key-signature } } \new Staff { \set Staff.keySignature = #`(((1 . 0) . ,SHARP) ((1 . 3) . ,NEARNULL) ((1 . 3) . ,NATURAL) ((1 . 3) . ,OTHERNEARNULL) ((1 . -1) . ,NEARNULL) ((1 . -1) . ,FLAT) ((1 . -1) . ,OTHERNEARNULL) ) a' } Cheers, Harm
<<attachment: atest-22.preview.png>>
_______________________________________________ lilypond-user mailing list lilypond-user@gnu.org https://lists.gnu.org/mailman/listinfo/lilypond-user