X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=mutopia%2FF.Schubert%2Fstandchen.ly;h=f008fdef15fb357c489e66b7872416e3a14b72c1;hb=56803f159f4a7bcf205835b781531c7db9c10958;hp=0e2b89d72cba9b7360521a5eb18e46901103a7cd;hpb=aad5ddf9162f3ee43f74a8e108324f3959f2f9c0;p=lilypond.git diff --git a/mutopia/F.Schubert/standchen.ly b/mutopia/F.Schubert/standchen.ly index 0e2b89d72c..f008fdef15 100644 --- a/mutopia/F.Schubert/standchen.ly +++ b/mutopia/F.Schubert/standchen.ly @@ -1,34 +1,59 @@ -\header{ -filename = "standchen.ly"; -title = "St\\\"andchen"; -subtitle = "(Serenade)\\\\``Leise flehen meine Lieder''"; -opus = "D. 957 No. 4"; -date = "August 1828"; -composer = "Franz Schubert (1797-1828)"; -poet= "Text by Ludwig Rellstab (1799-1860)"; -enteredby = "JCN"; -copyright = "public domain"; + +#(set! point-and-click line-column-location) + +instrument = "Piano" + +\header { + title = "Ständchen" + subtitle = "(Serenade)" + subsubtitle = "Leise flehen meine Lieder" + opus = "D. 957 No. 4" + date = "August 1828" + composer = "Franz Schubert (1797-1828)" + poet = "Text by Ludwig Rellstab (1799-1860)" + enteredby = "JCN" + copyright = "public domain" + instrument = \instrument + + % mutopia headers. + mutopiatitle = "Standchen" + mutopiasubtitle = "Leise flehen meine Lieder" + mutopiacomposer = "Franz Schubert (1797-1828)" + mutopiapoet = "Ludwig Rellstab (1799-1860)" + mutopiaopus = "D957.4" + mutopiainstrument = \instrument + date = "1828/08" + style = "Romantic" + source = "Schubert-Lieder Edition Schott No. 608, (Not dated). + Jubilaeums-Ausgabe zum 100. Todestage (~1928)." + + copyright = "Public Domain" + maintainer = "Jan Nieuwenhuizen" + maintainerEmail = "janneke@gnu.org" + lastupdated = "2001/Mar/26" + mutopiapublicdomain = "\\parbox{\hsize}{\\thefooter\\quad\\small + \\\\This music is part of the Mutopia project, + \\texttt{http://www.mutopiaproject.org/}\\\\It has been typeset + and placed in the public domain by " + \maintainer + + ".\\\\Unrestricted modification and redistribution is permitted + and encouraged---copy this music and share it.}" + tagline = \mutopiapublicdomain + footer = "Mutopia-2001/03/26-xx" } -%{ - Tested Features@ multivoice accents lyrics chords piano music -multiple \paper{}s in one \score -Note: Original key F. -%} +\version "1.3.146" -\version "1.0.14"; +dynamicUp = \property Voice.DynamicLineSpanner \override #'direction = #1 +dynamicRevert = \property Voice.DynamicLineSpanner \revert #'direction -$vocal_verse1 = \notes\relative c''{ - % ugh: treble/bass - % ? - \clef treble; - \property Voice.dynamicdir=1 +\include "paper16.ly" + +vocalVerse = \notes\relative c''{ + \dynamicUp \times 2/3 { [ g8( )as] g } c4. g8 | \times 2/3 { [ f8( )g] f } c'4 f,8 r | g4.-> f8 \times 2/3 { [ f( )es] d } | es2 r4 | - % ugh: a whole should be a measure - %r1 | R2. | R2. | \times 2/3 { [ g8( )as] g } es'4. g,8 | @@ -39,27 +64,23 @@ $vocal_verse1 = \notes\relative c''{ R2. | g8. b16 es4. d8 | c8. g16 es4. c8 | - % \times 2/3 { [ as\grace( bes ] ) -% \tiny [as'16*1/16 bes16*1/16 ] -% \normalsize \times 2/3 { [as8 g8] as8 } c4. as8 | - \times 2/3 { [ as'8( )g] as } c4. as8 | + % CHECK + % \grace { as'16 bes } \times 2/3 { [ )as8( )g] as } c4. as8 | + \grace { as'16( bes } \times 2/3 { [ )as8( )g] as } c4. as8 | g2. | - %\times 2/3 { [ f\grace( g] ) - \times 2/3 { [ f8( )e] f } as4. f8 | - %\tiny \times 2/3 { [f`16*1/16 g16*1/16] \normalsize + \grace { f16( g } \times 2/3 { [ )f8( )e] f } as4. f8 | + es!2. | g8. b16 es4. d8 | c8. g16 e4. c8 | - % \times 2/3 { [ a\grace( b] ) - \times 2/3 { [ a'!8( ) gis] a } c4. a8 | + \grace { a'16( b } \times 2/3 { [ )a!8( ) gis] a } c4. a8 | g!2. | - % \times 2/3 { [ a\grace( b] ) - \times 2/3 { [ d'8\f cis] d } f4. b,8 | + \times 2/3 { [ d'8\f( )cis] d } f4. b,8 | c!2. | } -$vocal_through = \notes\relative c{ - \property Voice.dynamicdir=1 +vocalThrough = \notes\relative c{ + \dynamicUp g''8. g16 b8. b16 d8. d16 | c4 b r | g4. b8 d8. c16 | @@ -68,12 +89,9 @@ $vocal_through = \notes\relative c{ a8. b16 c4-> a8 r | R2. | R2. | - % 4 bars copied from end verse 1 - % \times 2/3 { [ a\grace( b] ) - \times 2/3 { [ a!8( ) gis] a } c4. a8 | + \grace { a16( b } \times 2/3 { [ )a!8( ) gis] a } c4. a8 | g!2. | - % \times 2/3 { [ a\grace( b] ) - \times 2/3 { [ d'8\f cis] d } f4. b,8 | + \times 2/3 { [ d'8\f( )cis] d } f4. b,8 | c!2. ~ | c4 r c | as2. | @@ -81,205 +99,160 @@ $vocal_through = \notes\relative c{ e2 r4 | } -$lyric_verse1 = \lyrics{ -% 5 - \times 2/3 { Lei-4 se8 } fleh-4. en8 | - \times 2/3 { mei-4 ne8 } Lie-4 der8 _8 | - Durch4. die8 \times 2/3 { Nacht4 zu8 } | - dir;2 _4 | - _4 _ _ | - _ _ _ | -% 11 - \times 2/3 { In4 den8 } stil-4. len8 | - \times 2/3 { Hain4 her-8 } nie-4. der8 | - Lieb-4. chen,8 \times 2/3 { komm4 zu8 } | - mir!2 _4 | - _4 _ _ | - _ _ _ | -% 17 - Fl\"us-8. ternd16 schlan-4. ke8 | - Wip-8. fel16 rau-4. schen8 | - \times 2/3 { In4 des8 } Mon-4. des8 | - Licht;2. | - \times 2/3 { In4 des8 } Mon-4. des8 | - Licht;2. | -% 23 - Des8. Ver-16 r\"a-4. thers8 | - feind-8. lich16 Lau-4. schen8 | - \times 2/3 { F\"urch-4 te8 } Hol-4. de8 | - nicht2. | - \times 2/3 { f\"urch-4 te8 } Hol-4. de8 | - nicht.2. | +lyricVerseOne = \lyrics{ + Lei- se fleh- en mei- ne Lie- der + Durch die Nacht zu dir + In den stil- len Hain her- nie- der + Lieb- chen, komm zu mir! + + Fl\"us- ternd schlan- ke Wip- fel rau- schen + In des Mon- des Licht, + In des Mon- des Licht + + Des Ver- r\"a- ters feind- lich Lau- schen + F\"urch- te, Hol- de, nicht, + F\"urch- te, Hol- de, nicht. } -$lyric_verse2 = \lyrics{ -% 5 - \times 2/3 { H\"orst4 die8 } Nach-4. ti-8 - \times 2/3 { gal-4 len8 } schla-4 gen?8 _8 - ach!4. sie8 \times 2/3 { fleh-4 en8 } - dich,2 _4 - _4 _ _ - _4_ _ - -% 11 - \times 2/3 { Mit4 der8 } T\"o-4. ne8 - \times 2/3 { s\"u-4 "\ss{}en"8 } Kla-4. gen8 - Fleh-4. en8 \times 2/3 { sie4 f\"ur8 } - mich2 _4 - _4_ _ - _4_ _ - -% 17 - Sie-8. ver-16 stehn4. des8 - Bus-8. ens16 Seh-4. nen8 - \times 2/3 { Ken-4 nen8 } Lieb-4. es-8 - schmerz,2. - \times 2/3 { Ken-4 nen8 } Lieb-4. es-8 - schmerz.2. - -% 23 - R\"uh-8. ren16 mit4. den8 - Sil-8. ber-16 t\"o-4. nen8 - \times 2/3 { jed-4 es8 } wei-4. che8 - Herz,2. - \times 2/3 { jed-4 es8 } wei-4. che8 - Herz.2. +lyricVerseTwo = \lyrics{ + H\"orst die Nach- ti- gal- len schla- gen? + Ach! sie fleh- en dich, + Mit der T\"o- ne s\"u- "\ss en" Kla- gen + Fleh- en sie f\"ur mich. + + Sie- ver- "steh'n" des Bus- ens Seh- nen + Ken- nen Lieb- es- schmerz, + Ken- nen Lieb- es- schmerz. + + R\"uh- ren mit den Sil- ber- t\"o- nen + Jed- es wei- che Herz, + Jed- es wei- che Herz. } -$lyric_through = \lyrics{ -% 37 - La\ss8. auch16 dir8. die16 Brust8. be-16 | - we-4 gen _ | - Lieb-4. chen,8 h\"o-8. re16 | - mich!2 _4 | - Be-4. bend8 \times 2/3 { harr'4 ich8} | - dir8. ent-16 ge-4 gen!8 _8 | - _2. | - _2. | - \times 2/3 { Komm4 be-8 } gl\"u4. cke8 | - mich!2. | - \times 2/3 { Komm4 be-8 } gl\"u4. cke8 | - mich,2. __ | - _2 be-4 | - gl\"u-2. | - cke2. | - mich!2 _4 | +lyricThrough = \lyrics{ + La\ss auch dir die Brust be- we- gen + Lieb- chen, h\"o- re mich! + Be- bend harr' ich dir ent- ge- gen! + + Komm, be- gl\"uk- ke mich! + Komm, be- gl\"uk- ke mich, __ + Be- gl\"uk- ke mich! } -$treble_intro = \notes\relative c{ - \clef violin; - % ugh: id like to type this! - %r8\pp [ ] | - r8^"\bf m\\\"assig"\pp <[g'-. c-.> ] | - r8 <[as-. c-.> ] | - r8 <[as-. c-.> ] | - r8 <[g-. b-.> ] | +trebleIntro = \notes\relative c{ + r8^"\bf M\\\"a\\ss ig"\pp | + r8 | + r8 | + r8 | \break } -$treble_verse1 = \notes\relative c{ -% \clef violin; +trebleVerseOne = \notes\relative c{ %5 - r8 <[g' c> ] | - r8 <[f c'> ] | - r8 <[f g b> ] | - r8 <[es g c> ] | + r8 | + r8 | + r8 | + r8 | <)f8 d> - \times 2/3 { < [ f( d> <)d b] > } | + \times 2/3 { < [ f( d> <)d b] > } | %10 | - r8 <[g, c> ] | - r8 <[f c'> ] | - r8 <[f as bes> ] | - r8 <[es g bes> ] - <{ es'~ | d4. ~ f8}{ c'~ | bes4. ~ as8 } > - \times 2/3 { < [f( as> <)d f] > } | + r8 | + r8 | + r8 | + r8 + <{ es'( ) d4.() f8}{ c' | bes4. as8 } > + \times 2/3 { < [f( as> <)d f] > } | %16 | - r8 <[f, g> ] | - r8 <[es g> ] | - r8\pp <[es as c> ] | + r8 | + r8 | + r8\pp | %20 - r8 <[es g bes> ] | - % \times 2/3 { [ as\grace( bes ) - \times 2/3 { [ as'8( g as] } c4.-> ) as8 | + r8 | + \grace { as'16( bes } \times 2/3 { [ )as8( g as] } c4.-> ) as8 | g2. | - r8 <[f, g> ] | - r8 <[e g> ] | - r8 <[f a c> ] | - r8 <[e g c> ] | + r8 | + r8 | + r8 | + r8 | \times 2/3 < { [ f'8\f( e f] } { f' e f } > - < {a4.- > )f8} { a4. f8 } > | + < {a4.- > )f8} { a'4. f8 } > | } -$treble_eentje = \notes \relative c'{ +trebleEentje = \notes \relative c'{ + \stemBoth | - <[as8.->( c> <)f16 )as>] | - <[e8-. g-.(> ] | - <[b,8-. g'-.(> ] | + ( c> <)f16 )as> | + | + | | - <[a8. c> ] | - <[e8-. g-.(> ] | - <[b,8-. g'-.(> ] | + | + | + | %60 | } -$treble_through = \notes \relative c'{ +trebleThrough = \notes \relative c'{ + \stemBoth | %61 R2. | - <[g,8.\< g'> <\! b16\> b'16> ] | + [ <\! b16\> b'16> ] | < { c4( )b } { c'4( )b } > \!r | -% ugh -% <[d8.-> d->> c16] | + [ d,-> > c16] | -% ugh ugh: connecting chords %65 < { d,2.\f a'2} { e2. ~ e2 } { b'2. c,2 }> r4 | - \type Staff < - { - \voiceone - [a8. b16] c4-> ~ a8 r | - [a8. b16] c4-> ~ a8 r | + \context Staff < + \context Voice=one { + \voiceOne + a8. b16 c4-> () a8 r | + a8. b16 c4-> () a8 r | } - { - \voicetwo + \context Voice=two { + \voiceTwo | | } > + % 4 bars copied from end verse1 - r8 <[f, a c> ] | + r8 | %70 - r8 <[e g c> ] | + r8 | \times 2/3 < { [ f'8\f( e f] } { f' e f }> - < { a4.-> )f8 } { a4. f8 } > | + < { a4.-> )f8 } { a'4. f8 } > | r4 | r4 | - \property Voice . textstyle = "italic" + \property Voice . TextItem \override #'font-style = #'italic r4 | + \property Voice . TextItem \revert #'font-style + %75 r4 | | % four copied from begin eentje - <[as8.-> c> ] | - <[e8-. g-.(> ] | - <[b,8-. g'-.(> ] | + c> | + | + | %80 - \property Voice . textstyle = "italic" + + \property Voice . TextItem \override #'font-style = #'italic | + \property Voice . TextItem \revert #'font-style + | | } -$bass_intro = \notes\relative c{ - \clef bass; - \property Voice.dynamicdir=1 +bassIntro = \notes\relative c{ + \dynamicUp %1 r4 | r4 | @@ -287,183 +260,191 @@ $bass_intro = \notes\relative c{ r4 | } -$bass_verse1 = \notes\relative c{ -% \clef bass; - \property Voice.dynamicdir=1 +bassVerseOne = \notes\relative c{ +% \clef bass + \dynamicUp %5 r4 | r4 | r4 | r4 | - <[g'' d'> ] | + [ ] | %10 - <[g'' c> ] | + [ ] | r4 | r4 | r4 | r4 | %15 - bes'8 <[bes' f'> ] | - es,8 <[bes' es> ] | + bes'8 [ ] | + es,8 [ ] | r4 | r4 | r4 | r4 | - <[f'' bes> ] | - <[es'' g bes> ] | + [ ] | + [ ] | r4 | r4 | r4 | r4 | - <[d'' g> ] | - c,8 <[c' e g> ] | + [ ] | + c,8 [ ] | } -$bass_eentje = \notes\relative c{ - \property Voice.dynamicdir=1 - <[c' f as!> ] | - c,8 <[c' e g> ] | - <[d'' g> ] | - c,8 <[e' g> ] | - <[c' f a> ] | - c,8 <[c' e g> ] | - <[d'' g> ] | - c,8 <[e' g> ] | +bassEentje = \notes\relative c{ + \dynamicUp + [ ] | + c,8 [ ] | + [ ] | + c,8 [ ] | + [ ] | + c,8 [ ] | + [ ] | + c,8 [ ] | } -$bass_through = \notes\relative c{ - \property Voice.dynamicdir=1 +bassThrough = \notes\relative c{ + \dynamicUp %61 - <[g' b d> b-> d->> ] | - <[g' d'> b-> d->> ] | + [ b-> d->> ] | + [ b-> d->> ] | % copied - <[g' d'> b-> d->> ] | - <[g' d' e> b-> d->> ] | + [ b-> d->> ] | + [ b-> d->> ] | %65 - <[d''\> e> ] | - <[c' e> ] | - <[a' d f> ] | - <[a' c e> ] | + [ e> ] | + [ ] | + [ ] | + [ ] | % 4 bars copied from end verse1 r4 | %70 r4 | - <[d'' g> ] | - c,8\> <[c' e g> < \! e g c> ] | + [ ] | + c,8\> [ < \! e g c> ] | - <[c' es! g> ] | - <[d'' f> ] | + [ ] | + [ ] | %75 - <[d'' f> ] | - c,8 <[c' e> ] | - c,8 <[c' f> ] | - c,8 <[c' e> ] | - <[g' d'> ] | + [ ] | + c,8 [ ] | + c,8 [ ] | + c,8 [ ] | + [ ] | %80 - c,8 <[c' e> ] | - c,8 <[c' g> ] | + c,8 [ ] | + c,8 [ ] | | } -global = \notes{ - \time 3/4; - \key es; - \skip 4 * 12; +global = \notes{ + \time 3/4 + \key es \major + \skip 4 * 12 \break - \skip 4 * 234; - \bar "|."; + \skip 4 * 234 + \bar "|." } - -$lyric_four = \lyrics{ - _4 _ _ - _ _ _ - _ _ _ - _ _ _ -} - -allLyrics = { - \time 3/4; -% \skip 4 * 12; - \$lyric_four - \$lyric_verse1 -% \skip 4 * 24; - \$lyric_four - \$lyric_four - \$lyric_verse2 - \$lyric_through +allLyrics = \lyrics { + \lyricVerseOne + \lyricVerseTwo + \lyricThrough } -$lyric_staff = \type Lyrics = lyric< +lyricStaff = \context Lyrics { \allLyrics -> +} -vocals = \notes{ - \property Voice.dynamicdir=UP - \skip 4 * 12; - \$vocal_verse1 - \skip 4 * 24; - \$vocal_verse1 - \$vocal_through +vocals = \context Voice { + \clef treble + % certainly no auto-beaming for vocals + \property Voice.noAutoBeaming = ##t + \property Staff.automaticMelismata= ##t + + \dynamicUp + \skip 4 * 12 + \vocalVerse + \skip 4 * 24 + \vocalVerse + \vocalThrough } -$vocal_staff = \type Staff = vocal< - \property Staff.instrument = "alto sax" - \global - \$vocals +vocalStaff = \context Staff = vocal< + \property Staff.instrument = "synth voice" + \global + \vocals > -treble = { - \$treble_intro - \$treble_verse1 - \$treble_eentje - \$treble_verse1 - \$treble_through +treble = { + \clef treble + \property Voice.autoBeamSettings \override #'(begin * * * *) = #(make-moment 0 1) + \trebleIntro + \trebleVerseOne + \trebleEentje + \trebleVerseOne + \trebleThrough } -$treble_staff = \type Staff = treble< +trebleStaff = \context Staff = treble< \global \treble > - -bass = { - \$bass_intro - \$bass_verse1 - \$bass_eentje - \$bass_verse1 - \$bass_through +bass = { + \clef bass + \bassIntro + \bassVerseOne + \bassEentje + \bassVerseOne + \bassThrough } -$bass_staff = \type Staff = bass< +bassStaff = \context Staff = bass< \global \bass > -$grand_staff = \type GrandStaff< - \$treble_staff - \$bass_staff +grandStaff = \context PianoStaff < + \trebleStaff + \bassStaff > + \score{ - % Transpose as you like for your voice - % Range untransposed is c' to f'' (for tenors and sopranos) - % To get original, \transpose d' - % \transpose a gives a' to d'' (for basses, who sing an octave down) < -% kjoet, but i like the original better -- jcn -% { \notes \transpose a { \$vocal_staff } } -% \$lyric_staff -% { \notes \transpose a { \$grand_staff } } - { \notes { \$vocal_staff } } - \$lyric_staff - { \notes { \$grand_staff } } + +%{ + Transpose as you like for your voice + Range untransposed is c' to f'' (for tenors and sopranos) + \transpose a gives a' to d'' (for basses, who sing an octave down) + + \addlyrics + \notes \transpose a \vocalStaff + \lyricStaff + \notes \transpose a \grandStaff +%} + + \addlyrics + \vocalStaff + \lyricStaff + \grandStaff > \paper { -% \translator { \OrchestralScoreContext } -% \translator { \OrchestralPartStaffContext } - \translator { \HaraKiriStaffContext } + \translator { + \HaraKiriStaffContext + %VerticalExtent = #'(0 . 0) + %MinimumVerticalExtent = #'(0 . 0) + %StaffMinimumVerticalExtent = #'(0 . 0) + } + \translator { + \LyricsContext + VerticalExtent = #'(1.2 . 1.2) + MinimumVerticalExtent = #'(0 . 0) + StaffMinimumVerticalExtent = #'(1.2 . 1.2) + } } \midi{ - \tempo 4 = 54; + \tempo 4 = 54 } }