input/test/title-markup.ly

   1 \version "2.5.2"
   2
   3 %{
   4    Markup titles also available for direct PostScript output:
   5
   6    export GS_LIB=$(pwd)/mf/out:/usr/share/texmf/fonts/type1/bluesky/cm
   7    lilypond-bin -fps input/title/title-markup.ly
   8
   9   PostScript fonts: WIP.
  10
  11   * Nonstandardised install directory / how to locate a ps font?
  12   * Nonstandardised filenames?
  13
  14
  15 For century schoolbook font:
  16
  17   Debian:
  18     cp -pv /usr/share/fonts/type1/gsfonts/c*.{afm,pfb} mf/out
  19
  20   Red Hat (untested):
  21
  22     cp -pv /usr/share/fonts/afms/adobe/c*.{afm,pfb} mf/out/
  23
  24     cp -pv /usr/share/fonts/default/Type1/c*.{pfb,afm} mf/out
  25
  26 %}
  27
  28 \layout{
  29     #(define page-breaking ly:optimal-page-breaks)
  30     %% Ughr, this breaks TeX output...
  31     %% fonts = #(make-century-schoolbook-tree 1.0)
  32     inputencoding = #"latin1"
  33 }
  34
  35 latinTest = \markup {
  36     "Hellö"
  37 }
  38
  39 sizeTest = \markup {
  40         \column {
  41             { \normalsize "normalsize"
  42               \hspace #5
  43               \smaller "smaller"
  44               \hspace #5
  45               \smaller \smaller "smaller"
  46               \hspace #5
  47               \smaller \smaller \smaller "smaller"
  48             }
  49             " "
  50             { \normalsize "normalsize"
  51               \hspace #5
  52               \bigger "bigger"
  53               \hspace #5
  54               \bigger \bigger "bigger"
  55               \hspace #5
  56               \bigger \bigger \bigger "bigger"
  57             }
  58        }
  59 }
  60
  61
  62 spaceTest = \markup { "two space chars" }
  63 \header {
  64     texidoc = "Make titles using markup.  Only in direct PostScript output."
  65
  66     tagline = "my tagline for "
  67
  68     %dedication = "För my dør Lily"
  69     % ugh: encoding char-size
  70     %dedication = "For my öòóôõø so dear Lily"
  71     dedication = \markup { "For my "
  72 %                          "öòóôõø"
  73                            " so dear Lily" }
  74     title = "Title"
  75     subtitle = "(and (the) subtitle)"
  76     subsubtitle = "Sub sub title"
  77     poet = "Poet"
  78     composer = "Composer"
  79     texttranslator = "Text Translator"
  80     opus = "opus 0"
  81     meter = "Meter (huh?)"
  82     arranger = "Arranger"
  83     instrument = "Instrument"
  84     piece = "Piece"
  85
  86     %% Override automatic book title
  87     %% bookTitle = \markup { \fill-line { \huge\bold \title } }
  88 }
  89
  90 \book {
  91
  92     \score {
  93         \context Staff  \relative c' {
  94             c2-\sizeTest c2-\spaceTest
  95         }
  96         \layout {
  97             #(layout-set-staff-size (* 11.0 pt))
  98         }
  99     }
 100
 101     \score {
 102         \context Staff  \relative c' {
 103             %% stress page breaking:
 104             %% 35 keep on 3 pages
 105             %% 36 spread evenly over 4 pages
 106             \repeat unfold 6 { a b c d \break }
 107
 108             %% FIXME: TODO factor \pagebreak \noPagebreak into regtest
 109             %% Without this, page breaks are better, after measure: 12
 110             \noPageBreak
 111             \repeat unfold 30 { a b c d \break }
 112             c1
 113         }
 114         \header {
 115             %% Override automatic score title
 116             %% scoreTitle = \markup { "Tweetje" }
 117             opus = "opus 1"
 118             piece = "Second"
 119         }
 120         \layout {
 121         }
 122     }
 123 }