% Updated to Lilypond 2.2.5 by Ruud van Silfhout % convert-ly -> Lilypond 2.4.2 by Chris Sawer % convert-ly -> Lilypond 2.10.33 by Chris Sawer (plus minor fixes) \version "2.10.33" \header { title = "PEACHERINE RAG." composer = "by SCOTT JOPLIN." mutopiatitle = "Peacherine Rag" mutopiacomposer = "JoplinS" mutopiainstrument = "Piano" mutopiasource = "Reproduction of original edition (1901)" date = "c. 1901" style = "Jazz" copyright = "Public Domain" filename = "peacherine.ly" maintainer = "Antonio Palamà" maintainerEmail = "palama@inwind.it" maintainerWeb = "" footer = "Mutopia-2007/10/29-335" tagline = \markup { \override #'(box-padding . 1.0) \override #'(baseline-skip . 2.7) \box \center-align { \small \line { Sheet music from \with-url #"http://www.MutopiaProject.org" \line { \teeny www. \hspace #-1.0 MutopiaProject \hspace #-1.0 \teeny .org \hspace #0.5 } • \hspace #0.5 \italic Free to download, with the \italic freedom to distribute, modify and perform. } \line { \small \line { Typeset using \with-url #"http://www.LilyPond.org" \line { \teeny www. \hspace #-1.0 LilyPond \hspace #-1.0 \teeny .org } by \maintainer \hspace #-1.0 . \hspace #0.5 Reference: \footer } } \line { \teeny \line { This sheet music has been placed in the public domain by the typesetter, for details see: \hspace #-0.5 \with-url #"http://creativecommons.org/licenses/publicdomain" http://creativecommons.org/licenses/publicdomain } } } } } top = \relative c'' { \override TextScript #'padding = #2 \key ees \major \time 2/4 \clef treble % 1 \once \override TextScript #'extra-offset = #'(-3 . 2) ees16[^\markup { \bold "Not too fast." } f g f]~ f8[ bes,] | % 2 f'16[ g aes g]~ g8[ bes,] | % 3 c16[ c8 b16] c16[ d ees8] | % 4 bes!8 bes~ bes16[ g aes a] | \break \repeat "volta" 2 { % 5 \stemDown bes8[ ][] | % 6 16[816]~16[ c bes g] | % 7 8[][] | % 8 \stemNeutral 16[816]~16[ bes f g] | % 9 \stemDown aes8[ ][ ] | % 10 aes16[ 8 16]~16[ bes d f ] | % 11 8 4 8 | % 12 %{ \context Voice << { % Problem: Top slur should be up, 2 bottom slurs should be down \stemDown 4~16[ g aes a] | } \\ { \stemUp r8 ees'16[ f] g r r8 } >> %} << % Provisional solution {\stemDown \tieDown 4~16[ g aes a] } \\ {\stemDown \tieUp bes'4 ~ bes4*1/4 s8.} \\ {\stemUp r8 ees,16[ f] \override NoteColumn #'force-hshift = #0.5 g16 r r8} >> | % 13 \stemDown bes,8[ ][] | % 14 16[816]~16[ c bes g] | % 15 848 | % 16 \context Voice << { \stemDown 4. c8 | } \\ { \stemUp r8 c'16[ d] ees r r8 } >> % 17 8[ ][] | % 18 16[816]8[8] | % 19 16[816] \context Voice << {\stemDown aes8} \\ {\stemUp f'16[( ees)]} >> 8 } \alternative { % 20 {4~ 16[ g aes a] } % 21 {4~ 8 r8 } } \key bes \major \repeat "volta" 2 { % 22 r8 [] | % 23 r8 [] | % 24 r8 [] | % 25 16[ f e f]~ f[ g f8] | % 26 r8 [] | % 27 \context Voice << { % FIXME slurDown \stemUp d'16[ c b c]~ c[ \slurDown f( f,8)] \slurNeutral | } \\ { \stemDown 4. r8 | } >> % 28 r8 < d[ bes' d>[] | % 29 \context Voice << { % FIXME slurDown \stemUp c'16[ bes a bes]~ bes[ \slurDown f'( f,8)] \slurNeutral | } \\ { \stemDown 4. r8 | } >> % 30 r8 [] | % 31 r8 [] | % 32 r [] | % 33 16[ f e f]~ f[ d ees f] | % 34 []~[8 16] | % 35 16[]~[8 bes16] | % 36 16[ 8 16] \context Voice << { \stemUp c'16[( bes)]] } \\ { \stemDown 8 } >> 8 | } \alternative { { % 37 \stemUp 4~ 8 r8 | } { % 38 44 \stemNeutral| } } \key ees \major % 39 \stemDown bes'8[ ][] | % 40 16[8 16]~ 16[ c bes g] | % 41 8[ ] [ ] | % 42 \stemNeutral 16[8 16]~ 16[ bes f g] | % 43 \stemDown aes8[ ][ ] | % 44 aes16[ 8 16]~ 16[ bes d f ] | % 45 8 4 8 | % 46 %{ \context Voice << { % Problem: Top slur should be up, 2 bottom slurs should be down \stemDown 4~16[ g aes a] | } \\ { \stemUp r8 ees'16[ f] g r r8 } >> %} << % Provisional solution {\stemDown \tieDown 4~16[ g aes a] } \\ {\stemDown \tieUp bes'4 ~ bes4*1/4 s8.} \\ {\stemUp r8 ees,16[ f] \override NoteColumn #'force-hshift = #0.5 g16 r r8} >> | % 47 \stemDown bes,8[ ][] | % 48 16[816]~16[ c bes g] | % 49 848 | % 50 \context Voice << { \stemDown 4. c8 | } \\ { \stemUp r8 c'16[ d] ees r r8 } >> % 51 8[ ][] | % 52 16[816]8[8] | % 53 16[816] \context Voice << {\stemDown aes8} \\ {\stemUp f'16[( ees)]} >> 8 | % 54 48 r | \break \key aes \major \repeat "volta" 2 { % 55 16[ c' aes] c[ 8 aes16] | % 56 16[ a ]~[8 a16] | % 57 8[16]~[ bes' aes f] | % 58 8[16]~[ bes' aes f] | % 59 \context Voice << {\stemDown ees8.[ f32( g)]} \\ {\stemUp des'4} >> bes16[ 8 g16] | % 60 \context Voice << {\stemDown ees8.[ f32( g)]} \\ {\stemUp des'4} >> bes16[ 8 f16] | % 61 8[16]~[816] | % 62 8[16]~8.[ aes32( c)] | % 63 16[ c' aes] c[ 8 aes16] | % 64 16[ a ]~[8 a16] | % 65 8[16]~[ bes' aes f] | % 66 8[16]~[ bes' aes f] | % 67 \context Voice << {\stemDown ees8.[ f32( g)]} \\ {\stemUp des'4} >> bes16[ 8 g16] | % 68 ees16[ g f g] des'[ 816~ ]| } \alternative { { % 69 2~ | % 70 \set autoBeaming = ##f 8 \grace { \once \override Stem #'stroke-style = #"grace" f'8( } ees8) \grace { \once \override Stem #'stroke-style = #"grace" f,8( } ees8)[ aes16 c] | \set autoBeaming = ##t } { % 71 2~ | % Problem: Chord shoud have 2 short left ties % 72 8 r \stemDown 8[ ees] \stemNeutral | } } \break \repeat "volta" 2 { % 73 \stemDown g16[ bes8 c16] des8[ g16 f] \stemNeutral | % 74 84ees,8 | % 75 aes16[ c8 des16] ees8[ aes16 f] | % 76 848 | % 77 16[816]~16[ aes' bes aes] | % 78 8[]~16[] | % 79 16[ g' c bes] aes[ d,8 bes'16] | % 80 ees,8 r 8[ ees,] | % 81 g16[ bes8 c16] des8[ g16 f] | % 82 84ees,8 | % 83 aes16[ c8 des16] ees8[ aes16 f] | % 84 848 | % 85 %16[816]~ % Problem: no tie is produced %\context Voice %<< % {\stemDown b4} % \\ % {\stemUp f'16[ aes( g f)]} %>> << {\stemDown \tieDown 16 8 b16 ~ b4 } \\ {\stemDown \tieUp s8. f'4*1/4 ~ \stemUp f16 aes( g f)} >> | % 86 8[]~16[ ees c bes] | % 87 8[]16[8 ees16] | } \alternative { { % 88 \stemDown 8[ ees'16 ees] ees8[ ees,] \stemNeutral | } { % 89 48 r^\fermata | } } } bottom = \relative c { \key ees \major \time 2/4 \clef bass % 1 ees16[ f g f]~ f8[ bes,] | % 2 f'16[ g aes g]~ g8[ bes,] | % 3 c16[ c8 b16] c16[ d ees8] | % 4 bes!8 bes4 r8 | \repeat "volta" 2 { % 5 ees8[ ] bes,[ ] | ees8[ ] bes,[ ] | ees8[ ] bes,[ ] | % 8 f8[ ] bes,[ ] % 9 f8[ ] bes,[ ] | % 10 f8[ ] bes,[ ] | % 11 f8[ ] fis[ ] | % 12 \context Voice <<{\stemDown g8[ ] 8 r} \\ {\stemUp g4 s4}>> | % 13 ees8[ ] bes,[ ] | ees8[ ] bes,[ ] | % 15 b,8[ ] g,[ ] | % 16 c,8[ ] r | % 17 4 | % 18 8[] c,[ ] | % 19 8[][] | } \alternative { % 20 {8[] r } % 21 {8[][ f] } } \key bes \major \repeat "volta" 2 { % 22 c'8[ ] f,[ ] | % 23 c8[ ] f,[ ] | % 24 bes,[ ] f,[ ] | % 25 bes,[ ] f,[ ] | % 26 c[ ] f,[ ] | % 27 c8[ ] f,[ ] | % 28 bes,[ ] f,[ ] | % 29 bes,[ ] f,[ ] | % 30 c8[ ] f,[ ] | % 31 c8[ ] f,[ ] | % 32 bes,[ ] f,[ ] | % 33 bes,[ ] d[ ] | % 34 [][] | % 35 8[][] | % 36 [][] | } \alternative { { % 37 8[][ f,] | } { % 38 8[]4 | } } \key ees \major % 39 ees'8[ ] bes,[ ] | ees8[ ] bes,[ ] | ees8[ ] bes,[ ] | % 42 f8[ ] bes,[ ] % 43 f8[ ] bes,[ ] | % 44 f8[ ] bes,[ ] | % 45 f8[ ] fis[ ] | % 46 \context Voice <<{\stemDown g8[ ] 8 r} \\ {\stemUp g4 s4}>> | % 47 ees8[ ] bes,[ ] | ees8[ ] bes,[ ] | % 49 b,8[ ] g,[ ] | % 50 c,8[ ] r | % 51 4 | % 52 8[] c,[ ] | % 53 8[][] | % 54 8[] r | \key aes \major \repeat "volta" 2 { % 55 8[][] % 56 [][] | % 57 [][] | % 58 [][] | % 59 [][] | % 60 [][] | % 61 [][] | % 62 [][] | % 63 [][] | % 64 [][] | % 65 [][] | % 66 [][] | % 67 [][] | % 68 [][] | } \alternative { { % 69 8[16]~[] | % 70 8 r r4 | } { % 71 8[]16[816] | % 72 8 r r | } } \repeat "volta" 2 { % 73 8[][] | % 74 8[][] | % 75 8[][] | % 76 \stemDown aes,[ ] c,[ ] \stemNeutral| % 77 des,[ ] des,[ ] | % 78 aes,[ ] a,[ ] | % 79 bes,[ ] bes,[ ] | % 80 8[16]8 r | % 81 8[][] | % 82 8[][] | % 83 8[][] | % 84 \stemDown aes,[ ] c,[ ] | % 85 des,[ ] d,[ ] \stemNeutral| % 86 ees,[ ] \stemUp [] | % 87 [][] | } \alternative { { % 88 \stemDown r r4 | } { % 89 \stemUp 8[] r } } } \score { \context PianoStaff << \context Staff = "up" \top \context Staff = "down" \bottom >> \midi { \context { \Score tempoWholesPerMinute = #(ly:make-moment 80 4) } } \layout { textheight = 240.\mm } }