kastdeur
/
bagpipe.ly
mirror of https://github.com/kastdeur/bagpipe.ly.git
1
0
Fork 0
Code Issues Releases Activity

New default handling of header formats 

* Now uses `header_default` or `header_book` depending on the file name
  (it ends with `.book.ly`) if the format is not set explicitly.
* Renamed several music file to reflect this.
This commit is contained in:
Sven Axelsson 2014-01-04 18:02:51 +01:00
parent 000ce033e1
commit caf26da0cc
2 changed files with 0 additions and 79 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
format.ly
View File

@ -1,35 +0,0 @@
%{
Header formatting for bagpipe tunes. Customize to get your name in the tag line.
%}
\version "2.16.0"
today = #(strftime "%B %e, %Y" (localtime (current-time)))
\paper {
raggedbottom = ##t
tagline = \markup {
\line {
"P/S Sven Axelsson, MPD,"
\with-url #"http://svenax.net/site/sheetmusic"
"http://svenax.net/site/sheetmusic"
\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
\line { \fromproperty #'header:composer " " \italic \fromproperty #'header:arranger }
}
$(if (not (ly:get-option 'without-comment))
(markup #:justify-field 'header:comment)
(markup))
}
}
}

44
formatbook.ly
View File

@ -1,44 +0,0 @@
%{
Header formatting for bagpipe tunes. Customize to get your name in the tag line.
%}
\version "2.16.0"
today = #(strftime "%B %e, %Y" (localtime (current-time)))
\paper {
raggedbottom = ##t
tagline = \markup {
\line {
"P/S Sven Axelsson, MPD,"
\with-url #"http://svenax.net/site/sheetmusic"
"http://svenax.net/site/sheetmusic"
\concat { "(rev. " \today ")" }
}
}
bookTitleMarkup = \markup {
\override #'(baseline-skip . 3.5)
\column {
\fill-line { \fromproperty #'header:dedication }
\override #'(baseline-skip . 3.5)
\column {
\huge \larger \bold
\fill-line {
\larger \fromproperty #'header:title
}
\fill-line {
\large \smaller \bold
\larger \fromproperty #'header:subtitle
}
\fill-line {
\smaller \bold
\fromproperty #'header:source
}
\fill-line {
\line { \fromproperty #'header:meter }
\line { \fromproperty #'header:composer " " \italic \fromproperty #'header:arranger }
}
}
}
}
}