2014-06-30 22:25 GMT+02:00 David Nalesnik <david.nales...@gmail.com>:
> Hello,
>
>
> On Mon, Jun 30, 2014 at 2:32 PM, philip <philip.el...@gmail.com> wrote:
>
>> Hi,
>> I was wondering if anyone knows how to override the
>> default numbering format for string numbers
>> (default is circled arabic numbers) and use roman
>> numerals instead.
>>
>>
> Try this:
>
> \version "2.19.8"
>
> #(define (string-number::calc-roman-text grob)
>
> (let ((event (event-cause grob)))
>
> (or (ly:event-property event 'text #f)
>
> (format #f "~@r" (ly:event-property event 'string-number)))))
>
>
> {
>
> \override StringNumber.text = #string-number::calc-roman-text
>
> \clef "treble_8"
>
> c4\5 e\4 g2\3
>
> <c,\5 e\4 g\3>1
>
> }
>
If you don't need any circle you can write (including David's code) :
{
\override StringNumber.text = #string-number::calc-roman-text
\override StringNumber.stencil = #ly:text-interface::print
\clef "treble_8"
c4\5 e\4 g2\3
<c,\5 e\4 g\3>1
}
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
