\version "2.18.2"
\header {
mutopiatitle = "Six Petites Pièces, No. 4"
mutopiacomposer = "AguadoD"
source = "Mainz: B. Schott"
% source = "Statens musikbibliotek - The Music Library of Sweden"
% http://urn.kb.se/resolve?urn=urn:nbn:se:statensmusikverk-4033
date = "1830"
title = "Six Petites Pièces, No. 4"
composer = "Dionisio Aguado"
instrument = "Guitar"
opus = "Op. 4, No. 4"
style = "Classical"
license = "Creative Commons Attribution-ShareAlike 4.0"
maintainer = "Glen Larsen"
maintainerEmail = "glenl.glx at gmail.com"
footer = "Mutopia-2015/11/11-1788"
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 #11.9 \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 " " 2015 " by " \maintainer " " \char ##x2014 " " \footer } \concat { \concat { \abs-fontsize #8 \sans{ " " \with-url #"http://creativecommons.org/licenses/by-sa/4.0/" "Creative Commons Attribution ShareAlike 4.0 International License " \char ##x2014 " free to distribute, modify, and perform" } } \abs-fontsize #13 \with-color #white \char ##x01C0 } } }
tagline = ##f
}
\layout {
indent = 72\pt
short-indent = 0\mm
}
%%%
%%% First part: MINUET
%%%
mUpperVoice = \relative c' {
\voiceOne
\repeat volta 2 {
4 4 4 |
4. 8 4 |
2 4 |
8. a'16 4 b4\rest |
d2 d4 |
cis4.. d16 e8[ a] |
gis2 a4 |
4 r4 r4 |
}
\repeat volta 2 {
s2. |
\slashedGrace { d8} 8.[ b16] 4 r4 |
s2.
fis'8.[ e16] e4 r4 |
a,,16[ cis e a] 4 |
fis,16[ a cis fis] 4 |
8 a'4 a gis8 |
2 4
}
}
mLowerVoice = \relative c {
\voiceTwo
\repeat volta 2 {
a8 a a[ a] a a |
a a a a a4 |
e8[ fis] gis[ fis] gis[ e] |
a4 a4 b4\rest |
<< { \shiftOn fis'4 f e } \\ { a,2 gis4 } >> |
<< { \shiftOn e'4. f8\rest s4 } \\ { a,2 r4 } >> |
<< { \shiftOn b'8 cis d[ b] cis a } \\ { e2 e4 } >> |
e4 e,4 r4 |
}
\repeat volta 2 {
e'8. gis16 b8[ b] b b |
dis,4 e r |
a8.[ cis16] e8 e e[ e] |
4 r4 |
r8 e,2~ e8 |
r8 cis2~ cis8 |
<< { \voiceTwo cis4 d8[ dis8] e4 } \\
{ \voiceThree s4 \once\override Beam.positions=#'(2 . 2) b'8[ bis]
\once\override Beam.positions=#'(-1 . -.75) cis8_[ d] } >> |
a4 e\noBeam a,
}
}
%%%
%%% Second part: ALLEGRO
%%%
aUpperVoice = \relative c' {
\voiceOne
\repeat volta 2 {
\partial 8 { e8 }
e16([ fis) e dis] e16 r cis r |
d16([ e) d cis] d r b r |
cis16 r a r b r a r |
gis16[ fisis gis a] gis r e'8 |
e16_([ fis e) dis] e8[ cis] |
d16_([ e) d cis] d8[ b] |
cis8[ 8] 8[ gis] |
4 r8
}
\repeat volta 2 {
e'8 |
\slashedGrace{e8} d16[ cis d e] d8 gis |
\slashedGrace{b8} a16[ gis a b] a8 cis~ |
cis8 b4\noBeam a8 |
\slashedGrace{a8} gis16([ fis) gis a] gis8[ e] |
fis16( e) gis([ e]) a16([ e) b'( e,)] |
cis'8. b16 a16[ gis fis e] |
r8 b'8 a[ gis] |
\set Timing.measureLength = #(ly:make-moment 3/8) 4 r8
}
\set Timing.measureLength = #(ly:make-moment 2/4)
e8_.[ fis16_. gis_.] a_.[ b_. cis_. d_.] |
e8_.[ e16_. cis_.] a8_.[ a16_. cis_.] |
b8_.[ b16_. d_.] gis,8_.[ gis16_. b_.] |
a8_.[ cis16_. b_.] a16_.[ gis_. a_. fis_.] |
e8[ fis16 gis] a[ b cis d] |
e8[ e16 b] gis8[ gis16 b] |
a8[ a16 fis] dis8[ dis16 fis] |
4 r8
% There source has an ending repeat without a matching beginning
% mark. A double bar (no repeat marks) is at this location and my
% assumption is that this is the start of the final repeat. -gl
\repeat volta 2 {
e8 |
fis4 gis |
a16_([ b) cis d] e8 cis |
4 |
4. e8 |
fis a gis[ b] |
a16_([ b) cis d] e8[ cis] |
b8[ b] a16_([ gis) fis gis] |
4 r8
}
}
aLowerVoice = \relative c' {
\voiceTwo
\repeat volta 2 {
\partial 8 { r8 }
cis4 r16 r a r |
b4 r16 r gis r |
a16 r fis r d r dis r |
e4 r |
cis4. fis,8 |
b4. e,8 |
a8[ cis] d[ e] |
a,4 r8
}
\repeat volta 2 {
r8 |
2 |
2 |
4 |
e4 r4 |
dis8[ d] cis[ 8] |
8. r16 r4 |
4 8[ 8] |
\set Timing.measureLength = #(ly:make-moment 3/8) a,4 r8 |
}
\set Timing.measureLength = #(ly:make-moment 2/4)
a2 |
a2 |
e2 |
a2 |
a2 |
e2 |
<< { \shiftOn s4 a'4 } \\ { b,2 } >> |
e4 r8
\repeat volta 2 {
r8 |
<< { \voiceTwo e4 e4 } \\
{ \voiceThree \stemDown dis'8[ e] d[ e] } >> |
<< { \voiceTwo a,,4 a\rest } \\
{ \voiceThree \stemDown cis'4 c\rest } >> |
\stemUp b8\rest \slashedGrace{dis8} e4 \slashedGrace{dis8} e8 |
<< { b8\rest \slashedGrace{dis8} \stemDown e4 b8\rest } \\
{ c,4\rest e4 } >> |
\stemDown 4 |
<< { \voiceTwo a,4. fis'8 } \\
{ \voiceThree\stemDown cis'4 b4\rest } >>
4 |
a,4 r8
}
}
%%%
%%% SYSTEMS
%%%
\score { % Minuet
<<
\new Staff = "guitar"
<<
\set Staff.instrumentName = #"MINUET."
\key a \major
\time 3/4
\clef "treble_8"
\mergeDifferentlyHeadedOn
\context Voice = "mUpperVoice" \mUpperVoice
\context Voice = "mLowerVoice" \mLowerVoice
>>
>>
\layout {}
}
\score { % Allegro
<<
\new Staff = "guitar"
<<
\set Staff.instrumentName = #"ALLEGRO."
\key a \major
\time 2/4
\clef "treble_8"
\mergeDifferentlyHeadedOn
\context Voice = "aUpperVoice" \aUpperVoice
\context Voice = "aLowerVoice" \aLowerVoice
>>
>>
\layout {}
}
%%%
%%% MIDI
%%%
\score { % Minuet
\new Staff="Guitar"
<<
\set Staff.midiInstrument = #"acoustic guitar (nylon)"
\key a \major
\time 3/4
\mUpperVoice
\mLowerVoice
>>
\midi {
\tempo 4 = 100
}
}
\score { % Allegro
\new Staff="Guitar"
<<
\set Staff.midiInstrument = #"acoustic guitar (nylon)"
\key a \major
\time 2/4
\aUpperVoice
\aLowerVoice
>>
\midi {
\tempo 4 = 100
}
}