input/test/title-markup.ly

   1 \version "2.1.29"
   2 %{
   3    \markup in titles is WIP, only available in direct PostScript output
   4    process and view this file doing:
   5
   6      lilypond-bin -fps title-markup.ly
   7      export GS_LIB=$(pwd)/mf/out:/usr/share/texmf/fonts/type1/bluesky/cm
   8      gs title-markup.ps
   9 %}
  10
  11 sizeTest = \markup {
  12         \column <
  13             { \normalsize "normalsize"
  14               \hspace #5
  15               \smaller "smaller"
  16               \hspace #5
  17               \smaller \smaller "smaller"
  18               \hspace #5
  19               \smaller \smaller \smaller "smaller"
  20             }
  21             " "
  22             { \normalsize "normalsize"
  23               \hspace #5
  24               \bigger "bigger"
  25               \hspace #5
  26               \bigger \bigger "bigger"
  27               \hspace #5
  28               \bigger \bigger \bigger "bigger"
  29             }
  30        >
  31 }
  32
  33 spaceTest = \markup { "two space chars" }
  34 \header {
  35     texidoc = "Make titles using markup (WIP)."
  36
  37     %dedication = "För my dør Lily"
  38     dedication = "For my öòóôõø so dear Lily"
  39     title = "Title"
  40     subtitle = "(and (the) subtitle)"
  41     subsubtitle = "Sub sub title"
  42     poet = "Poet"
  43     composer = "Composer"
  44     texttranslator = "Text Translator"
  45     opus = "opus 0"
  46     meter = "Meter (huh?)"
  47     arranger = "Arranger"
  48     instrument = "Instrument"
  49     piece = "piece"
  50
  51 %{
  52     makeConditionalTitle = \markup {
  53         \column <
  54             #(if (defined? 'title)
  55              (markup* #:fill-line (#:huge #:bigger #:bigger #:bold title))
  56              (markup* ""))
  57             #(if (defined? 'subtitle)
  58              (markup* #:fill-line ( #:large #:bold subtitle))
  59              (markup* ""))
  60             #(if (defined? 'subsubtitle)
  61              (markup* #:fill-line (subsubtitle))
  62              (markup* ""))
  63          >
  64     }
  65 %}
  66     makeTitle = \markup {
  67         \column <
  68             %\fill-line #linewidth < \huge \bigger \bold \title >
  69             \override #'(baseline-skip . 4) \column <
  70                 \fill-line < \dedication >
  71                 \fill-line < \huge\bigger\bigger\bigger\bigger \bold \title >
  72                 \override #'(baseline-skip . 3) \column <
  73                     \fill-line < \large\bigger\bigger \bold \subtitle >
  74                     \fill-line < \bigger\bigger \bold \subsubtitle >
  75                 >
  76                 \override #'(baseline-skip . 5) \column <
  77                 " "
  78                 >
  79                 \override #'(baseline-skip . 2.5) \column <
  80                     \fill-line < \bigger \poet
  81                                  \large\bigger \caps \composer >
  82                     \fill-line < \bigger \texttranslator
  83                                  \bigger \opus >
  84                     \fill-line < \bigger \meter
  85                                  \bigger \arranger >
  86                     " "
  87                     \fill-line < \large\bigger \instrument >
  88                     " "
  89                     \fill-line < \large\bigger \caps \piece  " ">
  90                 >
  91             >
  92         >
  93     }
  94
  95 %{
  96      foe = \sizeTest
  97      baar = \spaceTest
  98 %}
  99 }
 100
 101 \score {
 102     \context Staff \notes \relative c' {
 103         c2-\sizeTest c2-\spaceTest \break
 104         c2 c2
 105     }
 106 }