input/typography-demo.ly

   1 \header {
   2     title = "LilyPond demo"
   3     enteredby="Han-Wen Nienhuys"
   4     maintainer="hanwen@xs4all.nl"
   5
   6     texidoc = "
   7 heavily mutilated Edition Peters Morgenlied by Schubert"
   8
   9 }
  10
  11 \version "2.4.0"
  12
  13 ignoreMelisma = \set ignoreMelismata = ##t
  14 ignoreMelismaOff = \unset ignoreMelismata
  15
  16 #(set-global-staff-size 21)
  17
  18 \paper  {
  19 %#(set-global-staff-size (* 5.8 mm))
  20   indent = #(* mm 4)
  21   linewidth = #(* mm 140)
  22   interscoreline = 2.\mm
  23   betweensystemspace = 15\mm
  24   raggedbottom = ##t
  25 }
  26
  27 modernAccidentals = {
  28   \set Staff.extraNatural =  ##f
  29   \set Staff.autoAccidentals =  #'(Staff (same-octave . 1) (any-octave . 0))
  30   \set Staff.autoCautionaries =  #'()
  31 }
  32
  33
  34 melody =    \relative c'' \repeat volta 2 \context Voice = "singer" {
  35     \time 6/8
  36     \autoBeamOff
  37     s1*0^\markup {  \bigger { \hspace #-3.0 Lieblich, etwas geschwind } }
  38   R2.
  39   r4 r8 c4 g8 |
  40  \acciaccatura { f16( }  e4) c8
  41     <<
  42         \new Voice { \stemUp f8. g16 }
  43         { \stemDown f8.[ g16] } >> \stemNeutral a8 |
  44   fis4  g8 c16[ b a g] f[ e] |
  45   d4 f8
  46     \transpose a' e' \relative c'' { a16[ g fis! g] f![ d]  } |
  47   g4. r8 gis gis |
  48   a4 a16.[ b32] c8[( a]) fis8 |
  49   g4.~ g8-\fermata
  50 }
  51
  52
  53 firstVerse = \lyricmode {
  54     \set stanza = "1."
  55
  56     Sü -- ßes Licht! Aus
  57     \ignoreMelisma
  58     gol --
  59     \ignoreMelismaOff
  60
  61     de -- nen  Pfor -- ten brichst du __ |
  62     sie -- gend durch __ die Nacht. Schö -- ner Tag, du __ bist er -- wacht. __
  63     }
  64
  65 secondVerse = \lyricmode {
  66     \set stanza = "2."
  67   いろはに כיף та та ほへど ちり  ぬるを
  68
  69   Жъл  дю ля זה
  70
  71   いろ はに כיף та та ほへ ちり ぬる
  72
  73   Жъл дю ля __
  74     }
  75
  76 pianoRH =  \relative c''' \repeat volta 2\new Voice {
  77     #(set-accidental-style 'modern)
  78     \voiceOne
  79     g16( fis a g fis g f e d c b
  80     \oneVoice
  81     a ) |
  82     <g e>8( <es fis a> <d e bes'> <c e c'>\arpeggio) r8 r |
  83     r8 c'( e,) f r a |
  84     \once \override DynamicLineSpanner   #'padding =#3
  85     r8
  86         << { fis( g) } \\
  87         << { a4 } { s8\> s8\! }    >> >> r8 <e c g>8[  <e c g>] |
  88     <d c a>4. r8 \clef bass  <d b f> <d b f> |
  89     \setTextCresc
  90     e,16_" "\<
  91     g c g e g d gis b gis d gis |
  92     c, e a e c e a,-\f\! d fis d a d |
  93     b d g  d b g e16. r32\fermata
  94 }
  95
  96 pianoLH =  \relative c'' \repeat volta 2\new Voice {
  97     #(set-accidental-style 'modern)
  98     \voiceTwo
  99     g16(_\p fis a g fis g
 100
 101     f e d c b
 102
 103     \change Staff = down
 104         \oneVoice
 105     d,) |
 106      g4.( c,8) r r
 107     \clef treble \grace s16 r8 <bes'>8-> <bes c>8->([ <a c>)] r <f c'> |
 108     \clef bass
 109     r8 dis( e) r c c |
 110     f,4.  g8[ r8 g] |
 111     <c, c,>4. <e e,>4. |
 112     a,4. <d d,>4. |
 113     g,8 r r g16 r16\fermata
 114     }
 115
 116 \book {
 117     \score {
 118         << \time 6/8
 119            \new Staff \with {
 120              fontSize = #-3
 121              \override StaffSymbol #'staff-space = #(magstep -3)
 122            } <<
 123                \context Staff #(set-accidental-style 'modern)
 124                \melody >>
 125            \lyricsto "singer" \new Lyrics \firstVerse
 126            \lyricsto "singer" \new Lyrics \secondVerse
 127            \new PianoStaff <<
 128                \set PianoStaff.instrument = \markup {
 129                    \bold
 130                    \bigger\bigger\bigger\bigger \huge "2." \hspace #1.0 }
 131                \context Staff = up <<
 132                  \pianoRH
 133                  \pianoLH
 134                  >>
 135                \context Staff = down { \clef bass \skip 1*2 }
 136            >>
 137        >>
 138
 139         \layout {
 140             \context {
 141                 \Lyrics
 142                 minimumVerticalExtent = #'(-0.85 . 2.2)
 143                 \override LyricText #'font-size = #-1
 144             }
 145             \context {
 146                 \Score
 147                 \override Beam #'thickness = #0.55
 148                 \override Beam #'auto-knee-gap = #4.0
 149                 \override SpacingSpanner #'spacing-increment = #1.0
 150                 \override Stem #'stemlet-length = #0.5
 151                 \override Slur #'height-limit = #1.5
 152             }
 153             \context {
 154                 \PianoStaff
 155                 \override VerticalAlignment #'forced-distance = #10
 156             }
 157         }
 158         \midi {
 159             \tempo 4 = 70
 160         }
 161     }
 162 }
 163