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="Rune Zedeler"
   8     maintainer="rune@zedeler.dk"
   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 systems."
  18
  19 }
  20
  21 \version "2.1.3"
  22
  23 \paper  {
  24     staffheight = 6.0 \mm
  25
  26     #(define fonts (scale-font-list (/ (* 6 mm) (* 20 pt)) ))
  27
  28     \include "params-init.ly"
  29     linewidth = #(* mm 159)
  30     indent = 8\mm
  31     }
  32
  33
  34 melody = \notes  \relative c'' \repeat volta 2 \context Voice = singer {
  35     \time 6/8
  36     \autoBeamOff
  37     s1*0^\markup { \bold \bigger\bigger { \hspace #-3.0 Lieblich, etwas geschwind } }
  38   R2.
  39   r4 r8 c4 g8 |
  40   e4 c8 << { f8. g16 } \\ { f8.[ g16] } >> a8 |
  41   fis4  g8 c16[ b a g] f[ e] |
  42   d4 f8 a16[ g fis g] f[ d] |
  43   g4. r8 gis gis |
  44   a4 a16.[ b32] c4 fis,8 |
  45   g4.~ g8-\fermata g8 g |
  46   as4 as8 g4 g8 |
  47   fis4 fis8 r8 g g  |
  48   a4 a8 g4 g8 |
  49   fis4 fis8 d'16[ c b a] g[ f] |
  50   e4 g8 d4 g8 e4 r8 b'16[ c d b] g[ f] |
  51   e4 g8 d4 a'16[ g] |
  52   c,4 r8 r4 r8 |
  53   R2.\fermata
  54 }
  55
  56
  57 firstVerse = \lyrics {
  58     \property LyricsVoice . stanza = "1."
  59
  60     Sü -- ßes Licht! Aus gol -- de -- nen  Pfor -- ten brichst du __ \break
  61     sie -- gend durch __ die Nacht. Schö -- ner Tag, du __ bist er -- wacht. __ Mit \break
  62     ge -- heim -- nis -- vol -- len Wor -- ten, in me -- lo -- di -- schen Ak -- kor -- den, grüß __ ich __ \break
  63     dei -- ne Ro -- sen -- pracht, grüß ich __ dei -- ne Ro -- sen -- pracht.
  64     }
  65
  66 secondVerse = \lyrics {
  67     \property LyricsVoice . stanza = "2."
  68
  69     Ach, der Lie -- be sanf "" -- tes We -- hen schwellt mir
  70     das be -- weg -- te __ Herz, sanft, wie ein ge -- lieb -- ter Schmerz. __ Dürft ich
  71     nur auf gold -- nen Hö -- hen mich im Mor -- gen -- duft er -- ge -- hen! Sehn -- sucht
  72     zieht mich him -- mel -- wärts, Sehn -- sucht zieht mich him -- mel -- wärts
  73     }
  74
  75 pianoRH = \notes \relative c''' \repeat volta 2 {
  76     g16( fis a g fis g f e d c b a ) |
  77     <g e>8( <es fis a> <d f b> <c e c'>) r8 r |
  78     r8 c'( e,) f r a |
  79     r8 << { fis( g)} \\ { c,4 } >> r8 <e c g> <e c g> |
  80     <d c a>4. r8 \clef bass  <d b f> <d b f> |
  81     e,16 g c g e g d gis b gis d g |
  82     c, e a e c e a,-\f d fis d a d |
  83     b d g  d b g r4\fermata \clef treble g''8 |
  84     as4.( g 4.) | fis4. r4 <d g>8 ( |
  85     <f a>4.) <e g>4.( <es fis> ) <d f>\sf |
  86     r8 <e c g> <e c g> r <d b g > <d b g> |
  87     r <e c g> <e c g> r <f d b g> <f d b g> |
  88     r <e c g> <e c g> r <d b f> <d b f> |
  89     c16( b c e g b c b c e g <e b'>) |
  90     <c c'>8 r r <c, g e>8 r r\fermata |
  91 }
  92
  93 pianoLH = \notes \relative c'' \repeat volta 2 {
  94     g16( fis a g fis g f e d c b a) |
  95     \clef bass g4.( c,8) r r
  96     \clef treble r4 <bes' c>8( <a c>) r <f c'> |
  97     \clef bass r8 dis( e) r c c |
  98     f,4. r8 g g |
  99     <c, c,>4. <e e,>4. |
 100     a,4. <d d,>4. |
 101     g,8 r r g16 r16\fermata r8 g''8 |
 102     as4.( g ) |
 103     fis r4 <g b>8( |
 104     <f c'>4.) <g c>4.( | <a c>4.) <g b,> |
 105     c,4 r8 g4 r8 |
 106     c4 r8 g4 r8 |
 107     c4 r8 g4 r8 |
 108     <c g e c>8 <c e g> <c e g>     <c e g> <c e g> <c e g> |
 109     <c e g> r r <c, c,>8 r r\fermata \clef treble
 110     }
 111
 112 \score {
 113
 114     << \time 6/8
 115         \addlyrics
 116      \new Staff {  \melody }
 117      \new Lyrics <<
 118          \context  LyricsVoice = "singer-1" \firstVerse
 119          \context LyricsVoice = "singer-2" \secondVerse
 120          >>
 121      \new PianoStaff <<
 122          \property PianoStaff.instrument = \markup { \bold \bigger "2.  " }
 123          \new Staff \pianoRH
 124          \new Staff \pianoLH
 125         >>
 126     >>
 127
 128     \paper {
 129         \translator {
 130             \LyricsContext
 131             minimumVerticalExtent = ##f
 132             LyricText \set #'font-size = #1.5
 133         }
 134         \translator {
 135             \ScoreContext
 136             SpacingSpanner \set #'common-shortest-duration = #(ly:make-moment 1 8)
 137         }
 138         \translator {  \PianoStaffContext
 139                 VerticalAlignment \override #'forced-distance = #10
 140                 }
 141         \translator {
 142              \ScoreContext
 143              \remove "Lyric_phrasing_engraver"
 144              \consists "New_phrasing_engraver"
 145          }
 146
 147 }
 148 }