input/mutopia/F.Schubert/morgenlied.ly

   1 \header {
   2     title = "Sängers Morgenlied"
   3     composer = "Franz Schubert"
   4     date = "27. Februar 1815"
   5     source = "Edition Peters"
   6     editor = "Paul Losse"
   7     enteredby="Han-Wen Nienhuys"
   8     maintainer="hanwen@xs4all.nl"
   9
  10     texidoc = "The source is a rather tightly set Peters in Edition is
  11     a heavy font. The Peters edition (4622c) was `herausgegeben' by
  12     Paul Losse, whose name also appears on a 1956 edition of some
  13     other music. Strictly speaking, his edititorial enhancements will
  14     not be in the PD - but I am assuming there are no notable ones in
  15     this small piece.
  16
  17     The original compresses the entire music onto a single page, in 4
  18     systems.  Lily does so too if you tune down spacing-increment, but
  19     chooses line breaks differently.
  20
  21     Further manual tweaks: the slur in measure 12 has been flattened
  22     manually. The beam in measure 3, left-hand, technically is wrong,
  23     but has been added following the original.
  24
  25 "
  26
  27 }
  28
  29 \version "2.1.22"
  30 manuscriptBreak = { \break }
  31
  32
  33
  34 \paper  {
  35     #(paper-set-staff-size (* 5.8 mm))
  36     linewidth = #(* mm 160)
  37     indent = 8\mm
  38     interscoreline = 2.\mm
  39     }
  40
  41 modernAccidentals = {
  42   \set Staff.extraNatural =  ##f
  43   \set Staff.autoAccidentals =  #'(Staff (same-octave . 1) (any-octave . 0))
  44   \set Staff.autoCautionaries =  #'()
  45 }
  46
  47
  48 melody = \notes   \relative c'' \repeat volta 2 \context Voice = singer {
  49     \time 6/8
  50     \autoBeamOff
  51     s1*0^\markup { \bold \large\bigger\bigger { \hspace #-3.0 Lieblich, etwas geschwind } }
  52   R2.
  53   r4 r8 c4 g8 |
  54   e4 c8
  55     <<
  56         \new Voice { \stemUp f8. g16 }
  57         { \stemDown f8.[ g16] } >> \stemBoth a8 |
  58   fis4  g8 c16[ b a g] f[ e] |
  59   d4 f8 a16[ g fis g] f[ d] |
  60   g4. r8 gis gis |
  61   a4 a16.[ b32] c4 fis,8 |
  62   g4.~ g8-\fermata g8 g |
  63   as4 as8 g4 g8 |
  64   fis4 fis8 r8 g g  |
  65   a!4 a8 g4 g8 |
  66   fis4 fis8 d'16[ c b a] g[ f] |
  67   e4 g8 d4 g8 e4 r8 b'16[ c d b] g[ f] |
  68   e4 g8 d4 a'16[ g] |
  69   c,4 r8 r4 r8 |
  70
  71     % TODO : make \fermata work.
  72   R2.^\fermataMarkup
  73 }
  74
  75
  76 <<<<<<< morgenlied.ly
  77 ignoreMelisma = \set ignoreMelismata =  ##t
  78 ignoreMelismaOff = \unset ignoreMelismata
  79 =======
  80 ignoreMelisma = \set ignoreMelismata = ##t
  81 ignoreMelismaOff = \unset ignoreMelismata
  82 >>>>>>> 1.20
  83
  84
  85 firstVerse = \lyrics {
  86 <<<<<<< morgenlied.ly
  87     \set stanza =  "1."
  88 =======
  89     \set stanza = "1."
  90 >>>>>>> 1.20
  91
  92     Sü -- ßes Licht! Aus
  93     \ignoreMelisma
  94     gol --
  95     \ignoreMelismaOff
  96
  97     de -- nen  Pfor -- ten brichst du __ \manuscriptBreak |
  98     sie -- gend durch __ die Nacht. Schö -- ner Tag, du __ bist er -- wacht. __ Mit ge -- |
  99     \manuscriptBreak
 100     heim -- nis -- vol -- len Wor -- ten, in me -- lo -- di -- schen Ak -- kor -- den, grüß __ ich __ \manuscriptBreak |
 101     dei -- ne Ro -- sen -- pracht, grüß ich __ dei -- ne Ro -- sen -- pracht.
 102     }
 103
 104 secondVerse = \lyrics {
 105 <<<<<<< morgenlied.ly
 106     \set stanza =  "2."
 107 =======
 108     \set stanza = "2."
 109 >>>>>>> 1.20
 110     Ach, der Lie -- be sanf
 111     -- tes We -- hen schwellt mir |
 112     das be -- weg -- te __ Herz, sanft, wie ein ge -- lieb -- ter Schmerz. __ Dürft ich |
 113     nur auf gold -- nen Hö -- hen mich im Mor -- gen -- duft er -- ge -- hen! Sehn -- sucht |
 114     zieht mich him -- mel -- wärts, Sehn -- sucht zieht mich him -- mel -- wärts.
 115     }
 116
 117 pianoRH = \notes \relative c''' \repeat volta 2 {
 118     \modernAccidentals
 119     g16(_\p fis a g fis g f e d c b a ) |
 120     <g e>8( <es fis a> <d f b> <c e c'>) r8 r |
 121     r8 c'( e,) f r a |
 122 <<<<<<< morgenlied.ly
 123     \once \override DynamicLineSpanner  #'padding =#3
 124 =======
 125     \once \override DynamicLineSpanner   #'padding =#3
 126 >>>>>>> 1.20
 127     r8_\> << { s8 s8-\! }  << { fis( g)
 128                             } \\ { c,4 } >> >> r8 <e c g> <e c g> |
 129     <d c a>4. r8 \clef bass  <d b f> <d b f> |
 130     e,16_" "_\markup { \bold\italic cresc. } g c g e g d gis b gis d gis |
 131     c, e a e c e a,-\f d fis d a d |
 132     b d g  d b g r4\fermata \clef treble g''8 |
 133     as4.( g 4.) | fis4. r4 <d g>8 ( |
 134     <f a>4.) <e g>4.( <es fis> ) <d f>\sf |
 135     r8 <e c g> <e c g> r <d b g > <d b g> |
 136     r <e c g> <e c g> r <f d b g> <f d b g> |
 137     r <e c g> <e c g> r <d b f> <d b f> |
 138     c16(_\f b c e g b c b c e g <e b'>) |
 139     <c c'>8 r r <c, g e>8 r r\fermata |
 140 }
 141
 142 pianoLH = \notes \relative c'' \repeat volta 2 {
 143     \modernAccidentals
 144     g16( fis a g fis g f e d c b a) |
 145     \clef bass g4.( c,8) r r
 146     \clef treble r4 <bes' c>8([ <a c>)] r <f c'> |
 147     \clef bass r8 dis( e) r c c |
 148     f,4. r8 g g |
 149     <c, c,>4. <e e,>4. |
 150     a,4. <d d,>4. |
 151     g,8 r r g16 r16\fermata r8 g''8 |
 152     as4.( g ) |
 153     fis r4 <g b>8( |
 154     <f c'>4.)
 155
 156 <<<<<<< morgenlied.ly
 157     \once \override Slur  #'height-limit = #1.0
 158 =======
 159     \once \override Slur   #'height-limit = #1.0
 160 >>>>>>> 1.20
 161
 162     <g c>4.( | <a c>4.) <g b,> |
 163     c,4 r8 g4 r8 |
 164     c4 r8 g4 r8 |
 165     c4 r8 g4 r8 |
 166     <c g e c>8 <c e g> <c e g>     <c e g> <c e g> <c e g> |
 167     <c e g> r r <c, c,>8 r r\fermata \clef treble
 168     }
 169
 170 \score {
 171
 172     << \time 6/8
 173      \new Staff <<
 174          \context Staff \modernAccidentals
 175          \melody >>
 176          \lyricsto "singer" \new Lyrics \firstVerse
 177          \lyricsto "singer" \new Lyrics \secondVerse
 178      \new PianoStaff <<
 179 <<<<<<< morgenlied.ly
 180          \set PianoStaff.instrument =  \markup {
 181 =======
 182          \set PianoStaff.instrument = \markup {
 183 >>>>>>> 1.20
 184              \bold
 185              \bigger\bigger\bigger\bigger \huge "2.  " }
 186          \new Staff \pianoRH
 187          \new Staff \pianoLH
 188         >>
 189     >>
 190
 191     \paper {
 192         \translator {
 193             \LyricsContext
 194             minimumVerticalExtent = #'(-1.0 . 0)
 195         }
 196         \translator {
 197             \ScoreContext
 198             Beam \override #'thickness = #0.55
 199             SpacingSpanner \set #'spacing-increment = #1.0
 200             Slur \set #'height-limit = #1.5
 201         }
 202         \translator {
 203             \PianoStaffContext
 204             VerticalAlignment \override #'forced-distance = #10
 205         }
 206         \translator {
 207             \StaffContext
 208             minimumVerticalExtent = #'(-3. . 6)
 209         }
 210     }
 211     \midi {
 212         \tempo 4 = 70
 213         }
 214 }