DebussyPrel1
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
%%-------------------------------------------------------------------- | |
% The Mutopia Project | |
% LilyPond template for keyboard solo piece | |
%%-------------------------------------------------------------------- | |
\version "2.18.2" | |
% #(set-default-paper-size "letter") | |
#(set-global-staff-size 18) | |
\paper { | |
top-margin = 8\mm %-minimum top-margin: 8mm | |
top-markup-spacing.basic-distance = #5 %-dist. from bottom of top margin to the first markup/title | |
markup-system-spacing.basic-distance = #6 %-dist. from header/title to first system | |
top-system-spacing.basic-distance = #12 %-dist. from top margin to system in pages with no titles | |
last-bottom-spacing.basic-distance = #11 %-pads music from copyright block | |
ragged-bottom = ##f | |
ragged-last-bottom = ##f | |
} | |
\header { | |
title = "Prélude I." | |
composer = "Claude Debussy (1862-1918)" | |
opus = "CD 125; L.117" | |
piece = \markup \italic \huge "Danseuses de Delphes" | |
date = "1910" | |
style = "Romantic" | |
source = "Schirmer, n.d.(ca.1990) from Durand, 1910" | |
maintainer = "Javier Ruiz-Alma" | |
maintainerEmail = "javier (at) ruiz-alma.com" | |
license = "Creative Commons Attribution-ShareAlike 4.0" | |
mutopiatitle = "Prélude 1: Danseuses de Delphes" | |
mutopiaopus = "CD 125; L.117" | |
mutopiacomposer = "DebussyC" | |
mutopiainstrument = "Piano" | |
footer = "Mutopia-2001/01/01-0" | |
copyright = \markup { \override #'(baseline-skip . 0 ) \right-column { \sans \bold \with-url #"http://www.MutopiaProject.org" { \abs-fontsize #9 "Mutopia " \concat { \abs-fontsize #12 \with-color #white \char ##x01C0 \abs-fontsize #9 "Project " } } } \override #'(baseline-skip . 0 ) \center-column { \abs-fontsize #12 \with-color #grey \bold { \char ##x01C0 \char ##x01C0 } } \override #'(baseline-skip . 0 ) \column { \abs-fontsize #8 \sans \concat { " Typeset using " \with-url #"http://www.lilypond.org" "LilyPond " \char ##x00A9 " " 2014 " by " \maintainer " " \char ##x2014 " " \footer } \concat { \concat { \abs-fontsize #8 \sans { " " \with-url #"http://creativecommons.org/licenses/by-sa/3.0/" "Creative Commons Attribution ShareAlike 4.0 (Unported) License " \char ##x2014 " free to distribute, modify, and perform" } } \abs-fontsize #13 \with-color #white \char ##x01C0 } } } | |
tagline = ##f | |
} | |
%--------Definitions | |
staffUp = \change Staff = "upper" | |
staffDown = \change Staff = "lower" | |
mBreak = { \break } | |
ten = \tenuto | |
piuPP = \markup { \right-align \concat { \italic \bold "più " \dynamic pp } } | |
piuP = \markup { \left-align \concat { \italic \bold "più " \dynamic p } } | |
breatheFermata = { | |
\once \override BreathingSign.text = \markup { | |
\combine | |
\musicglyph #"scripts.rcomma" | |
\raise #1 | |
\musicglyph #"scripts.ufermata" | |
} | |
\breathe | |
} | |
shiftNoteRight = \override NoteColumn.force-hshift = #1.3 | |
shiftNoteRightTwo = \override NoteColumn.force-hshift = #0.5 | |
shiftNoteLeft = \override NoteColumn.force-hshift = #-1.0 | |
shiftNoteNone = \revert NoteColumn.force-hshift | |
pushDynLeft = \once \override DynamicText.extra-offset = #'( -0.5 . 0 ) | |
moveDynOne = \once \override DynamicText.extra-offset = #'( -2.0 . -2.8 ) | |
moveDynTwo = \once \override Hairpin.extra-offset = #'( 1.6 . -1.5 ) | |
moveDynTre = \once \override Hairpin.extra-offset = #'( 0 . -1 ) | |
moveDynQtr = \once \override Hairpin.extra-offset = #'( 0 . 0.8 ) | |
moveDynCin = \once \override DynamicText.extra-offset = #'( 0 . 0.8 ) | |
moveDynSix = \once \override TextScript.extra-offset = #'( -0.5 . 3 ) | |
moveDynSep = \once \override DynamicText.extra-offset = #'( -2.5 . 2.5 ) | |
moveDynOct = \once \override DynamicText.extra-offset = #'( -3.2 . 3.5 ) | |
moveDynNov = \once \override DynamicText.extra-offset = #'( 0.6 . 1.4 ) | |
moveDynTen = \once \override DynamicText.extra-offset = #'( 0 . -2.4 ) | |
moveDynEle = \once \override DynamicText.extra-offset = #'( -1.5 . -2.5 ) | |
moveDynTwe = \once \override Hairpin.rotation = #'(9 0.5 0) | |
moveDynThi = \once \override TextScript.extra-offset = #'( -0.7 . -4 ) | |
moveDynFou = \once \override DynamicText.extra-offset = #'( -2.5 . -3.8 ) | |
moveDynFif = \once \override DynamicText.extra-offset = #'( -4.8 . -4.7 ) | |
openHairpin = \once \override Hairpin.height = #1 | |
brokenHairpin = { | |
\override Hairpin.to-barline = ##f | |
\override Hairpin.after-line-breaking = ##t | |
} | |
spacerOne = { \hideNotes \shiftOff a,,8 \unHideNotes } | |
timeSigParenth = \once \override Staff.TimeSignature.stencil = #(lambda (grob) (parenthesize-stencil | |
(ly:time-signature::print grob) 0.1 0.4 0.4 0.1 )) | |
timeSigShowBeg = { | |
\once \override Staff.TimeSignature #'break-visibility = #begin-of-line-visible | |
\set Staff.explicitKeySignatureVisibility = #begin-of-line-visible | |
} | |
shapeSlurOne = \shape #'((0 . 0) (0 . 0) (0 . 0) (-0.5 . 0)) Slur | |
shapeSlurTwo = \shape #'((-1.0 . 1.3) (0 . 1.0) (0 . 0.1) (-0.9 . 0.2)) Slur | |
shapeSlurTre = \shape #'((0.8 . -0.3) (2 . -6.0) (-1 . 0.8) (0 . 2.0)) PhrasingSlur | |
shapeSlurQtr = \shape #'((0.6 . 2) (2 . -1.5) (0 . 0) (0 . 0)) Slur | |
shapeSlurCin = \shape #'((-0.5 . 0) (3 . 2) (-2 . 2) (-0.5 . -1.6)) PhrasingSlur | |
shapeSlurSix = \shape #'( | |
((0.4 . -1.6) (3 . 0.4) (0 . 0) (0 . 0)) | |
((0 . -0.4) (0 . -0.2) (0 . -0.4) (-0.5 . -1.2)) | |
) PhrasingSlur | |
shapeSlurSep = \shape #'((0.5 . 2) (1 . 0.5) (0 . 0) (0 . 0)) Slur | |
shapeSlurOct = \shape #'((0 . 0) (1 . -0.8) (-1 . -1) (-0.5 . -1)) Slur | |
shapeSlurNov = \shape #'((0.4 . 2) (1 . 2.2) (0 . 2.2) (-0.7 . 2.7)) Slur | |
shapeSlurEle = \shape #'((0.5 . 1) (0 . 0.3) (0 . 0.3) (-0.5 . 1)) Slur | |
shapeSlurTwe = \shape #'((0 . 0) (0 . 0) (0 . 0) (2 . 0)) Slur | |
shapeSlurThi = \shape #'((0 . 0) (0 . 0) (-0.5 . 0.6) (0 . -0.8)) PhrasingSlur | |
shapeSlurFou = \shape #'((0.5 . -1.8) (1 . -0.5) (-1 . -0.4) (-0.5 . -1.8)) PhrasingSlur | |
shapeSlurFif = \shape #'( | |
((0.7 . -0.9) (3 . 1.2) (-1 . 1.2) (-0.5 . 0)) | |
((0 . 0) (2 . 1.3) (-1 . 1.3) (-0.5 . 0.5)) | |
) PhrasingSlur | |
shapeSlurSixt = \shape #'((0.8 . -1.8) (4 . 2) (-7 . 2) (-0.5 . -2.5)) PhrasingSlur | |
shapeSlurSevt = \shape #'((0 . -0.5) (2 . 2) (-3 . 0.5) (-0.5 . 0)) PhrasingSlur | |
shapeSlurEigt = \shape #'((0.5 . 2.8) (0 . 2) (0 . 1.3) (0 . 1)) Slur | |
alignBeamOne = \once \override Beam.damping = #4 | |
alignBeamTwo = \once \override Beam.positions = #'(-0.2 . 0.2) | |
alignBeamTre = \once \override Beam.positions = #'(0.7 . 1.7) | |
alignBeamQtr = \once \override Beam.positions = #'(-5.5 . -6.6) | |
alignBeamCin = \override Beam.positions = #'(2.2 . 2.6) | |
alignBeamSix = \once \override Beam.positions = #'(5.7 . 8) | |
alignBeamRev = \revert Beam.positions | |
moveNoteOne = \once \override NoteColumn #'force-hshift = #-1.9 | |
moveNoteTwo = \once \override NoteColumn #'force-hshift = #1 | |
moveScriptOne = \once \override TextScript.extra-offset = #'( -2.5 . -3 ) | |
preBrokenBeam = { | |
\override Beam.layer = #0 | |
\override Stem.layer = #3 | |
\override Accidental.layer = #3 | |
\override NoteHead.layer = #15 | |
\override StaffSymbol.layer = #4 | |
\override TextScript.layer = #1 | |
} | |
preBrokenBeamOne = { | |
\once \override TextScript.staff-padding = #0 | |
\once \override TextScript.vertical-skylines = #'() | |
\once \override TextScript.extra-offset = #'( -1 . 3 ) | |
} | |
preBrokenBeamTwo = { | |
\once \override TextScript.staff-padding = #0 | |
\once \override TextScript.vertical-skylines = #'() | |
\once \override TextScript.extra-offset = #'( -1 . 4 ) | |
} | |
preBrokenBeamTre = { | |
\once \override TextScript.staff-padding = #0 | |
\once \override TextScript.vertical-skylines = #'() | |
\once \override TextScript.extra-offset = #'( -0.9 . 4.8 ) | |
} | |
postBrokenBeam = { | |
\revert Beam.layer | |
\revert Stem.layer | |
\revert NoteHead.layer | |
\revert StaffSymbol.layer | |
\revert TextScript.layer | |
} | |
breakBeamOne = \markup { | |
\with-dimensions #'(2 . 7) #'(0 . 0) | |
\with-color #white | |
\filled-box #'(5.2 . 9.2) #'(0.5 . 1.8) #0 | |
} | |
breakBeamTwo = \markup { | |
\with-dimensions #'(2 . 7) #'(0 . 0) | |
\with-color #white | |
\filled-box #'(5.2 . 8.4) #'(0.5 . 1.8) #0 | |
} | |
breakBeamTre = \markup { | |
\with-dimensions #'(2 . 7) #'(0 . 0) | |
\with-color #white | |
\filled-box #'(5.2 . 8.4) #'(0.5 . 1.8) #0 | |
} | |
breakBeamQtr = \markup { | |
\with-dimensions #'(2 . 7) #'(0 . 0) | |
\with-color #white | |
\filled-box #'(5.6 . 8.6) #'(0.5 . 1.2) #0 | |
} | |
breakBeamCin = \markup { | |
\with-dimensions #'(2 . 7) #'(0 . 0) | |
\with-color #white | |
\filled-box #'(5.4 . 8.3) #'(0.5 . 1.2) #0 | |
} | |
breakBeamSix = \markup { | |
\with-dimensions #'(2 . 7) #'(0 . 0) | |
\with-color #white | |
\filled-box #'(5.2 . 8.2) #'(0.5 . 1.2) #0 | |
} | |
breakBeamSep = \markup { | |
\with-dimensions #'(2 . 7) #'(0 . 0) | |
\with-color #white | |
\filled-box #'(5.4 . 8.5) #'(0.5 . 1.2) #0 | |
} | |
legendOne = \markup { \center-align \smaller "doux et soutenu" } | |
legendTwo = \markup { \center-align \italic \smaller "doux mais en dehors" } | |
ignoreClashOnce = \once \override NoteColumn.ignore-collision = ##t | |
global = { | |
\key bes \major | |
\time 3/4 | |
} | |
%------------Music | |
upperOne = \relative c' { | |
<d f>4-.(^\legendOne <ees g>-. <f a>-.) | % 1 | |
<d f>4-.( <ees g>-. <f a>-.) | % 2 | |
\shiftOn | |
d4 d ees | % 3 | |
\timeSigParenth \numericTimeSignature | |
\time 4/4 \shapeSlurTwo | |
e4^( f8^.) <f'bes f'>-.[(<d a'd>-.<a d a'>-.<f a d f>-.<g bes d g>-.] | % 4 | |
\mBreak | |
\timeSigParenth \timeSigShowBeg \time 3/4 | |
<e g c e>-.[<d f a d>-.<d f bes d>-.<c e g c>-.] \stemNeutral <f a c f>4)\ten | % 5 | |
\bar "||" | |
a'8\rest \stemUp <f,bes d f>4-.( \preBrokenBeam <g b ees! g>-.<a cis f a>8-.) | % 6 | |
a'8\rest <f, bes!d f>4-.(<g b ees g>-. \preBrokenBeam <a cis f a>8-.) | % 7 | |
\mBreak | |
a'8\rest <f g g'>4-.<f g g'>-.<f g g'>8-. | % 8 | |
\timeSigParenth \numericTimeSignature | |
\time 4/4 | |
a8\rest <f g g'>4-. \shapeSlurThi <f bes f'>8-.[\(<d a'd>-.<a d a'>-.<f a d f>-. \shiftOff \ignoreClashOnce <g bes d g>-.] | % 9 | |
<e g c e>-.[<d f a d>-.<d f bes d>-.<c e g c>-.] \stemNeutral <f a c f>2\)\ten | % 10 | |
\bar "||" \timeSigParenth \timeSigShowBeg \time 3/4 \stemUp | |
\shapeSlurCin <g'g'>4\ten\( <f f'>8. \moveScriptOne <d d'>16(^\legendTwo <c c'>8.) <bes bes'>16( | %11 | |
<g g'>8.) <f f'>16( \moveNoteOne <d d'>2)\) | %12 | |
\shapeSlurSix <c''c'>4\(<bes bes'>8.<g g'>16(<f f'>8.)<ees ees'>16( | %13 | |
<c c'>8.) <bes bes'>16( \moveNoteOne <g g'>2)\) | %14 | |
a'8\rest <e'c e,>4-. <cis a cis,>-. <dis b dis,>8-. | %15 | |
\timeSigParenth \time 4/4 | |
r8 <e c e, >8-. a,8\rest <g a g'>4.-. a8\rest <c c,>8-. | %16 | |
\bar "||" \timeSigParenth \timeSigShowBeg \time 3/4 | |
a8\rest <g a g'>4-.<a d,c>-. a8\rest | %17 | |
a8\rest \moveDynFif <aes c ees! aes>8\ten^\pp~ <aes c ees aes>2 | %18 | |
a8\rest \moveDynThi <g bes d g>8^\ten^\piuPP~ <g bes d g>2 | %19 | |
a8\rest \moveDynFou <f a c f>8^\ten^\ppp^~ <f a c f>2\breatheFermata | %20 | |
d,4_\( ees c | %21 | |
\mBreak | |
ees2 g4\) | %22 | |
\shapeSlurSevt <d'd,>4\( <f f,> <a!a,!> | %23 | |
<cis cis,>4 <e e,> <gis gis,>\) | %24 | |
b,,8\rest \stemDown <f'd bes!f>8-.[ <g!ees!b g!>8.( <aes e c aes>16] <a f cis a>4) | %25 | |
\mBreak | |
b,8\rest <f'd bes!f>-.[ <g ees!b g>8.( <aes e c aes>16] <a f cis a>4) | %26 | |
g,8\rest <a'g,a>8_\ten_~<a g,a>2 | %27 | |
g,8\rest <a'g,a>8_\ten_~<a g,a>2 | %27 | |
\clef bass <d,,bes f d>2.\ten | %28 | |
<d~bes~f_~d_~>2.\ten | %29 | |
<d bes f d>2^\fermata d,4\rest | %30 | |
\bar "|." | |
} | |
upperTwo = \relative c' { | |
\preBrokenBeam | |
\shiftNoteRight | |
\shapeSlurEle bes4( b8. c16 cis4) | % 1 | |
\shapeSlurOne | |
bes!( b8. c16 cis8. f16 \stemUp | % 2 | |
\shiftNoteNone | |
g8.)^\ten^( a16^.) g8.^\ten^( a16^.) g8.^\ten^( a16^.) | % 3 | |
g8.^\ten a16 s2. | % 4 | |
s2. | % 5 | |
bes,4 \alignBeamTwo \preBrokenBeamOne | |
b8.-\breakBeamOne c16 cis4 | % 6 | |
bes!4 \alignBeamTwo \preBrokenBeamOne | |
b8.-\breakBeamTwo c16 \alignBeamTre | |
\preBrokenBeamTwo cis8.-\breakBeamTre f16 | % 7 | |
\alignBeamCin \preBrokenBeamTre <d g>8.-\breakBeamQtr | |
a'16 \preBrokenBeamTre <d, g>8.-\breakBeamCin | |
a'16 \preBrokenBeamTre <ees g>8.-\breakBeamSix a16 | % 8 | |
\preBrokenBeamTre <e g>8.-\breakBeamSep bes'16 \alignBeamRev f8 s2 \tag #'played {s8} \tag #'printed { \spacerOne } | % 9 | |
s1 \time 3/4 \stemDown | %10 | |
g''8\rest <c g ees c>4_. <d a f d>_.<ees^~ bes^~ g~ees~>8_. | %11 | |
<ees bes g ees>_.[<f c a f>_.<g d bes g>_.<a e c a>_.<bes f d bes>_.<c g ees c>_.] | %12 | |
g,8\rest <aes f c aes>4_.<bes f d bes>_.<c g ees c>8_.~ | %13 | |
<c g ees c>8[ <des aes f des>_. \moveDynTwe <ees bes g>_.^\< <f c aes>_.<g d b g>_.<bes f des bes>_.]\! | %14 | |
\shapeSlurQtr <g,g,>4( <e e,>8. <f f,>16 <fis fis,>8. <b b,>16) | %15 | |
<g g,>8.( <c c,>16) \shapeSlurSep <c d c,d>4.( <e e,>8[ <g, a,g>8. <c c,>16]) | %16 | |
\mBreak | |
<c d c,d>8.( <e e,>16 <g, a,g>4) <c c,>\ten~\( | %17 | |
<c c,>4. <d d,>4 <f f,>8\) | %18 | |
<c c,>4.\( <d d,>4 <f f,>8\) | %19 | |
<c c,>2._\ten | %20 | |
s2. s2. | %21-22 | |
r8 <bes f>4_. <des aes>_. <f c>8_. | %23 | |
r8 <a e>4_. <c g>_. <e b>8_. | %24 | |
s2 \stemUp g8\rest \moveDynEle <f cis a f>8^.^\pp^\laissezVibrer | %25 | |
\mBreak | |
s2 g8\rest \moveDynEle <f cis a f>8^.^\pp | %26 | |
a,4\rest e'\rest \stemDown <f f,>^.^\ppp | %27 | |
a,4\rest e'\rest \stemUp <f f,>^. | %28 | |
} | |
upperTre = \relative c { | |
\staffDown | |
\crossStaff { | |
f4 g a | % 1 | |
f4 g a | % 2 | |
\shiftNoteRightTwo | |
<f g> <f g> <f g> | % 3 | |
<f g> \shiftNoteNone <f bes>8 } | |
\staffUp \stemDown \alignBeamOne \shapeSlurTwe | |
<d''bes f d>_.[_(<a f d a>_. \staffDown | |
<f,a d f>_.<d a' d>_.<g bes d>_.]) | % 4 | |
s2. \stemUp | % 5 | |
bes,4 \crossStaff { | |
\autoBeamOff b8. c16 cis4 } | % 6 | |
bes!4 \crossStaff { b8. c16 cis8.f16 | % 7 | |
<f g>8._( a16)<f g>8._( a16)<f g>8._( a16) | % 8 | |
<f g>8._( bes16) <bes f>8 } \staffUp \alignBeamQtr | |
\shapeSlurTre \stemDown <d' bes f d>_.[_\( | |
<a f d a>_. \staffDown \stemUp | |
<f,a d f>-. <d f a d>-. <g bes d>-.] | % 9 | |
\stemNeutral <c,g'c>_.[<d a'>_.<bes f'bes>_.<c g'>_.]<f,c'a'>2_\ten\) \stemUp | %10 | |
r8 <g' ees c>4-.<a f d>-.<bes g ees>8-.~ | %11 | |
<bes g ees>8-.[<c a f>-.<d bes g>-.<e c a>-.<f d bes>-.<g ees c>-.] | %12 | |
r8 <ees,c aes>4-.<f d bes>-.<g ees c>8-.~ | %13 | |
\alignBeamSix <g ees c>8[ <aes f des>-. <ees'bes g ees>-._\< <f c aes f>-. <d!b g>-. <f des bes>-.]\! | %14 | |
\autoBeamOn | |
g,,4\( e8. f16 fis8. bes16\) | %15 | |
g8.( c16) <c d>4.( e8[ g,8. c16]) | %16 | |
<c d>8.( e16 <g, a>4) \shapeSlurFou c4^\ten\(~ | %17 | |
c4. d4 f8\) | %18 | |
c4.( d4 f8) | %19 | |
c2.^\ten | %20 | |
\shapeSlurFif d4\( f c | %21 | |
\mBreak | |
ees2 g!4\) | %22 | |
\shapeSlurSixt d4\( f a | %23 | |
\clef treble | |
cis4 e gis\) | %24 | |
\clef bass | |
f,8\rest <d'bes f>8^.[ \shapeSlurOct | |
<ees!b g!>8.( <e c aes>16]<f cis a>4) | %25 | |
\mBreak | |
f,8\rest <d'bes!f>8^.[ \shapeSlurOct | |
<ees!b g!>8.( <e c aes>16]<f cis a>4) | %26 | |
c8\rest <f cis g>8^\ten~<f cis g>2 | %27 | |
c8\rest <f cis g>8^\ten~<f cis g>2 | %28 | |
<bes,,f bes,>2. | %29 | |
<bes f bes,>2.~ | %30 | |
<bes f bes,>2\fermata f'4\rest | %31 | |
} | |
upperQtr = \relative c''' { | |
s2. s2. s2. | % 1-3 | |
f4\rest f8\rest s8 s2 | % 4 | |
s2. \staffDown \stemUp | % 5 | |
s8 <f,,,bes d>4^.<g b ees>^.<a cis f>8^. | % 6 | |
s8 <f bes!d>4^.<g b ees>^.<a cis f>8^. | % 7 | |
s2. | % 8 | |
\time 4/4 s1 s1 | %9-10 | |
\time 3/4 \repeat unfold 5 { s2. |} %11-15 | |
s4. \staffUp \stemDown \moveNoteTwo <a'g>4 s4 <d,c>8 | %16 | |
s8 \moveNoteTwo <g a>4 \moveNoteTwo <c,d> s8| %17 | |
} | |
upperStaff = <<{ \upperOne }\\{ \upperTwo }\\{ \upperTre }\\{ \upperQtr }>> | |
lowerStaff = \relative c { | |
\stemDown | |
<bes bes,>4_._( <a a,>_. <f f,>_.) | % 1 | |
<bes bes,>4_._( <a a,>_. <f f,>_.) | % 2 | |
<bes bes,>4_._( <b b,>_. <c c,>_.) | % 3 | |
\timeSigParenth \numericTimeSignature | |
<cis cis,>4_._( <d d,>2_.) s4 | % 4 | |
\timeSigParenth \timeSigShowBeg | |
<c g'c>8_.[_( <d a>_.<bes f'bes>_. | |
<c g'>_.] \stemNeutral <f,c'a'>4)_\ten | % 5 | |
\stemDown bes,_._( <a a'>_. <f' f,>_.) | % 6 | |
bes,_._( <a a'>_. <f' f,>_.) | % 7 | |
<bes! bes,!>_._(<b b,>_.<c c,>_.) | % 8 | |
\timeSigParenth | |
<cis cis,>4_._( <d d,>2_.) s4 | % 9 | |
s1 | %10 | |
\mBreak | |
\timeSigShowBeg \timeSigParenth \time 3/4 | |
<f,f,>2._~ | %11 | |
<f f,>2. | %12 | |
<f f,>2._~ | %13 | |
\mBreak | |
<f f,>2. | %14 | |
c8\rest <c c'>4_.<a a'>_.<bes bes'>8_. | %15 | |
\timeSigParenth \time 4/4 | |
c8\rest c8 f2 <e a>4 | %16 | |
\mBreak | |
\timeSigParenth \timeSigShowBeg \time 3/4 | |
f4 e s | %17 | |
r8 \moveDynSep <aes ees! aes,>8_\ten_\pp_~ | |
<aes ees aes,>2 | %18 | |
r8 \moveDynSix <g d g,>8_\ten_\piuPP_~ <g d g,>2 | %19 | |
r8 \moveDynOct <f c f,>8_\ten_\ppp_~ <f c f,>2 | %20 | |
r8 <bes'f bes,>4_.<des aes des,>_.<aes ees aes,>8_.| %21 | |
r8 <ces ges ces,>4._. s8 <ees bes ees,>8_. | %22 | |
r8 <bes f bes,>4_. <des aes des,>_. <f c f,>8_. | %23 | |
\clef treble | |
f,8\rest <a'e a,>4_. <c!g c,>_. <e b e,>8_. | %24 | |
\clef bass | |
<bes,,,!bes,!>4 s e8\rest \moveDynOct | |
\brokenHairpin \shapeSlurEigt <f f,>8_._\pp_(\> | %25 | |
\mBreak | |
<bes!bes,!>4)_\! s e,8\rest \moveDynOct | |
\shapeSlurNov <f f,>8_._\pp_( | %26 | |
<bes!bes,!>2) \moveDynOct \shapeSlurNov | |
<f f,>4_._(_\ppp_\> | %27 | |
<bes bes,>2)\! <f f,>4_. | %28 | |
s2. s2. | %29-30 | |
bes,,4_\ten_. g4\rest g4\rest | %31 | |
} | |
dynamics = { | |
\pushDynLeft s2.\p | % 1 | |
s2. | % 2 | |
\pushDynLeft s4\p\< s4\p\< s4\p\< | % 3 | |
s8. s16\! s8 s2\pp s8 | % 4 | |
s8 s4.\> s4\! | % 5 | |
s2.\p | % 6 | |
s2. | % 7 | |
s2. \moveDynTwo | % 8 | |
s8...\< s8\! s64 \moveDynOne s4.\mf s4 | % 9 | |
\moveDynTre \openHairpin s2\> s2\! | %10 | |
\moveDynTen s2._\pp | %11 | |
\repeat unfold 3 { s2. } | %12-14 | |
s2.\mf | %15 | |
\moveDynQtr s8.\< s16\! \moveDynCin s2.\f | %16 | |
s4 s4\> s4\! | %17 | |
s4. s4.^\markup{ \italic \bold "dim."} | %18 | |
s2. | %19 | |
\moveDynNov s2.\pp | %20 | |
\moveDynNov s2.\p | %21 | |
s2. | %22 | |
s4-\piuP s2-\markup{ \italic \bold "dim."} | %23 | |
s2\< s8.\p\> s16 | %24 | |
s8\! s8\p\< s4 s4\p | %25 | |
s8 s8\p\< s4 s4\p | %26 | |
s2.\pp | %27 | |
s2.\pp | %28 | |
s2.\f\> | %29 | |
s2.\pp | %30 | |
} | |
%-------Typeset music | |
\score { | |
\removeWithTag #'played | |
\context PianoStaff << | |
\set PianoStaff.midiInstrument = "acoustic grand" | |
\new Staff = "upper" { \clef treble \global \upperStaff } | |
\new Dynamics = "dyns" { \dynamics } | |
\new Staff = "lower" { \clef bass \global \lowerStaff } | |
>> | |
\layout{ | |
\context { | |
\PianoStaff | |
\consists #Span_stem_engraver | |
} | |
} | |
} | |
%-------generate midi | |
\score { | |
\removeWithTag #'printed | |
\context PianoStaff << | |
\set PianoStaff.midiInstrument = "acoustic grand" | |
\new Staff = "upper" { \clef treble \global \upperStaff } | |
\new Dynamics = "dyns" { \dynamics } | |
\new Staff = "lower" { \clef bass \global \lowerStaff } | |
>> | |
\midi { \tempo 4 = 70 } | |
} |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment