#(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"
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 +
footer = "Mutopia-2001/04/27-xx"
}
-\version "2.1.10"
-
-dynamicUp = \property Voice.DynamicLineSpanner \override #'direction = #1
-dynamicRevert = \property Voice.DynamicLineSpanner \revert #'direction
+\version "2.12.0"
-\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 |
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 |
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 |
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üs -- 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ä -- ters feind -- lich Lau -- schen
- fürch -- te, Hol -- de, nicht,
- fürch -- 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örst 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ö -- ne sü -- "\ss en" Kla -- gen
- fle -- hen sie für 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üh -- ren mit den Sil -- ber -- tö -- 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ö -- re mich!
+ Lieb -- chen, hö -- re mich!
be -- bend harr' ich dir ent -- ge -- gen!
- komm, be -- glük -- ke mich!
- komm, be -- glük -- ke mich, __
- be -- glük -- 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äßig"\pp <g' c>-. <c es>-. <g c>-. <c es>-. <g c>-. |
+trebleIntro = \relative c{
+ r8^"\bf Mäßig"\pp <g' c>-. <c es>-. <g c>-. <c es>-. <g c>-. |
r8 <as c>-. <c es>-. <as c>-. <c es>-. <as c>-. |
r8 <as c>-. <c d>-. <as c>-. <c d>-. <as c>-. |
r8 <g b>-. <b d>-. <g b>-. <b d>-. <g b>-. |
}
-trebleVerseOne = \notes\relative c{
+trebleVerseOne = \relative c{
%5
r8 <g' c> <c es> <g c> <c es> <g c> |
r8 <f c'> <c' d> <f, c'> <c' d> <f, c'> |
r8\pp <es as c> <as c es> <es as c> <as c es> <es as c> |
%20
r8 <es g bes> <g bes es> <es g bes> <g bes es> <es g bes> |
- \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 <f, g> <g b> <f g> <g b> <f g> |
r8 <e g> <g c> <e g> <g c> <e g> |
<a a'>4.-> <f f'>8) |
}
-trebleEentje = \notes \relative c' \context Voice {
- \stemBoth
+trebleEentje = \relative c' \context Voice {
+ \stemNeutral
<e e'>2 r4 |
<f as!>2\(\mf <as c>8.(-> <f as>16)\) |
% urg: slurs with staccati are ugly
<e g>2 r4 |
}
-trebleThrough = \notes \relative c'{
- \stemBoth
+trebleThrough = \relative c'{
+ \stemNeutral
<e e'>2. |
%61
R2. |
<a a'>4.-> <f f'>8)
<e e'>2. |
<es! es'! >2. |
- \property Voice . TextScript \override #'font-shape = #'italic
+ \override TextScript #'font-shape = #'italic
<d d'>2._"decresc."
- \property Voice . TextScript \revert #'font-shape
+ \revert TextScript #'font-shape
%75
<b b'>2. |
<f g>4. <b, g'>8(-. <d g>-. <f g>)-. |
%80
- \property Voice . TextScript \override #'font-shape = #'italic
+ \override TextScript #'font-shape = #'italic
<e g>2._"dim."
- \property Voice . TextScript \revert #'font-shape
+ \revert TextScript #'font-shape
<g, e' g>2. |
<g e' g>2.\fermata |
}
-bassIntro = \notes\relative c{
+bassIntro = \relative c{
\dynamicUp
%1
<c, c'>2 r4 |
<g g'>2 r4 |
}
-bassVerseOne = \notes\relative c{
+bassVerseOne = \relative c{
% \clef bass
\dynamicUp
%5
c,8 <c' e g>[ <e g c> <c e g> <e g c> <c e g>] |
}
-bassEentje = \notes\relative c{
+bassEentje = \relative c{
\dynamicUp
<c, c'>8 <c' f as!>[ <f as c> <c f as> <f as c> <c f as>] |
c,8 <c' e g>[ <e g c> <c e g> <e g c> <c e g>] |
c,8 <e' g>[ <g c> <e g> <g c> <e g>] |
}
-bassThrough = \notes\relative c{
+bassThrough = \relative c{
\dynamicUp
%61
<g, g'>8^"cresc." <g' b d>[ <b d f> <g b d> <as! b d >-> <b d f>] |
<c, g' c>2._\fermata |
}
-global = \notes{
+global = {
\time 3/4
\key es \major
\skip 1 * 3/4 * 4
\bar "|."
}
-allLyrics = {
+allLyrics = {
% maybe should be bigger by default, in grob-description.scm ?
- \lyricsto "leise" \new LyricsVoice {
+ \lyricsto "leise" \new Lyrics {
\lyricVerseOne
\lyricVerseTwo
\lyricThrough
} }
-vocals = \context Voice = leise \notes {
+vocals = \new Voice = "leise" {
\clef treble
% certainly no auto-beaming for vocals
\autoBeamOff
R1 * 3/4 * 6
}
-trebleStaff = \context Staff = treble<<
- \property Staff.midiInstrument = "acoustic grand"
+trebleStaff = \new Staff = "treble"<<
+ \set Staff.midiInstrument = "acoustic grand"
\global
- {\clef treble
- \property Voice.autoBeamSettings \override #'(begin * * * *) = #(ly:make-moment 0 1)
- \trebleIntro
- \trebleVerseOne
- \trebleEentje
- \trebleVerseOne
- \trebleThrough }
+ {
+ \clef treble
+
+ \trebleIntro
+ \trebleVerseOne
+ \trebleEentje
+ \trebleVerseOne
+ \trebleThrough
+ }
>>
-bassStaff = \context Staff = bass<<
- \property Staff.midiInstrument = "acoustic grand"
+bassStaff = \new Staff = "bass"<<
+ \set Staff.midiInstrument = "acoustic grand"
\global
\clef bass
{\bassIntro
\score{
<<
\new Staff <<
- \property Staff.midiInstrument = "synth voice"
+ \set Staff.midiInstrument = "synth voice"
%% insert \transpose if necessary, depending on voice range.
\global
\vocals
\bassStaff
>>
>>
- \paper {
+ \layout {
% Use
% textheight = 280.\mm
- % linewidth = 190.\mm
+ % line-width = 190.\mm
% to get this on 3 pages of a4.
% Mandatory Mutopia settings yield 4 pages :(
textheight = 270.0\mm
- linewidth = 180.0\mm
+ line-width = 180.0\mm
- \translator { \RemoveEmptyStaffContext }
+ \context { \RemoveEmptyStaffContext }
}
- \midi{
- \tempo 4 = 54
+
+ \midi {
+ \context {
+ \Score
+ tempoWholesPerMinute = #(ly:make-moment 54 4)
+ }
}
+
+
}