ly/titling-init.ly

   1 bookTitleMarkup = \markup {
   2   \column <
   3     \fill-line < \fromproperty #'header:dedication >
   4     \fill-line <
   5       \huge \bigger \bigger \bigger \bold \fromproperty #'header:title
   6     >
   7     \fill-line <
   8       \override #'(baseline-skip . 3)
   9       \column <
  10         \fill-line <
  11           \huge \bigger \bigger
  12           \bold \fromproperty #'header:subtitle
  13         >
  14         \fill-line <
  15           \huge \bigger
  16           \bold \fromproperty #'header:subsubtitle
  17         >
  18       >
  19     >
  20     \fill-line <
  21       \fromproperty #'header:poet
  22       \fromproperty #'header:instrument
  23       \column <
  24         \fromproperty #'header:composer
  25         \fromproperty #'header:arranger
  26       >
  27     >
  28   >
  29 }
  30
  31 scoreTitleMarkup = \markup {
  32   \fill-line <
  33     \fromproperty #'header:piece
  34     \fromproperty #'header:opus
  35   >
  36 }
  37
  38
  39 oddHeaderMarkup = \markup
  40 \fill-line <
  41   ""
  42   \fromproperty #'header:instrument
  43   \fromproperty #'page:page-number-string
  44 >
  45
  46 evenHeaderMarkup = \markup
  47 \fill-line <
  48   \fromproperty #'page:page-number-string
  49   \fromproperty #'header:instrument
  50   ""
  51 >
  52
  53 oddFooterMarkup = \markup {
  54   \column <
  55     \fill-line <
  56
  57       % put copyright only on pagenr. 1
  58       \on-the-fly #(lambda (layout props arg)
  59                     (if (= 1 (chain-assoc-get 'page:page-number props   -1))
  60                      (interpret-markup layout props arg)
  61                      empty-stencil
  62                    ))
  63       \fromproperty #'header:copyright
  64     >
  65     \fill-line <
  66       % put tagline only on last page
  67       \on-the-fly #(lambda (layout props arg)
  68                     (if (chain-assoc-get 'page:last?  props #f)
  69                      (interpret-markup layout props arg)
  70                      empty-stencil
  71                    ))
  72       \fromproperty #'header:tagline
  73     >
  74   >
  75 }
  76