\version "2.16.2"
\include "english.ly"
\pointAndClickOff
#(set-global-staff-size 18)
\header {
dedication = "A Madame la Comtesse DELPHINE POTOCKA"
title = "Valse"
subtitle = "`Minute Waltz'"
composer = "Frederic Chopin (1810-1849)"
opus = "Op.64, No.1"
%% instrument = "Pianoforte"
%% piece = "\\textbf{\large Molto Vivace}"
meter = "A fond les manettes !"
%copyright =
tagline =
\markup { \override #'(font-size . -6)
"Domaine Public @ edition: Magnus Lewis-Smith (version 1 sur Mutopia) & Jean-Michel Thiemonge (chiffrage d'accords) CC-by "}
mutopiatitle = "Valse Op. 64, No. 1 ('Minute Waltz')"
mutopiacomposer = "ChopinFF"
mutopiaopus = "O64"
mutopiainstrument = "Piano"
date = "1847"
source = "Edition Peters (http://www.sheetmusicarchive.net/)"
style = "Classical"
enteredby = "Magnus Lewis-Smith"
}
\paper {
#(set-paper-size "a4")
bottom-margin = 2
markup-system-spacing #'basic-distance = #16
system-system-spacing #'basic-distance = #19
}
% Déplacement de la basse vers le bas dans les accords avec /bass
#(define (lower-extension pitch chbass)
"Return markup lowered markup for pitch note name."
(markup #:lower 1.7 #:fontsize 0 #:halign 0.2
(note-name->markup pitch chbass )))
% Exception music is chords with markups
chExceptionMusic = {
<c ef gf bf >1-\markup {m7\super b5} % m7b5
}
% Convert music to list and prepend to existing exceptions
chExceptions = #( append
( sequential-music-to-chord-exceptions chExceptionMusic #t)
ignatzekExceptions)
global = {
\key df \major
\time 3/4
\override Staff.Clef #'break-visibility = #all-invisible
\override Staff.KeySignature #'break-visibility = #all-invisible
}
chordNames = \chordmode {
\global
\set chordNameExceptions = #chExceptions
\set slashChordSeparator = \markup\fontsize#-1 \lower#0.7 \rotate#-15 {"/" }
s2. s s s
df2. s s s
af:7 s s s
df2. s s s
af:7 s s s
f2.:7/a bf:m af:7/c df
gf:6 df:/af af:7 df
f2.:7/a bf:m af:7/c df
gf:6 df:/af af:7 df s
af:7 s df s af:7 s
df s
af:7 s df df:/b f:m/c c
f:1.5 s
af:7 s df s af:7 s
df s
af:7 s f:m7.5-/b
bf:7 ef:7 ef:m7 af:7 s
s s s s s s s s
df2. s s s
af:7 s s s
df2. s s s
af:7 s s s
f2.:7/a bf:m af:7/c df
gf:6 df:/af af:7 df
f2.:7/a bf:m af:7/c df
gf:6 df:/af af:7 df
f2.:7/a bf:m af:7/c df
gf:6 df:/af af:7 df
f2.:7/a bf:m af:7/c df
gf:6 df:/af af:7 df
}
melody = \relative c'' {
\global
af4->_\markup {\dynamic p \italic leggiero}
g8
af c bf
g af bf af c bf
g af c bf g af
c bf g af c bf
\bar"||"
g \< af c bf g af \noBreak
c bf g af c bf
g af c bf g af
bf c df ef f gf? \!
bf4.\> af8[ gf f]
f ef ef\prall d ef4\!
bf'4.\> af8[ gf f]
f ef\prall d ef f bf,\!
g af c bf g af
c bf g af c bf
g\< af c bf g af
bf c df ef f gf? \!
bf4.\> af8[ gf f]
f ef ef\prall d ef4\!
bf'4. af8[ gf f]
ef\< f ef\prall d ef e\!
\bar"|:"
\times 2/3 { f8_\markup { \italic cresc. poco}
[ gf f] } e f af gf
f gf f e f bf |
\times 2/3 { af[ bf af] } g af c bf
af bf af g af df |
c\> bf af gf f ef
df c bf af gf f
ef df c\! ef\< bf' af
g af bf c df ef\!
\times 2/3 { f8[ gf? f] } e f af gf
f gf f e f\< bf |
\times 2/3 { af[ bf af] } g af c bf
af bf\! af g af f'
ef\> df c bf af gf
f ef df c bf af \noBreak
a c bf f gf c,\!
\set Score.repeatCommands = #'((volta "1"))
{ df4 r f' } \bar":|"
\set Score.repeatCommands = #'((volta #f))
\set Score.repeatCommands = #'((volta "2"))
{ df,4 r } % [mils] expect warning
\set Score.repeatCommands = #'((volta #f))
af'4~ |
\bar"||"
af2 _\markup { \italic sustenuto} ef4 |
af2 e4 |
af2\< f4 |
f'2 f4~\! |
f2 bf,4 |
f'2 c4 |
ef2\> df4 |
\times 3/4 { c ef df bf\! } |
af2 ef4\< |
af2 e4 |
af2 f4 | \break
f'2.^" "\! |
c4\mf\trill b c |
af' bf, g' |
a,\> gf'? af, |
f' f, bf\! |
\bar"||"
af2_\markup { \italic dolce} ef4 |
\acciaccatura {
af'8 } af,2 e4 | \break
\acciaccatura {
af'8 } af,2 f4 |
\acciaccatura {af'8} f2 f4 |
\acciaccatura { af8 } f2 bf,4 |
\acciaccatura { af'8 } f2 c4 |
\acciaccatura { af'8 } ef4 df c |
\acciaccatura { af'8 } ef4 df4. bf8 |
\acciaccatura { af'8 } af,2 ef4 |
\acciaccatura { af'8 } af,2 e4\< |
<< { \acciaccatura { af'8 } af,2 f4 }\\{
\once \override MultiMeasureRest #'minimum-length = #15
\once \override MultiMeasureRest #'stencil = ##f
R2.
} >>
f'2.\!
f2\> bf,4 |
ef2 bff4\! |
ef af,\< d |
f ef af |
af,2.\trill~\p |
af2.\trill~ |
af2.\<\trill~ |
af2.\trill |
g8 af c bf g af |
c bf g af c bf |
g af c bf g af | \noBreak
c bf g af c bf |
\bar"||"
g\f af c bf g af |
c bf g af c bf |
g af c bf g af |
bf c df ef f gf? |
bf4.\> af8[ gf f] |
f ef ef\prall d ef4\! |
bf'4.\> af8[ gf f] |
f ef\prall d ef f bf,
g\p af c bf g af |
c bf g af c bf |
g\< af c bf g af |
bf c df ef f gf?\! |
bf4.\> af8[ gf f] |
f ef ef\prall d ef4\! |
bf'4.\> af8[ gf f\!] |
ef\< f ef\prall d ef e\! |
\bar"||"
\times 2/3 { f8_\markup {\italic cresc.}
[ gf f] } e f af gf |
f gf f e f bf |
\times 2/3 { af[ bf af] } g af c bf |
af bf af g af df |
c\> bf af gf f ef |
df c bf af gf f |
ef df c\! ef\< bf' af |
g af bf c df ef\! |
\times 2/3 { f8[ gf f] } e f\< af gf |
f gf f e f bf |
\times 2/3 { af[ bf\! af] } g af c bf |
af bf af g af f' |
ef\> df c bf af gf |
f ef df c bf af |
a c bf f gf c,\! |
df4 r f'~\p |
\times 2/3 { f8[ gf f] } e f af gf |
f gf f e f\< bf |
\times 2/3 { af[ bf af] } g af c bf |
af bf af g af df\! |
c\> bf af gf f ef |
df c bf af gf f |
ef df c\! ef\< bf' af |
g af bf c df ef\! |
\times 2/3 { f8_\markup {\italic cresc.}
[ gf f] } e f af gf |
f gf f e f bf |
\times 2/3 { af[ bf af] } g af c bf |
af[ bf af g af]
\ottava 1
f''\>^>
\tiny
\times 18/24 {
ef8_\markup {\italic rit.} [ df c bf af gf f ef
\ottava 0
df c bf af gf f
ef df c bf\! a! \< c bf f gf c,]
}
\normalsize
df2\f r4
\break
\bar"|."
}
emptyStaff = \relative c' {
\global
s1*92
}
\score {
\new StaffGroup \with {
%{ distance entre les portées %}
\override StaffGrouper #'staff-staff-spacing =
#'((basic-distance . 0 )
(minimum-distance . 10)
(padding . 0)
(stretchability . 0))
}
<<
\set StaffGroup.systemStartDelimiter = #'SystemStartBar
\new ChordNames \with {
chordNoteNamer = #lower-extension
\override ChordName #'font-name = #'"Purisa Bold"
\override ChordName #'font-size = #2
} \chordNames
\new Staff = "upper" \with {
\remove "Slur_engraver"
\override NoteHead #'font-size = #0.5
} \melody
>>
\layout { indent = 0
%ragged-last = ##t
\context {
\Score
\override SystemStartBar #'collapse-height = #1
\remove "Bar_number_engraver"
}
}
\midi {
\tempo 4 = 300
}
}