New Tagline system

This commit is contained in:
Eric Teunis de Boone 2019-02-12 09:25:53 +01:00
parent 96e7ca79c7
commit 71cd391c02
4 changed files with 64 additions and 3 deletions

53
cmpd.sly Normal file
View file

@ -0,0 +1,53 @@
%{
Pipeband Stylesheet
for the Canadian Memorial Pipes and Drums of Holland
(expected to be in lib/styles/ )
Includes some defs from lib/styles/defs
%}
\version "2.19.80"
#(ly:set-option 'relative-includes #t)
\include "./pipeband.sly"
bandname = "Canadian Memorial Pipes and Drums"
bandnameFull = "Canadian Memorial Pipes and Drums of Holland"
bandnameTagline = \bandnameFull
bandnameShort = "CMPD"
bandWebsite = "https://canadianmemorialpipesanddrums.nl"
% Reload the tagline
\include "./defs/tagline_band.ily"
% Reset the TitleMarkup
\paper {
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 " "))
$(if (ly:get-option 'header:arranger)
(markup " Arr."))
\italic \fromproperty #'header:arranger }
}
}
$(if (not (ly:get-option 'without-comment))
(markup #:justify-field 'header:comment)
(markup))
}
}
}

View file

@ -12,6 +12,7 @@
\column { \column {
\large \bold \fromproperty #'header:title \large \bold \fromproperty #'header:title
\bold \fromproperty #'header:subtitle \bold \fromproperty #'header:subtitle
\small \bold \fromproperty #'header:band
} }
\fromproperty #'header:meter \fromproperty #'header:meter
\column \right-align { \column \right-align {

View file

@ -1,4 +1,4 @@
%{0 %{
Tagline. Customize to get your name in the tag line. Tagline. Customize to get your name in the tag line.
%} %}
@ -22,7 +22,7 @@ today = #(strftime "%Y-%m-%d" (localtime (current-time)))
", " ", "
\with-url #"https://deboone.nl" "by ET de Boone" \with-url #"https://deboone.nl" "by ET de Boone"
", " ", "
\with-url #"https://seaforth.nl" "Seaforths of Holland" \with-url #bandWebsite \bandnameFull
", " ", "
\concat { "(rev. " \today ", #" \commit ")" } \concat { "(rev. " \today ", #" \commit ")" }
} }

View file

@ -26,8 +26,15 @@ bagpipeKey = {
% Default Score Titling % Default Score Titling
\include "defs/header_default.ily" \include "defs/header_default.ily"
bandname = "Seaforth Highlanders of Holland"
bandnameFull = "Seaforth Highlanders of Holland Memorial Pipes and Drums"
bandnameTagline = "Seaforths of Holland"
bandnameShort = "Seaf"
bandWebsite = "https://seaforth.nl"
% Seaforth Tagline % Seaforth Tagline
\include "defs/tagline_seaforth.ily" \include "defs/tagline_band.ily"
\layout { \layout {
indent = 0.0 indent = 0.0