input/test/title-markup.ly

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