X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=input%2Fmutopia%2FF.Schubert%2Fstandchen.ly;h=c39c0a4ab8bf7a77208e9be6928875cf2e3cb414;hb=5c14a087ca6cbd665fd631452b7b1283ba0387c3;hp=079577d4b501b654db2c98b4b50719896e0c23d3;hpb=d2e7425b88e579fe53989106965fa13eab551c92;p=lilypond.git diff --git a/input/mutopia/F.Schubert/standchen.ly b/input/mutopia/F.Schubert/standchen.ly index 079577d4b5..c39c0a4ab8 100644 --- a/input/mutopia/F.Schubert/standchen.ly +++ b/input/mutopia/F.Schubert/standchen.ly @@ -1,11 +1,9 @@ #(ly:set-option 'old-relative) -% #(ly:set-point-and-click 'line-column) - instrument = "Piano" \header { - title = "Ständchen" + title = "Ständchen" subtitle = "(Serenade)" subsubtitle = "Leise flehen meine Lieder" opus = "D. 957 No. 4" @@ -32,7 +30,7 @@ instrument = "Piano" maintainer = "Jan Nieuwenhuizen" maintainerEmail = "janneke@gnu.org" lastupdated = "2001/Apr/27" - mutopiapublicdomain = "\\parbox[b]{\\hsize}{\\thefooter\\quad\\small + mutopiapublicdomain = "\\parbox[b]{\\paper-width}{\\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 + @@ -42,14 +40,11 @@ instrument = "Piano" footer = "Mutopia-2001/04/27-xx" } -\version "1.9.8" - -dynamicUp = \property Voice.DynamicLineSpanner \override #'direction = #1 -dynamicRevert = \property Voice.DynamicLineSpanner \revert #'direction +\version "2.11.61" -\include "paper16.ly" +#(set-global-staff-size 16) -vocalVerse = \notes\relative c''{ +vocalVerse = \relative c''{ \dynamicUp \times 2/3 { g8[( as)] g } c4. g8 | \times 2/3 { f8[( g)] f } c'4 f,8 r | @@ -66,31 +61,31 @@ vocalVerse = \notes\relative c''{ g8. b16 es4. d8 | c8. g16 es4. c8 | \grace { - \property Voice.Stem \override #'stroke-style = #"grace" + \override Stem #'stroke-style = #"grace" as'32[( bes ] - \property Voice.Stem \revert #'stroke-style } + \revert Stem #'stroke-style } \times 2/3 { as8[)( g)] as } c4. as8 | g2. | \grace { - \property Voice.Stem \override #'stroke-style = #"grace" + \override Stem #'stroke-style = #"grace" f32[( g ] - \property Voice.Stem \revert #'stroke-style } + \revert Stem #'stroke-style } \times 2/3 { f8[)( e)] f } as4. f8 | es!2. | g8. b16 es4. d8 | c8. g16 e4. c8 | \grace { - \property Voice.Stem \override #'stroke-style = #"grace" + \override Stem #'stroke-style = #"grace" a'32[( b ] - \property Voice.Stem \revert #'stroke-style } + \revert Stem #'stroke-style } \times 2/3 { a!8[)( gis)] a } c4. a8 | g!2. | \times 2/3 { d'8[\f( cis)] d } f4. b,8 | c!2. | } -vocalThrough = \notes\relative c{ +vocalThrough = \relative c{ \dynamicUp g''8. g16 b8. b16 d8. d16 | c4 b r | @@ -101,9 +96,9 @@ vocalThrough = \notes\relative c{ R2. | R2. | \grace { - \property Voice.Stem \override #'stroke-style = #"grace" + \override Stem #'stroke-style = #"grace" a32[( b ] - \property Voice.Stem \revert #'stroke-style } + \revert Stem #'stroke-style } \times 2/3 { a!8[)( gis)] a } c4. a8 | g!2. | \times 2/3 { d'8[\f( cis)] d } f4. b,8 | @@ -115,54 +110,54 @@ vocalThrough = \notes\relative c{ e2 r4 | } -lyricVerseOne = \lyrics{ +lyricVerseOne = \lyricmode { Lei -- se fle -- hen 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 + Flüs -- 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. + des Ver -- rä -- ters feind -- lich Lau -- schen + fürch -- te, Hol -- de, nicht, + fürch -- te, Hol -- de, nicht. } -lyricVerseTwo = \lyrics{ - H\"orst die Nach -- ti -- gal -- len schla -- gen? +lyricVerseTwo = \lyricmode{ + Hörst die Nach -- ti -- gal -- len schla -- gen? ach! sie fle -- hen dich, - mit der T\"o -- ne s\"u -- "\ss en" Kla -- gen - fle -- hen sie f\"ur mich. + mit der Tö -- ne sü -- "\ss en" Kla -- gen + fle -- hen sie für mich. Sie -- ver -- "steh'n" des Bu -- sens Seh -- nen, ken -- nen Lieb -- es -- schmerz, ken -- nen Lieb -- es -- schmerz, - r\"uh -- ren mit den Sil -- ber -- t\"o -- nen + rüh -- ren mit den Sil -- ber -- tö -- nen jed -- es wei -- che Herz, jed -- es wei -- che Herz. } -lyricThrough = \lyrics{ +lyricThrough = \lyricmode{ La\ss auch dir die Brust be -- we -- gen - Lieb -- chen, h\"o -- re mich! + Lieb -- chen, hö -- 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! + komm, be -- glük -- ke mich! + komm, be -- glük -- ke mich, __ + be -- glük -- ke mich! } -trebleIntro = \notes\relative c{ - r8^"\bf M\\\"a\\ss ig"\pp -. -. -. -. -. | +trebleIntro = \relative c{ + r8^"\bf Mäßig"\pp -. -. -. -. -. | r8 -. -. -. -. -. | r8 -. -. -. -. -. | r8 -. -. -. -. -. | } -trebleVerseOne = \notes\relative c{ +trebleVerseOne = \relative c{ %5 r8 | r8 | @@ -193,14 +188,12 @@ trebleVerseOne = \notes\relative c{ r8\pp | %20 r8 | - \property Voice.Slur \override #'attachment = #'(stem . stem) \grace { - \property Voice.Stem \override #'stroke-style = #"grace" + \override Stem #'stroke-style = #"grace" as'32[( bes ] - \property Voice.Stem \revert #'stroke-style } + \revert Stem #'stroke-style } \times 2/3 { as8[)( g as] } c4.-> as8) | - \property Voice.Slur \revert #'attachment g2. | r8 | r8 | @@ -210,8 +203,8 @@ trebleVerseOne = \notes\relative c{ 4.-> 8) | } -trebleEentje = \notes \relative c' \context Voice { - \stemBoth +trebleEentje = \relative c' \context Voice { + \stemNeutral 2 r4 | 2\(\mf 8.(-> 16)\) | % urg: slurs with staccati are ugly @@ -225,8 +218,8 @@ trebleEentje = \notes \relative c' \context Voice { 2 r4 | } -trebleThrough = \notes \relative c'{ - \stemBoth +trebleThrough = \relative c'{ + \stemNeutral 2. | %61 R2. | @@ -256,9 +249,9 @@ trebleThrough = \notes \relative c'{ 4.-> 8) 2. | 2. | - \property Voice . TextScript \override #'font-shape = #'italic + \override TextScript #'font-shape = #'italic 2._"decresc." - \property Voice . TextScript \revert #'font-shape + \revert TextScript #'font-shape %75 2. | @@ -270,15 +263,15 @@ trebleThrough = \notes \relative c'{ 4. 8(-. -. )-. | %80 - \property Voice . TextScript \override #'font-shape = #'italic + \override TextScript #'font-shape = #'italic 2._"dim." - \property Voice . TextScript \revert #'font-shape + \revert TextScript #'font-shape 2. | 2.\fermata | } -bassIntro = \notes\relative c{ +bassIntro = \relative c{ \dynamicUp %1 2 r4 | @@ -287,7 +280,7 @@ bassIntro = \notes\relative c{ 2 r4 | } -bassVerseOne = \notes\relative c{ +bassVerseOne = \relative c{ % \clef bass \dynamicUp %5 @@ -319,7 +312,7 @@ bassVerseOne = \notes\relative c{ c,8 [ ] | } -bassEentje = \notes\relative c{ +bassEentje = \relative c{ \dynamicUp 8 [ ] | c,8 [ ] | @@ -331,7 +324,7 @@ bassEentje = \notes\relative c{ c,8 [ ] | } -bassThrough = \notes\relative c{ +bassThrough = \relative c{ \dynamicUp %61 8^"cresc." [ -> ] | @@ -365,7 +358,7 @@ bassThrough = \notes\relative c{ 2._\fermata | } -global = \notes{ +global = { \time 3/4 \key es \major \skip 1 * 3/4 * 4 @@ -380,24 +373,18 @@ global = \notes{ \bar "|." } -allLyrics = \lyrics { +allLyrics = { % maybe should be bigger by default, in grob-description.scm ? - \property Lyrics . LyricText \override #'font-relative-size = #1 - \property Lyrics . LyricHyphen \override #'maximum-length = #1.5 - \context LyricsVoice = "leise-1" { \lyricVerseOne - \lyricVerseTwo - \lyricThrough + \lyricsto "leise" \new Lyrics { + \lyricVerseOne + \lyricVerseTwo + \lyricThrough } } -lyricStaff = \context Lyrics { - \allLyrics -} - -vocals = \context Voice \notes { +vocals = \new Voice = "leise" { \clef treble % certainly no auto-beaming for vocals - \property Voice.autoBeaming = ##f - \property Staff.automaticMelismata= ##t + \autoBeamOff \dynamicUp % duh 1 != 3/4 @@ -409,82 +396,66 @@ vocals = \context Voice \notes { R1 * 3/4 * 6 } -vocalStaff = \context Staff = vocal<< - \property Staff.midiInstrument = "synth voice" - \context Voice = "leise" << \global - \vocals >> +trebleStaff = \new Staff = "treble"<< + \set Staff.midiInstrument = "acoustic grand" + \global + { + \clef treble + + \trebleIntro + \trebleVerseOne + \trebleEentje + \trebleVerseOne + \trebleThrough + } >> -treble = { - \clef treble - \property Voice.autoBeamSettings \override #'(begin * * * *) = #(ly:make-moment 0 1) - \trebleIntro - \trebleVerseOne - \trebleEentje - \trebleVerseOne - \trebleThrough -} - -trebleStaff = \context Staff = treble<< - \property Staff.midiInstrument = "acoustic grand" +bassStaff = \new Staff = "bass"<< + \set Staff.midiInstrument = "acoustic grand" \global - \treble ->> -bass = { \clef bass - \bassIntro + {\bassIntro \bassVerseOne \bassEentje \bassVerseOne - \bassThrough -} - -bassStaff = \context Staff = bass<< - \property Staff.midiInstrument = "acoustic grand" - \global - \bass ->> - -grandStaff = \context PianoStaff << - - \trebleStaff - \bassStaff + \bassThrough} >> \score{ - << - -%{ - Transpose as you like for your voice - Range untransposed is c' to f'' (for tenors and sopranos) - \transpose c' a gives a' to d'' (for basses, who sing an octave down) - - \addlyrics - \notes \transpose c' a \vocalStaff - \lyricStaff - \notes \transpose c' a \grandStaff -%} - - \addlyrics - \vocalStaff - \lyricStaff - \grandStaff + << + \new Staff << + \set Staff.midiInstrument = "synth voice" + %% insert \transpose if necessary, depending on voice range. + \global + \vocals >> - \paper { - % Use - % textheight = 280.\mm - % linewidth = 190.\mm - % to get this on 3 pages of a4. - - % Mandatory Mutopia settings yield 4 pages :( - textheight = 270.0\mm - linewidth = 180.0\mm + \allLyrics + \context PianoStaff << + \trebleStaff + \bassStaff + >> + >> + \layout { + % Use + % textheight = 280.\mm + % line-width = 190.\mm + % to get this on 3 pages of a4. + + % Mandatory Mutopia settings yield 4 pages :( + textheight = 270.0\mm + line-width = 180.0\mm + + \context { \RemoveEmptyStaffContext } + } + + \midi { + \context { + \Score + tempoWholesPerMinute = #(ly:make-moment 54 4) + } + } + - \translator { \RemoveEmptyStaffContext } - } - \midi{ - \tempo 4 = 54 - } }