From de38a589d586f7424cd591536d7fcb11720b19ab Mon Sep 17 00:00:00 2001 From: Eric Teunis de Boone Date: Thu, 27 Dec 2018 11:08:42 +0100 Subject: [PATCH] Initial Working Commit --- default.sly | 12 ++++++++++++ defs/cropped.ily | 11 +++++++++++ defs/header_book.ily | 33 ++++++++++++++++++++++++++++++++ defs/header_book_tune.ily | 40 +++++++++++++++++++++++++++++++++++++++ defs/header_default.ily | 39 ++++++++++++++++++++++++++++++++++++++ defs/no_book_header.ily | 10 ++++++++++ defs/tagline.ily | 19 +++++++++++++++++++ defs/tagline_seaforth.ily | 21 ++++++++++++++++++++ pipeband.sly | 34 +++++++++++++++++++++++++++++++++ tinwhistle.sly | 18 ++++++++++++++++++ 10 files changed, 237 insertions(+) create mode 100644 default.sly create mode 100644 defs/cropped.ily create mode 100644 defs/header_book.ily create mode 100644 defs/header_book_tune.ily create mode 100644 defs/header_default.ily create mode 100644 defs/no_book_header.ily create mode 100644 defs/tagline.ily create mode 100644 defs/tagline_seaforth.ily create mode 100644 pipeband.sly create mode 100644 tinwhistle.sly diff --git a/default.sly b/default.sly new file mode 100644 index 0000000..933c0b7 --- /dev/null +++ b/default.sly @@ -0,0 +1,12 @@ +%{ + Default Stylesheet + (expected to be in lib/styles/ ) + + Includes some defs from lib/styles/defs +%} +\version "2.19.80" + +#(ly:set-option 'relative-includes #t) + +% Default tagline +\include "./defs/tagline.ily" diff --git a/defs/cropped.ily b/defs/cropped.ily new file mode 100644 index 0000000..d1839d6 --- /dev/null +++ b/defs/cropped.ily @@ -0,0 +1,11 @@ +\paper { + tagline = "" + copyright = "" + + indent = 0\mm + line-width = 110\mm + oddHeaderMarkup = "" + evenHeaderMarkup = "" + oddFooterMarkup = "" + evenFooterMarkup = "" +} diff --git a/defs/header_book.ily b/defs/header_book.ily new file mode 100644 index 0000000..a1f10b2 --- /dev/null +++ b/defs/header_book.ily @@ -0,0 +1,33 @@ +%{ + Header formatting for tunes. +%} + +\version "2.16.0" + +\paper { + 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 } + } + } + } + } +} diff --git a/defs/header_book_tune.ily b/defs/header_book_tune.ily new file mode 100644 index 0000000..abef9a1 --- /dev/null +++ b/defs/header_book_tune.ily @@ -0,0 +1,40 @@ +%{0 + Header formatting for tunes in a book +%} + +\version "2.16.0" + +\paper { + scoreTitleMarkup = \markup { + \override #'(baseline-skip . 3) + \column { + \fill-line { + \column { + \fromproperty #'header:meter + } + \column \center-align { + \huge \bold \fromproperty #'header:title + \large \bold \fromproperty #'header:subtitle + } + \column \right-align { + + \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)) + } + } + oddFooterMarkup = \markup { + \column { + \fill-line { \fromproperty #'header:copyright } + \fill-line { \fromproperty #'header:tagline } + } + } +} diff --git a/defs/header_default.ily b/defs/header_default.ily new file mode 100644 index 0000000..4407b1d --- /dev/null +++ b/defs/header_default.ily @@ -0,0 +1,39 @@ +%{0 + Header formatting for tunes. +%} + +\version "2.16.0" + +\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)) + } + } + oddFooterMarkup = \markup { + \column { + \fill-line { \fromproperty #'header:copyright } + \fill-line { \fromproperty #'header:tagline } + } + } +} diff --git a/defs/no_book_header.ily b/defs/no_book_header.ily new file mode 100644 index 0000000..9424d01 --- /dev/null +++ b/defs/no_book_header.ily @@ -0,0 +1,10 @@ +%{ + No Book Titling + Header formatting for tunes. +%} + +\version "2.16.0" + +\paper { + bookTitleMarkup = \markup {} +} diff --git a/defs/tagline.ily b/defs/tagline.ily new file mode 100644 index 0000000..44320fe --- /dev/null +++ b/defs/tagline.ily @@ -0,0 +1,19 @@ +%{0 + Tagline. Customize to get your name in the tag line. +%} + +\version "2.16.0" + +today = #(strftime "%b %e, %Y" (localtime (current-time))) + +\paper { + tagline = \markup { + \concat { + \with-url #"http://lilypond.org" #(format #f "Typeset with LilyPond ~a" (lilypond-version) ) + ", " + \with-url #"https://deboone.nl" " by ET de Boone" + ", " + \concat { "(rev. " \today ")" } + } + } +} diff --git a/defs/tagline_seaforth.ily b/defs/tagline_seaforth.ily new file mode 100644 index 0000000..eee8643 --- /dev/null +++ b/defs/tagline_seaforth.ily @@ -0,0 +1,21 @@ +%{0 + Tagline. Customize to get your name in the tag line. +%} + +\version "2.16.0" + +today = #(strftime "%b %e, %Y" (localtime (current-time))) + +\paper { + tagline = \markup { + \concat { + \with-url #"http://lilypond.org" #(format #f "Typeset with LilyPond ~a" (lilypond-version) ) + ", " + \with-url #"https://deboone.nl" " by ET de Boone" + ", " + \with-url #"https://seaforth.nl" "Seaforths of Holland" + ", " + \concat { "(rev. " \today ")" } + } + } +} diff --git a/pipeband.sly b/pipeband.sly new file mode 100644 index 0000000..fce5ce6 --- /dev/null +++ b/pipeband.sly @@ -0,0 +1,34 @@ +%{ + Pipeband Stylesheet + (expected to be in lib/styles/ ) + + Includes some defs from lib/styles/defs +%} + +%% TODO: Change Me +\include "/home/ericteunis/projects/scoring/pipeband/music/defs.ily" + +\version "2.19.80" + +#(newline) +#(display "Fix BagpipeKey instance in repo") +#(display "**not** in stylesheet") +bagpipeKey = { + \key d \major + \accidentalStyle forget +} + + +#(ly:set-option 'relative-includes #t) + +% Default Score Titling +\include "defs/header_default.ily" + +% Seaforth Tagline +\include "defs/tagline_seaforth.ily" + +\layout { + indent = 0.0 + ragged-right = ##f + ragged-bottom = ##f +} diff --git a/tinwhistle.sly b/tinwhistle.sly new file mode 100644 index 0000000..df6e1e4 --- /dev/null +++ b/tinwhistle.sly @@ -0,0 +1,18 @@ +%{ + Tinwhistle Stylesheet + (expected to be in lib/styles/ ) + + Includes lib/tinwhistle/tinwhistle.ily + And some defs from lib/styles/defs +%} + +\version "2.19.80" + +#(ly:set-option 'relative-includes #t) + +% Tinwhistle.ily +\include "../tinwhistle/tinwhistle.ily" + +% Various styling +\include "./defs/header_book.ily" +\include "./defs/tagline.ily"