2011/12/31 gajatko <gaja...@gmail.com>:
> Robin Bannister wrote:
> gajatko wrote: > in future I will also need numbers like 9,11,13 etc. Check
> out LSR 756 http://lsr.dsi.unimi.it/LSR/Item?id=756 and some context
> http://lists.gnu.org/archive/html/lilypond-user/2011-03/msg00138.html
> Cheers, Robin
>
> Thank you, it does most of work. Unfortunately, it completely ignores the
>
> \set fingeringOrientations = #'(right)
>
> This a code I am using:
>
> ten =
> #(make-music 'FingeringEvent
> 'digit 10)
>
> fifty =
> #(make-music 'FingeringEvent
> 'digit 50)
>
> finger =
> #(define-music-function (parser location digit) (integer?)
> (make-music 'FingeringEvent
> 'digit digit))
>
> #(define (calc-finger-without-warning grob)
> (let* ((event (event-cause grob))
> (digit (ly:event-property event 'digit)))
> (number->string digit 10)))
>
> \relative c' {
> % optional override to remove warnings for fingerings larger than 5
> \override Fingering #'text = #calc-finger-without-warning
> \set fingeringOrientations = #'(right)
> c1\ten
> c1\fifty
> c1-\finger #36
> c1-\finger #29
> }
>
> Greetings
> ________________________________
> View this message in context: Re: Lilypond hangs on a script after adding
> fingering
You forgot < >
Try:
\relative c' {
\set fingeringOrientations = #'(right)
% optional override to remove warnings for fingerings larger than 5
\override Fingering #'text = #calc-finger-without-warning
<c\ten>1
<c\fifty>
<c-\finger #36 > % note the space after the number
<c-\finger #29 >
}
HTH,
Harm
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
