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