input/regression/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.14.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   line-width = #(* mm 140)
  22   system-system-spacing #'basic-distance = #10.3
  23   ragged-bottom = ##t
  24 }
  25
  26 modernAccidentals = {
  27   \set Staff.extraNatural =  ##f
  28   \set Staff.autoAccidentals =  #'(Staff (same-octave . 1) (any-octave . 0))
  29   \set Staff.autoCautionaries =  #'()
  30 }
  31
  32
  33 melody =    \relative c'' \repeat volta 2 \context Voice = "singer" {
  34   \time 6/8
  35   \autoBeamOff
  36   s1*0^\markup {  \larger { \hspace #-3.0 Lieblich, etwas geschwind } }
  37   R2.
  38   r4 r8 c4 g8 |
  39   \acciaccatura { f16 }  e4 c8
  40   <<
  41     \new Voice { \stemUp f8. g16 }
  42     { \stemDown f8.[ g16] } >> \stemNeutral a8 |
  43   fis4  g8 c16[ b a g] f[ e] |
  44   d4 f8
  45   \transpose a' e' \relative c'' { a16[ g fis! g] f![ d]  } |
  46   g4. r8 gis gis |
  47   a4 a16.[ b32] c8[( a]) fis8 |
  48   g4.~ g8-\fermata
  49 }
  50
  51
  52 firstVerse = \lyricmode {
  53   \set stanza = "1."
  54
  55   Sü -- ßes Licht! Aus
  56   \ignoreMelisma
  57   gol --
  58   \ignoreMelismaOff
  59
  60   de -- nen  Pfor -- ten brichst du __ |
  61   sie -- gend durch __ die Nacht. Schö -- ner Tag, du __ bist er -- wacht. __
  62 }
  63
  64 secondVerse = \lyricmode {
  65   \set stanza = "2."
  66   いろはに כיף та та ほへど ちり  ぬるを
  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\! } >>
  88    >>
  89
  90   r8 <e c g>8[  <e c g>] |
  91   <d c a>4. r8 \clef bass  <d b f> <d b f> |
  92                 \crescTextCresc
  93                 e,16_" "\<
  94                 g c g e g d gis b gis d gis |
  95                 c, e a e c e a,-\f\! d fis d a d |
  96                 b d g  d b g e16. r32\fermata
  97               }
  98
  99 pianoLH =  \relative c'' \repeat volta 2\new Voice {
 100     #(set-accidental-style 'modern)
 101     \voiceTwo
 102     g16( fis a g fis g
 103
 104     f e d c b
 105
 106     \change Staff = down
 107         \oneVoice
 108     d,) |
 109      g4.( b,8) r r
 110     \clef treble \grace s16 r8 <bes'>8-> <bes c>8->([ <a c>)] r <f c'> |
 111     \clef bass
 112     r8 dis( e) r c c |
 113     f,4.  g8[ r8 g] |
 114     <c, c,>4. <e e,>4. |
 115     a,4. <d d,>4. |
 116     g,8 r r g16 r16\fermata
 117     }
 118
 119   \book {
 120     \score {
 121       << \time 6/8
 122          \new Staff \with {
 123            fontSize = #-3
 124            \override StaffSymbol #'staff-space = #(magstep -3)
 125          } <<
 126            \context Staff #(set-accidental-style 'modern)
 127            \melody >>
 128          \lyricsto "singer" \new Lyrics \firstVerse
 129          \lyricsto "singer" \new Lyrics \secondVerse
 130          \new PianoStaff <<
 131            \set PianoStaff.instrumentName = \markup {
 132              \bold
 133              \larger\larger\larger\larger
 134              \huge
 135              "2."
 136            }
 137            \context Staff = up <<
 138              \pianoRH
 139              \pianoLH
 140            >>
 141            \context Staff = down { \clef bass \skip 1*2 }
 142          >>
 143        >>
 144
 145       \layout {
 146         \context {
 147           \Lyrics
 148           \override LyricText #'font-size = #-1
 149         }
 150         \context {
 151           \Score
 152           \override Beam #'beam-thickness = #0.55
 153           \override Beam #'auto-knee-gap = #4.0
 154           \override SpacingSpanner #'spacing-increment = #1.0
 155           \override Stem #'stemlet-length = #0.5
 156           \override Slur #'height-limit = #1.5
 157         }
 158       }
 159
 160   \midi {
 161     \context {
 162       \Score
 163       tempoWholesPerMinute = #(ly:make-moment 70 4)
 164       }
 165     }
 166
 167
 168     }
 169   }
 170