tmont/music
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

phlegathon update

Browse Source
This commit is contained in:
tmont 2021-06-22 00:30:42 -07:00
parent 2a5f618e68
commit 3e6557188c
2 changed files with 14 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
album3/phlegethon.ly
View File

@ -64,11 +64,8 @@ fixSlope = {
r32 c ef g a \upperStaff c ef g \tuplet 10/8 { a[ g ef c ef g a c ef g] } a g ef c a g ef c a' g ef c \lowerStaff a g ef c |
<ef ef'>1 |
r32 d fs a bf \upperStaff d fs a \tuplet 10/8 { bf[ a fs d fs a bf d fs a] } bf a fs d bf a fs d bf' a fs d \lowerStaff bf a fs d |
<d d'>1 |
r32 d fs a bf \upperStaff d fs a bf d fs a \ottava #1 bf d fs a bf a fs d \ottava #0 bf a fs d bf a fs d \lowerStaff bf a fs d |
\override Stem #'direction = #DOWN q4 <d' d'> \revert Stem #'direction <ef ef'>8[ <c c'>] \override Stem #'direction = #DOWN <g g'>[ <d d'>] \revert Stem #'direction |
\override Stem #'direction = #DOWN <d d'>4 <d' d'> \revert Stem #'direction <ef ef'>8[ <c c'>] \override Stem #'direction = #DOWN <g g'>[ <d d'>] \revert Stem #'direction |
r32 d ef g c \upperStaff d ef g \tuplet 10/8 { c[ g ef d ef g c d ef g] } c g ef d c g ef d c' g ef d \lowerStaff c g ef d |
<c c'>1 |
@ -88,19 +85,19 @@ fixSlope = {
\upperStaff r32 g c df e g c df \tuplet 10/8 { e[ df c g c df e g c df] } e df c g e df c g e' df c g e df c g |
<g g'>1 |
r32 af c df f af c df \tuplet 10/8 { f[ df c af c df f af c df] } f df c af f df c af f' df c af f df c af |
r32 f af c df f af c \tuplet 10/8 { df[ c af f af c df f af c] } df c af f df c af f df' c af f df c af f |
<af af'>1 |
r32 bf df e g bf df e \tuplet 10/8 { g[ e df bf df e g bf df e] } g e df bf g e df bf g' e df bf g e df bf |
r32 g bf df e g bf df \tuplet 10/8 { e[ df bf g bf df e g bf df] } e df bf g e df bf g e' df bf g e df bf g |
<bf bf'>1 |
\lowerStaff r32 e, g a d \upperStaff e g a \tuplet 10/8 4 { d[ a g e g a d e g a] d[ a g e g a d \ottava #1 e g a] } d a g e d' a g e |
\lowerStaff r32 e g a d \upperStaff e g a \tuplet 10/8 4 { d[ a g e g a d e g a] d[ a g e g a d \ottava #1 e g a] } d a g e d' a g e |
<a a'>1 |
d'32 bf g e \ottava #0 d bf g e d bf g bf d g bf d \tuplet 12/8 4 { cs[ bf g e cs bf g e cs bf g e] g[ bf cs e g bf cs e g bf cs e] } |
<a, a'>2 <cs cs'> \bar "||" |
d'32 bf g e \ottava #0 d bf g e d bf g bf d g bf d cs bf g e cs bf g e g bf g e cs bf g e |
<a, a'>2 <cs cs'> |
\time 5/4 \lowerStaff r32 e,,, f a d \upperStaff e f a \tuplet 10/8 4 { d[ a f e f a d e f a] \ottava #1 d[ a f e f a d e f a] } d a f e \ottava #0 d a f e d a f e \lowerStaff d a f e |
\time 5/4 \lowerStaff r32 e f a d \upperStaff e f a \tuplet 10/8 4 { d[ a f e f a d e f a] \ottava #1 d[ a f e f a d e f a] } d a f e \ottava #0 d a f e d a f e \lowerStaff d a f e |
\time 5/4 <d d'>1 ~ q4 |
r32 d f a bf \upperStaff d f a \tuplet 10/8 4 { bf[ a f d f a bf d f a] \ottava #1 bf[ a f d f a bf d f a] } bf a f d \ottava #0 bf a f d bf a f d \lowerStaff bf a f d |
@ -124,14 +121,15 @@ fixSlope = {
r32 c ef g c \upperStaff c ef g \tuplet 10/8 4 { c[ g ef c ef g c c ef g] \ottava #1 c[ g ef c ef g c c ef g] } c g ef c \ottava #0 c g ef c c g ef c \lowerStaff c g ef c |
<c c'>1 ~ q4 |
r32 d fs a bf \upperStaff d fs a \tuplet 10/8 4 { bf[ a fs d fs a bf d fs a] \ottava #1 bf[ a fs d fs a bf d fs a] } bf a fs d \ottava #0 bf a fs d bf a fs d \lowerStaff bf a fs d |
<d d'>2 <d'' fs a ef'>2.\arpeggio |
\time 4/4 r32 d fs a bf \upperStaff d fs a \tuplet 10/8 4 { bf[ a fs d fs a bf d fs a] \ottava #1 bf[ a fs d fs a bf d fs a] } d a fs d c' g ef c |
\time 4/4 <d d'>4 <d' d'> <d' fs a ef'>4\arpeggio \clef treble <d' fs a d>\arpeggio |
\time 4/4 r32 d fs a bf \upperStaff d fs a bf d fs a bf \ottava #1 d fs a bf a fs d \ottava #0 bf a fs d bf a fs d bf a fs d ~ |
\time 4/4 \override Stem.direction = #DOWN <d,, d'>8 <d' d'> <d' d'> \clef treble <d' d'> \revert Stem.direction \tuplet 6/4 4 { ef'16 a, fs ef a, fs \clef bass ef a, fs ef a, fs } |
bf'32 a fs d \ottava #0 bf a fs d bf a fs d bf a fs d <gs b d f>4 <ef g bf cs> |
\tuplet 6/4 4 { ef'16 a, fs ef a, fs \clef bass ef a, fs ef a, fs } <e! e'>4 <ef ef'> |
d1\fermata |
<d d'>1\fermata \bar "|." |
<d f a d>1\fermata |
<d d'>1\fermata |
\bar "|."
}
mainStaff = \new PianoStaff <<

BIN
album3/phlegethon.pdf
View File

Binary file not shown.