Daniel Johnson wrote:
A bit of research and hackery resulted in this:

%%% BEGIN LILYPOND CODE %%%
\version "2.9.9"

#(define (format-mark-barnumbers-segno mark context)
 (markup
   #:line
   (#:center-align
(#:bold (number->string (ly:context-property context 'currentBarNumber)) #:musicglyph "scripts.segno"))))

\score {
       \new Staff {
               \set Score.markFormatter = #format-mark-barnumbers-segno
               c'1 \mark \default
               c'1 \mark \default
               c'1 \mark \default
       }
}
%%% END LILYPOND CODE
Which inspired me to do this which is what I really wanted (boxed rehearsal marks):

#(define (format-mark-box-barnumbers-segno mark context)
(markup
  #:line
  (#:center-align
   (#:bold
(#:box (number->string (ly:context-property context 'currentBarNumber)))
    #:musicglyph "scripts.segno"))))

Thanks again,

Paul





_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
http://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to