Trying to force the lyric in David's program to associate with the
Staff/Voice, I added a name "jun" to the voice and see if that worked.
noteNameToLyric =
#(define-void-function (parser location lst) (list?)
(let* ((str (t lst))
(str (string-append "{ " str "}")))
(display str) (newline)
(ly:parser-include-string
parser
(string-append " \\new Lyrics \\lyricsto \"jun\" " str))))
music = \relative c' { c4 d e f g a b c }
\new Staff
<<
\new Voice = "jun" \music
\noteNameToLyric \extractPitches \music
>>
In this case, the lyrics, that is the pitch numbers, did not show up at
all! Wonder why?
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user
