2013/2/18 pabuhr <[email protected]>:
> I tried to create a macro, "Fred", to replace the many
> repeated lines, but was unsuccessful. Suggestions on how to make it work?
Quit concise:
\version "2.16.1"
underscore =
\markup \combine \with-color #white "|" "_"
Fred =
#(define-music-function (parser location name times) (string? list?)
$(make-sequential-music
(map
(lambda (tms)
#{
\lyricmode {
\set stanza = \markup \fontsize #-2 $name
\repeat unfold $tms \underscore
}
#})
times)))
notes = \Fred "Note" #'(6 17 16 16 16) % list of notes per line
fretno = \Fred "Fret" #'(6 17 16 16 16) % list of notes per line
HTH,
Harm
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user
