]> git.donarmstrong.com Git - lilypond.git/blob - input/mutopia/F.Schubert/standchen.ly
move mutopia subdirectory
[lilypond.git] / input / mutopia / F.Schubert / standchen.ly
1
2 % #(set! point-and-click line-column-location)
3
4 instrument = "Piano"
5
6 \header {
7   title = "Ständchen"
8   subtitle = "(Serenade)"
9   subsubtitle = "Leise flehen meine Lieder"
10   opus = "D. 957 No. 4"
11   date = "August 1828"
12   composer = "Franz Schubert (1797-1828)"
13   poet = "Text by Ludwig Rellstab (1799-1860)"
14   enteredby = "JCN"
15   copyright = "public domain"
16   % instrument = \instrument
17
18   % mutopia headers.
19   mutopiatitle = "Standchen"
20   mutopiasubtitle = "Leise flehen meine Lieder"
21   mutopiacomposer = "Franz Schubert (1797-1828)"
22   mutopiapoet = "Ludwig Rellstab (1799-1860)"
23   mutopiaopus = "D957.4"
24   mutopiainstrument = \instrument
25   date = "1828/08"
26   style = "Romantic"
27   source = "Schubert-Lieder Edition Schott No. 608, (Not dated).
28     Jubilaeums-Ausgabe zum 100. Todestage (~1928)."
29
30   copyright = "Public Domain"
31   maintainer = "Jan Nieuwenhuizen"
32   maintainerEmail = "janneke@gnu.org"
33   lastupdated =  "2001/Apr/27"
34   mutopiapublicdomain = "\\parbox[b]{\\hsize}{\\thefooter\\quad\\small
35     \\\\This music is part of the Mutopia project,
36     \\texttt{http://www.mutopiaproject.org/}\\\\It has been typeset
37     and placed in the public domain by " + \maintainer +
38     ".\\\\Unrestricted modification and redistribution is permitted
39     and encouraged---copy this music and share it.}"
40  tagline = \mutopiapublicdomain
41  footer = "Mutopia-2001/04/27-xx"
42
43
44 \version "1.5.49"
45
46 dynamicUp = \property Voice.DynamicLineSpanner \override #'direction = #1
47 dynamicRevert = \property Voice.DynamicLineSpanner \revert #'direction
48
49 \include "paper16.ly"
50
51 vocalVerse =  \notes\relative c''{
52         \dynamicUp
53         \times 2/3 { [ g8( )as] g } c4. g8 |
54         \times 2/3 { [ f8( )g] f } c'4 f,8 r |
55         g4.-> f8 \times 2/3 { [ f( )es] d } |
56         es2 r4 |
57         R2. |
58         R2. |
59         \times 2/3 { [ g8( )as] g } es'4. g,8 |
60         \times 2/3 { [ f8( )g] f } d'4. c8 |
61         bes4. as8 \times 2/3 { [ as( )g] f } |
62         g2 r4 |
63         R2. |
64         R2. |
65         g8. b16 es4. d8 |
66         c8. g16 es4. c8 |
67         \grace { [ as'32( bes ] } \times 2/3 { [ )as8( )g] as } c4. as8 |
68         g2. |
69         \grace { [ f32( g ] } \times 2/3 { [ )f8( )e] f } as4. f8 |
70   
71         es!2. |
72         g8. b16 es4. d8 |
73         c8. g16 e4. c8 |
74         \grace { [ a'32( b ] } \times 2/3 { [ )a!8( ) gis] a } c4. a8 |
75         g!2. |
76         \times 2/3 { [ d'8\f( )cis] d } f4. b,8 |
77         c!2. |
78 }
79
80 vocalThrough =  \notes\relative c{
81         \dynamicUp
82         g''8. g16 b8. b16 d8. d16 |
83         c4 b r |
84         g4. b8 d8. c16 |
85         b2 r4 |
86         e4. d8 \times 2/3 { [ d( )c] b } |
87         a8. b16 c4-> a8 r |
88         R2. |
89         R2. |
90         \grace { [ a32( b ] } \times 2/3 { [ )a!8( ) gis] a } c4. a8 |
91         g!2. |
92         \times 2/3 { [ d'8\f( )cis] d } f4. b,8 |
93         c!2. ~ |
94         % bug: slur on other staff fools lily into extending melisma
95         c4 r c |
96         as2. |
97         g |
98         e2 r4 |
99 }
100
101 lyricVerseOne =  \lyrics{
102         Lei -- se fle -- hen mei -- ne Lie -- der
103         durch die Nacht zu dir;
104         in den stil -- len Hain her nie -- der,
105         Lieb -- chen, komm zu mir! 
106         
107         Fl\"us -- ternd schlan -- ke Wip -- fel rau -- schen
108         in des Mon -- des Licht,
109         in des Mon -- des Licht;
110
111         des Ver -- r\"a -- ters feind -- lich Lau -- schen
112         f\"urch -- te, Hol -- de, nicht,
113         f\"urch -- te, Hol -- de, nicht.
114 }
115         
116 lyricVerseTwo =  \lyrics{
117         H\"orst die Nach -- ti -- gal -- len schla -- gen?
118         ach! sie fle -- hen dich, 
119         mit der T\"o -- ne s\"u -- "\ss en" Kla -- gen
120         fle -- hen sie f\"ur mich. 
121         
122         Sie -- ver -- "steh'n" des Bu -- sens Seh -- nen,
123         ken -- nen Lieb -- es -- schmerz,
124         ken -- nen Lieb -- es -- schmerz,
125
126         r\"uh -- ren mit den Sil -- ber -- t\"o -- nen
127         jed -- es wei -- che Herz,
128         jed -- es wei -- che Herz.
129 }
130
131 lyricThrough =  \lyrics{
132         La\ss auch dir die Brust be -- we -- gen 
133         Lieb -- chen, h\"o -- re mich! 
134         be -- bend harr' ich dir ent -- ge -- gen! 
135         
136         komm, be -- gl\"uk -- ke mich!
137         komm, be -- gl\"uk -- ke mich, __ 
138         be -- gl\"uk -- ke mich!
139 }
140
141 trebleIntro =  \notes\relative c{
142         r8^"\bf M\\\"a\\ss ig"\pp <g'-. c-.> <c-. es-.> <g-. c-.> <c-. es-.> <g-. c-.> |
143         r8 <as-. c-.> <c-. es-.> <as-. c-.> <c-. es-.> <as-. c-.> |
144         r8 <as-. c-.> <c-. d-.> <as-. c-.> <c-. d-.> <as-. c-.> |
145         r8 <g-. b-.> <b-. d-.> <g-. b-.> <b-. d-.> <g-. b-.> |
146 }
147
148 trebleVerseOne =  \notes\relative c{
149         %5
150         r8 <g' c> <c es> <g c> <c es> <g c> |
151         r8 <f c'> <c' d> <f, c'> <c' d> <f, c'> |
152         r8 <f g b> <g b d> <f g b> <g b d> <f g b> |
153         r8 <es g c> <g c es> <es g c> <g c es> <es g c> |
154         <g''4.( b,> <)f8 d>
155         % manual beam override bug
156         %\times 2/3 { < [f( d> <es c> <)d b] > } |
157         \times 2/3 < { [ f( es )d ] } { d c b } > |
158         %10
159         <c2. es> |
160         r8 <g, c> <c es> <g c> <c es> <g c> |
161         r8 <f c'> <c' d> <f, c'> <c' d> <f, c'> |
162         r8 <f as bes> <as bes d> <f as bes> <as bes d> <f as bes> |
163         % manual beam override bug
164         % r8 < [ es g bes> <g bes es> <es g bes> <g bes es ] > 
165         r8 < { [ es g es g ] } { g bes g bes } { bes es bes es } >
166         <{ es'( )  d4.() f8}{ c' | bes4.  as8 } >
167         % manual beam override bug
168         % \times 2/3 { < [f( as> <es g> <)d f] > } |
169         \times 2/3 < { [ f( es )d ] } { as g f } > |
170         %16
171         <es2. g> |
172         r8 <f, g> <g b> <f g> <g b> <f g> |
173         r8 <es g> <g c> <es g> <g c> <es g> |
174         r8\pp <es as c> <as c es> <es as c> <as c es> <es as c> |
175         %20
176         r8 <es g bes> <g bes es> <es g bes> <g bes es> <es g bes> |
177         \property Voice.Slur \override #'attachment = #'(stem . stem)
178         \grace { [ as'32( bes ] } \times 2/3 { [ )as8( g as] } c4.-> ) as8 |
179         \property Voice.Slur \revert #'attachment
180         g2. |
181         r8 <f, g> <g b> <f g> <g b> <f g> |
182         r8 <e g> <g c> <e g> <g c> <e g> |
183         r8 <f a c> <a c f> <f a c> <a c f> <f a c> |
184         r8 <e g c> <g c e> <e g c> <g c e> <e g c> |
185         \times 2/3 < { [ f'8\f( e f] } {  f' e f } >
186         < {a4.- > )f8}  { a'4. f8 }  > |
187 }
188
189 trebleEentje =  \notes \relative c'{
190         \stemBoth
191         <e2 e'> r4 |
192         <f2\mf as!\(> <as8.->( c> <f16 \))as> |
193         % urg: slurs with staccati are ugly
194         <e4. g> <e8-. g-.(> <e-. g-.> <e-. )g-.> |
195         <f4. g> <b,8-. g'-.(> <d-. g-.> <f-. )g-.> |
196         <e2 g> <e4\pp g> |
197         <f2 a\(> <a8.( c> <f16 \))a> |
198         <e4.\( g> <e8-.( g-.> <e-. g-.> <e-. \))g-.> |
199         <f4. g> <b,8-. g'-.(> <d-. g-.> <f-. )g-.> |
200         %60
201         <e2 g> r4 |
202 }
203
204 trebleThrough =  \notes \relative c'{
205         \stemBoth
206         <e2. e'> |
207         %61
208         R2. |
209         [<g,8.\< g'> <g16 g'> <b8. b'> <\! b16\> b'16> <d8. d'> <d16 d'>] |
210         < { c4( )b } { c'4( )b } > \!r |
211
212         <g4. g'> <b8 b'> [<d'8.-> d,-> > c16] |
213         %65
214         < { d,2.(\f )a'2} { e2. ~ e2 } { b'2.( )c,2 }> r4 |
215         \context Staff < 
216                 \context Voice=one {
217                         \voiceOne
218                         %urg
219                         %a8. b16 c4-> () a8 r |
220                         a8. b16 c4^> () a8 r |
221                         %a8. b16 c4-> () a8 r |
222                         a8. b16 c4^> () a8 r |
223                 }
224                 \context Voice=two {
225                         \voiceTwo
226                         <d,4 f> <d2 f> |
227                         <c!4 es> <c2 es> |
228                 }
229         >
230
231         % 4 bars copied from end verse1
232         r8 <f, a c> <a c f> <f a c> <a c f> <f a c> |
233         %70
234         r8 <e g c> <g c e> <e g c> <g c e> <e g c> |
235         \times 2/3 < { [ f'8\f( e f] } {  f' e f } >
236         < { a4.-> )f8 } { a'4. f8 } > |
237         <e2. e'> |
238         <es!2. es'! > |
239         \property Voice . TextScript \override #'font-shape = #'italic
240         <d2._"decresc." d'> |
241         \property Voice . TextScript \revert #'font-shape
242
243         %75
244         <b2. b'> |
245         <c2 c'> <e4\pp g> |
246
247         % four copied from begin eentje
248         <f2 as!(> <as8.-> c> <f16 )as> |
249         <e4. g> <e8-. g-.(> <e-. g-.> <e-. )g-.> |
250         <f4. g> <b,8-. g'-.(> <d-. g-.> <f-. )g-.> |
251         %80
252
253         \property Voice . TextScript \override #'font-shape = #'italic
254         <e2._"dim." g> |
255         \property Voice . TextScript \revert #'font-shape
256
257         <g,2. e' g> |
258         <g2.-\fermata e' g> |
259 }
260
261 bassIntro =  \notes\relative c{
262         \dynamicUp
263 %1
264         <c,2 c'> r4 |
265         <as2 as'> r4 |
266         <f2 f'> r4 |
267         <g2 g'> r4 |
268 }
269
270 bassVerseOne =  \notes\relative c{
271 %       \clef bass
272         \dynamicUp
273 %5
274         <c,2 c'> r4 |
275         <as2 as'> r4 |
276         <g2 g'> r4 |
277         <c2 c'> r4 |
278         <g8 g'> [<g'' d'> <d' f> <g, d'> <d' f> <g, d'>] |
279 %10
280         <c,,8 c'> [<g'' c> <c es> <g c> <c es> <g c>] |
281         <c,,2 c'> r4 |
282         <as2 as'> r4 |
283         <bes2 bes'> r4 |
284         <es,2 es'> r4 |
285 %15
286         bes'8 [<bes' f'> <f' as> <bes, f'> <f' as> <bes, f'>] |
287         es,8 [<bes' es> <es g> <bes es> <es g> <bes es>] |
288         <g,2 g'> r4 |
289         <c2 c'> r4 |
290         <as2 as'> r4 |
291         <es2 es'> r4 |
292         <bes'8 bes'> [<f'' bes> <bes d> <f bes> <bes d> <f bes>] |
293         <es,,8 es'> [<es'' g bes> <g bes es> <es g bes> <g bes es> <es g bes>] |
294         <g,,2 g'> r4 |
295         <c2 c'> r4 |
296         <f,2 f'> r4 |
297         <c'2 c'> r4 |
298         <g8 g'> [<d'' g> <g b> <d g> <g b> <d g>] |
299         c,8 [<c' e g> <e g c> <c e g> <e g c> <c e g>] |
300 }
301
302 bassEentje =  \notes\relative c{
303         \dynamicUp
304         <c,8 c'> [<c' f as!> <f as c> <c f as> <f as c> <c f as>] |
305         c,8 [<c' e g> <e g c> <c e g> <e g c> <c e g>] |
306         <g,8 g'> [<d'' g> <g b> <d g> <g b> <d g>] |
307         c,8 [<e' g> <g c> <e g> <g c> <e g>] |
308         <c,8 c'> [<c' f a> <f a c> <c f a> <f a c> <c f a>] |
309         c,8 [<c' e g> <e g c> <c e g> <e g c> <c e g>] |
310         <g,8 g'> [<d'' g> <g b> <d g> <g b> <d g>] |
311         c,8 [<e' g> <g c> <e g> <g c> <e g>] |
312 }
313
314 bassThrough =  \notes\relative c{
315         \dynamicUp
316         %61
317         <g,8^"cresc." g'> [<g' b d> <b d f> <g b d> <as!-> b-> d->> <b d f>] |
318         <g,8 g'> [<g' d'> <d' f> <g, d'> <as-> b-> d->> <b d f>] |
319         % copied
320         <g,8 g'> [<g' d'> <d' f> <g, d'> <as-> b-> d->> <b d f>] |
321         <g,8 g'> [<g' d'> <d' f> <g, d'> <gis-> b-> d->> <b d f>] |
322         %65
323         <gis,8 gis'> [<d''\> e> <e b'> <d e> <e b'> <d\! e>] |
324         <a,8 a'> [<c' e> <e a> <c e> <e a> <c e>] |
325         <a,8 a'> [<a' d f> <d f a> <a d f> <d f a> <a d f>] |
326         <a,8 a'> [<a' c e> <c e a> <a c e> <c e a> <a c e>] |
327         % 4 bars copied from end verse1
328         <f,2\p f'> r4 |
329         %70
330         <c'2 c'> r4 |
331         <g8 g'> [<d'' g> <g b> <d g> <g b> <d g>] |
332         c,8\> [<c' e g> < \! e g c> <c e g> <e g c> <c e g>] |
333
334         <c,8 c'> [<c' es! g> <es g c> <c es g> <es g c> <c es g>] |
335         <f,,8 f'> [<d'' f> <f as!> <d f> <f as> <d f>] |
336         %75
337         <g,,8 g'> [<d'' f> <f g> <d f> <f g> <d f>] |
338         c,8 [<c' e> <e g> <c e> <e g> <c e>] |
339         c,8 [<c' f> <f as> <c f> <f as> <c f>] |
340         c,8 [<c' e> <e g> <c e> <e g> <c e>] |
341         g,8 [<g' d'> <d' f> <g, d'> <d' f> <g, d'>] |
342         %80
343         c,8 [<c' e> <e g> <c e> <e g> <c e>] |
344         c,8 [<c' g> <e c> <c g> <e c> <c g>] |
345         <c,2._\fermata g' c> |
346 }
347                 
348 global =  \notes{
349         \time 3/4 
350         \key es \major
351         \skip 1 * 3/4 * 4
352         \break
353         \skip 1 * 3/4 * 25
354         \break
355         \skip 1 * 3/4 * 6
356         \break
357         \skip 1 * 3/4 * 41
358         \break
359         \skip 1 * 3/4 * 6
360         \bar "|."
361 }
362
363 allLyrics = \lyrics {
364         % maybe should be bigger by default, in grob-description.scm ?
365         \property Lyrics . LyricText \override #'font-relative-size = #1
366         \property Lyrics . LyricHyphen \override #'maximum-length = #1.5
367         \lyricVerseOne
368         \lyricVerseTwo
369         \lyricThrough
370 }
371
372 lyricStaff = \context Lyrics {
373         \allLyrics
374 }
375                 
376 vocals = \context Voice \notes {
377         \clef treble
378         % certainly no auto-beaming for vocals
379         \property Voice.autoBeaming = ##f
380         \property Staff.automaticMelismata= ##t
381
382         \dynamicUp
383         % duh 1 != 3/4
384         R1 * 3/4 * 4
385         \vocalVerse 
386         R1 * 3/4 * 8
387         \vocalVerse
388         \vocalThrough
389         R1 * 3/4 * 6
390 }
391
392 vocalStaff =  \context Staff = vocal<
393           \property Staff.midiInstrument = "synth voice"
394           \global
395           \vocals
396 >
397
398 treble =  {
399         \clef treble
400         \property Voice.autoBeamSettings \override #'(begin * * * *) = #(make-moment 0 1)
401         \trebleIntro 
402         \trebleVerseOne 
403         \trebleEentje
404         \trebleVerseOne 
405         \trebleThrough
406 }
407
408 trebleStaff =  \context Staff = treble< 
409         \property Staff.midiInstrument = "acoustic grand"
410         \global
411         \treble
412 >
413 bass =  {
414         \clef bass
415         \bassIntro 
416         \bassVerseOne 
417         \bassEentje
418         \bassVerseOne 
419         \bassThrough
420 }
421
422 bassStaff =  \context Staff = bass<
423         \property Staff.midiInstrument = "acoustic grand"
424         \global
425         \bass
426 >
427
428 grandStaff =  \context PianoStaff <
429
430         \trebleStaff
431         \bassStaff
432 >
433
434
435 \score{
436         <
437
438 %{
439         Transpose as you like for your voice
440         Range untransposed is c' to f'' (for tenors and sopranos)
441         \transpose a gives a' to d'' (for basses, who sing an octave down)
442
443                 \addlyrics 
444                         \notes \transpose a \vocalStaff
445                         \lyricStaff
446                 \notes \transpose a \grandStaff
447 %}
448
449                 \addlyrics
450                         \vocalStaff
451                         \lyricStaff 
452                 \grandStaff
453         >
454         \paper {
455                 % Use
456                 %   textheight = 280.\mm
457                 %   linewidth = 190.\mm
458                 % to get this on 3 pages of a4.
459                 
460                 % Mandatory Mutopia settings yield 4 pages :-(
461                 textheight = 270.0\mm
462                 linewidth = 180.0\mm
463
464                 \translator { \HaraKiriStaffContext }
465         }
466         \midi{
467                 \tempo 4 = 54
468         }
469 }