Like the original OP I'd really like to get the stringNumberSpanner function
from LSR http://lsr.di.unimi.it/LSR/Snippet?id=616 to incorporate the
startTextSpan and number of notes. Ideally, one would wind up with something
like a8\restez {"5" 4} which would extend a line for 4 of the note value of
the starting note.
This seems to have worked in version 2.14 but in 2.19 it is not printing the
line.
\version "2.19.13"
restez =
#(define-music-function (parser location StringNumber music) (string?
ly:music?)
#{
\override Voice.TextSpanner.style = #'solid
\override Voice.TextSpanner.font-size = #-5
\override TextSpanner.bound-details.left.stencil-align-dir-y = #CENTER
\override TextSpanner.bound-details.left.text = \markup { \circle
\number $StringNumber }
#(begin
(let* ((elts (ly:music-property music 'elements)))
(set! (ly:music-property (car elts) 'elements)
(cons (make-music 'TextSpanEvent 'span-direction -1)
(ly:music-property (car elts) 'elements)))
(set! (ly:music-property (car (reverse elts)) 'elements)
(cons (make-music 'TextSpanEvent 'span-direction 1)
(ly:music-property (car (reverse elts)) 'elements)))
(make-music 'SequentialMusic 'elements (list music))))
#})
\relative c' {
\restez "5" { a8 b c d e f }
\restez "4" { g a bes4 a g2 }
}
--
View this message in context:
http://lilypond.1069038.n5.nabble.com/Cello-fingering-indications-tp34653p166071.html
Sent from the User mailing list archive at Nabble.com.
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user
