Re: removing unwanted accidentals

[Karl Hammar]

> On Friday 15 April 2005 10.56, Karl Hammar wrote:
> > address@hidden:
> > > It also changes the numbering of all subsequent bars. I don't know the
> > > author's intent in this case (I didn't write that snippet), but I guess
> > > it could be something like an attaca movement.
> >
> > Yes. The bigger picture is H. Purcells opera "Dido & Æneas":
> >
> >  http://aspodata.se/motett/noter/act*
> 
> nice! (will this end up on mutopia?)

Anyone is welcome to use it (it is still being worked on).
The code is gpl (cc-sa if you insist) and Purcells music is public 
domain.

> 
> > I did not like idea of big bar number, like 543.
> > I think it is better with aria/movement 23, bar 25.
> 
> You could use something like this (based on print-circled-text-callback in 
> scm/output-lib.scm) to achieve what you want more cleanly. It works with 
> 2.5.19, but not with 2.4 for some reason.
> 
> \version "2.4.0"
> 
> #(define-public (print-+100-text-callback grob)
>   (let* ( ;(text (ly:grob-property grob 'text))
>          (text (number->string (+ 100 (string->number (ly:grob-property grob 
> 'text)))))
>          (layout (ly:grob-layout grob))
>          (defs (ly:output-def-lookup layout 'text-font-defaults))
>          (props (ly:grob-alist-chain grob defs))
>          (text-stencil (Text_interface::interpret_markup layout props text)))
>     (ly:stencil-add (centered-stencil text-stencil))))
> 
> 
> \new Staff {
>         \set Score.barNumberVisibility = #(every-nth-bar-number-visible 1)
>         \override Score.BarNumber  #'print-function =
>         #print-+100-text-callback
> 
>         \repeat unfold 9 { c1 \break } \bar "|."
>     }
> 
> HTH,
> Erik

I think you misunderstand me, I wanted smallish bar numbers since that 
is easier
to say at a rehersal, not something that is +100.

Regards
/Karl