mirror of
https://github.com/kastdeur/pipeband-music.git
synced 2024-11-13 06:53:32 +01:00
40 lines
1.1 KiB
Text
40 lines
1.1 KiB
Text
|
%{
|
||
|
Header formatting for tunes. Customize to get your name in the tag line.
|
||
|
%}
|
||
|
|
||
|
\version "2.16.0"
|
||
|
|
||
|
today = #(strftime "%B %e, %Y" (localtime (current-time)))
|
||
|
|
||
|
\paper {
|
||
|
tagline = \markup {
|
||
|
\line {
|
||
|
"ET de Boone, Seaforths of Holland,"
|
||
|
\concat { "(rev. " \today ")" }
|
||
|
}
|
||
|
}
|
||
|
scoreTitleMarkup = \markup {
|
||
|
\override #'(baseline-skip . 3)
|
||
|
\column {
|
||
|
\fill-line {
|
||
|
\column {
|
||
|
\large \bold \fromproperty #'header:title
|
||
|
\bold \fromproperty #'header:subtitle
|
||
|
}
|
||
|
\fromproperty #'header:meter
|
||
|
\column \right-align {
|
||
|
\fromproperty #'header:instrument
|
||
|
\line {
|
||
|
\fromproperty #'header:composer
|
||
|
$(if (and (ly:get-option 'header:composer) (ly:get-option 'header:arranger))
|
||
|
(markup " "))
|
||
|
\italic \fromproperty #'header:arranger }
|
||
|
}
|
||
|
}
|
||
|
$(if (not (ly:get-option 'without-comment))
|
||
|
(markup #:justify-field 'header:comment)
|
||
|
(markup))
|
||
|
}
|
||
|
}
|
||
|
}
|