input/test/title-markup.ly

   1 \version "2.1.30"
   2 %{
   3    Experimental markup titles are available in direct PostScript output:
   4
   5    export GS_LIB=$(pwd)/mf/out:/usr/share/texmf/fonts/type1/bluesky/cm
   6    lilypond-bin -fps input/title/title-markup.ly
   7
   8 %}
   9
  10 \paper{
  11     #(define page-breaking ly:optimal-page-breaks)
  12 }
  13
  14 latinTest = \markup { \latin-i "Hellö" }
  15
  16 sizeTest = \markup {
  17         \column <
  18             { \normalsize "normalsize"
  19               \hspace #5
  20               \smaller "smaller"
  21               \hspace #5
  22               \smaller \smaller "smaller"
  23               \hspace #5
  24               \smaller \smaller \smaller "smaller"
  25             }
  26             " "
  27             { \normalsize "normalsize"
  28               \hspace #5
  29               \bigger "bigger"
  30               \hspace #5
  31               \bigger \bigger "bigger"
  32               \hspace #5
  33               \bigger \bigger \bigger "bigger"
  34             }
  35        >
  36 }
  37
  38 spaceTest = \markup { "two space chars" }
  39 \header {
  40     texidoc = "Make titles using markup.  Only in direct PostScript output."
  41
  42     ##tagline = "my tagline for v \version"
  43     copyright = "Copyright by /me"
  44
  45     %dedication = "För my dør Lily"
  46     % ugh: encoding char-size
  47     %dedication = "For my öòóôõø so dear Lily"
  48     dedication = \markup { "For my "
  49                            \latin-i { "öòóôõø" }
  50                            " so dear Lily" }
  51     title = "Title"
  52     subtitle = "(and (the) subtitle)"
  53     subsubtitle = "Sub sub title"
  54     poet = "Poet"
  55     composer = "Composer"
  56     texttranslator = "Text Translator"
  57     opus = "opus 0"
  58     meter = "Meter (huh?)"
  59     arranger = "Arranger"
  60     instrument = "Instrument"
  61     piece = "Piece"
  62
  63     %% Override automatic book title
  64     %% bookTitle = \markup { \fill-line < \huge\bold \title > > }
  65 }
  66
  67 \score {
  68     \context Staff \notes \relative c' {
  69         c2-\sizeTest c2-\spaceTest
  70     }
  71     \paper {
  72 %       #(paper-set-staff-size (* 11.0 pt))
  73         }
  74 }
  75
  76 \header {
  77     %% Override automatic score title
  78     %% scoreTitle = \markup { "Tweetje" }
  79     opus = "opus 1"
  80     piece = "Second"
  81 }
  82
  83 \score {
  84     \context Staff \notes \relative c' {
  85         \repeat unfold 25 { a b c d \break }
  86         c1
  87     }
  88 }