Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- \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
- }
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement