tmont/music
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity
48801f4a2e
music/album2/blood-disguise.ly
tmont 5d759622d1 a bunch of things
2020-08-05 19:48:59 -07:00

754 lines
20 KiB
Plaintext
Raw Blame History

\version "2.18.2"
\language "english"
\header {
title = "Blood Disguise"
composer = "Tommy Montgomery"
copyright = "(c) 2019 Tommy Montgomery"
}
global = {
\key e \minor
\set Staff.printKeyCancellation = ##f
\numericTimeSignature
\compressFullBarRests
\omit Voice.StringNumber
\override TupletBracket #'bracket-visibility = #'if-no-beam
\override MultiMeasureRest.expand-limit = #3
\override Score.ChordName.font-name = #"Noto Serif"
\override Score.ChordName.font-size = #0
\override Score.LyricText.font-name = #"Noto Serif"
\override Score.LyricText.font-size = #0
\time 4/4
\tempo 4 = 84
}
introRiff = \relative c' {
<e b'>16 q q8 r <e b'>16 q q q q8 r8 <e b'>16 q |
<e as>16 q q8 r <e as>16 q q q q8 r8 <e as>16 q |
<e c'>16 q q8 r <e c'>16 q q q q8 r8 <e c'>16 q |
<g d'>16 q q8 r <g d'>16 q <gs e'> q q8 r8 <gs e'>16 q |
<e b'>16 q q8 r <e b'>16 q q q q8 r8 <e b'>16 q |
<ds a'>16 q q8 r <ds a'>16 q q q q8 r8 <ds a'>16 q |
<c g'>16 q q8 r <c g'>16 q q q q8 r8 <c g'>16 q |
<cs a'>16 q q8 r <cs a'>16 q q q q8 r8 <cs a'>16 q |
}
guitarOne = \relative c' {
\introRiff
<e, b' e>2. <f c' f>16 q8 q16 |
<e b' e>2. <g d' g>16 q8 q16 |
<e b' e>2. <f c' f>16 q8 q16 |
<f b ds>1 |
%{
e,16 e'( d) e, d'( b) e, b' ( a) e a( g) e e'( d) e, |
d'( b) e, b' ( a) e b'( d) e,16 e'( d) e, d'( b) e, b'( |
a) e a( g) e e' d b d b a b a g <a e' a b e>8 ~ |
q2.. a16 b |
<c e g b e>1 |
<a d a' d>1 |
<f c' f>2. q16 q8 q16 |
<f b ds>1 |
%}
\repeat unfold 2 { e16 e e8 r e16 e e e e8 r e16 e | } \bar "||"
% verse 1
\repeat unfold 8 { e16 e e8 r e16 e e e e8 r e16 e | }
\repeat unfold 8 { <e b'>16 q q8 r <e b'>16 q q q q8 r <e b'>16 q | }
\repeat unfold 4 { e16 g b e } |
\repeat unfold 4 { fs, a c fs } |
\repeat unfold 4 { g, b d g } |
\repeat unfold 4 { a, c e a } |
\repeat unfold 4 { b, ds fs b } |
\repeat unfold 4 { c, e g c } |
\repeat unfold 4 { d, fs a d } |
\repeat unfold 4 { e, gs b e } |
<a,, e' a>4. a16 b <c e g b e>2 |
<a d a' d>1 |
<f c' f>2. q16 q8 q16 |
<f b ds>2. q16 q8 q16 | \bar "||"
e e' b' e, b' e, e, e' e, e' b' e, b' e, e, e' |
e, e' as e as e e, e' e, e' as e as e e, e' |
e, e' c' e, c' e, e, e' e, e' c' e, c' e, e, e' |
e, g' d' g, d' g, e, g' e, gs' e' gs, e' gs, e, gs' |
e, e' b' e, b' e, e, e' e, e' b' e, b' e, e, e' |
e, ds' a' ds, a' ds, e, ds' e, ds' a' ds, a' ds, e, ds' |
e, c' g' c, g' c, e, c' e, c' g' c, g' c, e, c' |
e, cs' a' cs, a' cs, e, cs' e, cs' a' cs, a' cs, e, cs' |
\repeat unfold 4 { e, b'' e b' } |
\repeat unfold 4 { e,,, as' e' as } |
\repeat unfold 4 { e,, c'' e c' } |
\repeat unfold 2 { e,,, d'' g d' } \repeat unfold 2 { e,,, e'' gs e' } |
\repeat unfold 4 { e,,, b'' e b' } |
\repeat unfold 4 { e,,, b'' ds a' } |
\repeat unfold 4 { e,, c'' e g } |
\repeat unfold 4 { e,, cs'' e a } |
\bar "||"
\repeat unfold 16 { <e,, b'>16 } |
\repeat unfold 16 { <fs c'>16 } |
\repeat unfold 16 { <g d'>16 } |
\repeat unfold 16 { <a e'>16 } |
\repeat unfold 16 { <b fs'>16 } |
\repeat unfold 16 { <c g'>16 } |
\repeat unfold 16 { <d a'>16 } |
\repeat unfold 16 { <e b'>16 } |
\repeat unfold 4 { a,16 c e a } |
\repeat unfold 4 { b,16 d f b } |
\repeat unfold 4 { c,16 e g c } |
\repeat unfold 4 { d,16 f a d } |
\repeat unfold 4 { e,16 gs b e } |
\repeat unfold 4 { f,16 a c f } |
\repeat unfold 4 { g,16 b d g } |
\repeat unfold 4 { a,16 cs e a } |
<b,, fs'>4 <c g'> <b fs'> <a d a' d> |
<<
{ r2 \tuplet 6/4 4 { g'''16( e) c g e c b c e g b c } | b4 a'16 f e c a f e c a f e c | b4 } \\
{ <c e g b e>1 | <f, c' f>1 | <f b ds>4 }
>>
b'16 fs g e fs b, c as b ds fs, f | \bar "||"
% chorus
\key e \phrygian
<e b'>8. e16 <e' b'>\glissando( <d a'>) <e b'>8 ~ q16 e,16 <e' b'>\glissando( <d a'>) <e b'>8. e,16 |
<d' a'>16\glissando( <e b'>16) <f c'>8 ~ q16 f16 <f c'>16\glissando( <e b'>16) <d a'>2 |
<e, b'>8. e16 <e' b'>\glissando( <d a'>) <e b'>8 ~ q16 e,16 <e' b'>\glissando( <d a'>) <e b'>8. e,16 |
<f' c'>16\glissando( <e b'>) <d a'>8 ~ q4 <f, c'>8. e16 <f c'>\glissando( <g d'>8.) |
<e b'>8. e16 <e' b'>\glissando( <d a'>) <e b'>8 ~ q16 e,16 <e' b'>\glissando( <d a'>) <e b'>8. e,16 |
<d' a'>16\glissando( <e b'>) <f c'>8 ~ q16 f <f c'>16\glissando( <e b'>) <d a'>2 |
<e, b'>8. e16 <e' b'>\glissando( <d a'>) <e b'>8 ~ q16 e,16 <e' b'>\glissando( <d a'>) <e b'>8. e,16 |
f16 c' f g ~ g a8 b16 ~ b c8 d16 ~ d f8. |
<a,, e' a b cs e>1 ~ | \time 2/4 q2 | \time 4/4 \key e \minor
\introRiff
\bar "||"
% verse 3
\time 5/4
\repeat unfold 2 {
e16 b' e d e e, b' e d e e, b' e d e f a b c b |
e,, b' e d e e, b' e d e e, b' c b a e fs c' b f |
e b' e d e e, b' e d e e, b' e d e f a b c b |
e,, b' e ds e e, b' fs' e fs e, b' g' e fs as b c e\glissando( ds) |
}
\time 4/4
\repeat unfold 4 { e,,16 g b e } |
\repeat unfold 4 { fs, a c fs } |
\repeat unfold 4 { g, bf d g } |
\repeat unfold 4 { a, cs e a } |
\repeat unfold 4 { bf, d f bf } |
\repeat unfold 4 { c, ef g c } |
\repeat unfold 4 { d, fs a d } |
\repeat unfold 4 { e, g b e } |
<b, fs'>4 <c g'> <b fs'> <a d a' d> |
<c e g b e>1 |
<f, c' f>1 |
<f b ds>4
b'16 fs g e fs b, c as b ds fs, f | \bar "||"
% chorus 2
R1*8^"chorus" |
<e b' e gs b e>1 ~ | q1 |
% guitar solo
\time 5/4 \key d \minor
a16^"guitar solo" e' a g a a, e' a g a a, e' a g a bf cs d e a, |
a, e' a g a a, e' a g a a, e' f e d a g a bf g |
a e' a g a a, e' a g a a, e' a g a bf cs d e a, |
a, e' a g a a, e' g f g a, d f e f e, gs a b e, |
a e' a g a a, e' a g a a, e' a g a bf cs d e a, |
a, e' a g a a, e' a g a a, e' f e d a g a bf g |
a e' a g a a, e' a g a a, e' a g a bf cs d e a, |
a, e' a g a a, e' g f g a, d f e f e, gs a b e, |
f c' g' f g f, c' g' f g f, c' g' f g a b c b g |
g, d' a' g a g, d' a' g a g, d' a' g a b cs d cs a |
af, ef' af g af ef af,\glissando bf f' bf a bf f bf,\glissando c g' c bf c8 |
d,16 a' fs' e fs d, a' fs' e fs d, a' fs' e fs g a bf c d |
g,,, d' g f g g, d' g f g g, d' g f g bf\glissando( a) f g c, |
g d' g f g g, d' g f g g, c d f g bf c d g d |
g,, d' g f g g, d' g f g g, d' g f g bf\glissando( a) f g c, |
g d' g f g g, d' g f g bf d \tuplet 6/4 4 { bf'( g) f d c bf g f d c bf g } |
a e' a g a a, e' a g a a, e' a g a bf cs d e a, |
a, e' a g a a, e' a g a a, e' f e d a g a bf g |
a e' a g a a, e' a g a a, e' a g a bf cs d e a, |
a, e' a g a a, e' g f g a, d f e f e, gs a b e, |
f c' g' f g f, c' g' f g f, c' g' f g a b c b g |
g, d' a' g a g, d' a' g a g, d' a' g a b cs d cs a |
b, fs' b a b b, fs' a g a b, e g fs e b ds e fs b, |
<e, b'>2 fs4 <g d' g d' g> <a e' a> |
\time 4/4 \key e \minor
<b fs'>4 <c g'> <b fs'> <a d a' d> |
<c e g b e>1 |
<f, c' f> |
<f b ds>4 b'16 fs g e fs b, c as b ds fs, f | \bar "||"
\key e \phrygian
R1*7^"chorus" |
<f c' f>8. f32 f <f c' f>16 q8 q16 <a d a'>8. a32 a <a d a'>16 q8 q16 |
% double time chorus
<e b'>8 e32 e e e <e' b'>16\glissando( <d a'>) <e b'>8 e32 e e e <e b'>16\glissando( <d a'>) <e b'>8 e32 e e e |
<d a'>16\glissando( <e b'>) <f c'>8 f32 f f f <f c'>16\glissando( <e b'>) <d a'>8 d32 d d d <d a'>8 d32 d d d |
<e, b'>8 e32 e e e <e' b'>16\glissando( <d a'>) <e b'>8 e32 e e e <e b'>16\glissando( <d a'>) <e b'>8 e32 e e e |
<f c'>16\glissando( <e b'>) <d a'>8 d32 d d d <d a'>8 <f, c'>8 f32 f f f <f c'>16\glissando( <g d'>8) q16 |
<e b'>8 e32 e e e <e' b'>16\glissando( <d a'>) <e b'>8 e32 e e e <e b'>16\glissando( <d a'>) <e b'>8 e32 e e e |
<d a'>16\glissando( <e b'>) <f c'>8 f32 f f f <f c'>16\glissando( <e b'>) <d a'>8 d32 d d d <d a'>8 d32 d d d |
<e, b'>8 e32 e e e <e' b'>16\glissando( <d a'>) <e b'>8 e32 e e e <e b'>16\glissando( <d a'>) <e b'>8 e,32 e e e |
f16 c' f g ~ g a8 b16 ~ b c8 d16 ~ d f8. |
e,,16 b' e fs ~ fs gs8 a16 ~ a b8 c16 ~ c d8 cs16\laissezVibrer |
a,16 e' a cs ~ cs d8 f16 ~ f e8 d16 ~ d cs8 b16\laissezVibrer |
<b, fs' b>1 |
<f b ds>4 r4 r8 \grace e8( f4.) |
\key e \minor
\introRiff
<e b' e>2. <f c' f>16 q8 q16 |
<e b' e>2. <g d' g>16 q8 q16 |
<e b' e>2. <f c' f>16 q8 q16 |
<f b>16[ q r <f b>16] q[ r <f b>16 q] r <f b>16 q r <f b>16[ q r <b fs'!>] |
<e, b' e>8 e32 e e e <e b' e>8 e32 e e e <e b' e>8 e32 e e e <f c' f>16 q8 q16 |
<e b' e>8 e32 e e e <e b' e>8 e32 e e e <e b' e>8 e32 e e e <g d' g>16 q8 q16 |
<e b' e>8 e32 e e e <e b' e>8 e32 e e e <e b' e>8 e32 e e e <f c' f>16 q8 q16 |
<f b ds>4 b'16 fs g e fs b, c as b ds fs, f |
<e b'>4 r4 r2 | \bar "|."
}
guitarSolo = \relative c' {
R1*14 |
% verse 1
R1*16 |
R1*12 |
% verse 2
R1*16 |
% pre-chorus
R1*16 |
R1*4 |
% chorus
R1*8 | r1 | r2 |
R1*8 |
%verse 3
R1*5/4*8 |
% pre-chorus
R1*8 |
R1*4 |
% chorus
R1*8 |
% solo
r2 \tuplet 6/4 4 { e16 f c' b a f' e d c' b a f' e d a' } gs8 ~ gs2. |
\bar "||"
\key d \minor
e4. e32 e e e e4. e32 e e e \tuplet 3/2 { e4 d e }
\grace e8( f4) ~ \tuplet 3/2 { f8 e d } cs32( d e8 d32 cs) bf a g f e d e16 ~ |
e4. e32 e e e \tuplet 3/2 { e8 f d } bf16 a g bf a8. a32 a |
a16( g) e a g cs f e\glissando a e f^"+" g,^"+" d'^"+" f^"+" e8^"+" ~ e4\glissando( |
a,4.) a32 a a a a4. \tuplet 3/2 { a16 cs e } \tuplet 3/2 { g8 f e } |
d16 cs16 d e a,4 ~ a8. \tuplet 3/2 { cs32 e g } \tuplet 3/2 { bf8 a g } f16( e f g) |
d8 bf32 e g bf
\tuplet 3/2 { d8 cs d ~ } d16 cs32 d e8 ~ e8. cs32 d e d cs e d cs f16 ~ f8 d32 e f e
d f e d g8
\ottava #1 e32 f g a bf cs bf a g f e\glissando d f e d cs
bf a bf cs bf a g f |
\ottava #0 e2 f g4 ~ |
g a2 b2 |
c d4. \ottava #1 \tuplet 3/2 { d16 f a } c16 bf c8 |
d1 r4 |
g,,16 d' g f
g bf\glissando( a) f
g c, d g,\glissando(
f) bf\glissando( c) c,\glissando(
bf) f'\glissando( g8) |
\ottava #0
\tuplet 6/4 4 {
f,16( g) bf( c) f( g)
bf( c bf) g( f) c
bf( c) f( g) bf( c)
f( g f) c( bf) c(
}
\tuplet 3/2 { bf) g( f) } g8 ~
|
g8 g32 g f f
g8. bf32 bf
a a bf8.
c32 c bf bf c8 ~
c16 d32 d c c d16 ~
|
d16 f32 f d d f16 ~
f16 g32 g f f g16 ~
g4
\tuplet 6/4 4 {
\ottava #1
bf16( g) f d c bf
\ottava #0 g f d c bf g
}
|
a4. r8
\tuplet 7/4 4 {
a16 bf cs d e d cs f e d g f e f g a bf
a16 bf cs d e d cs f e d g
}
\tuplet 6/4 {
f e f g a bf
}
a8. \ottava #1 a32 bf cs bf a bf cs bf a bf d bf a bf d bf a bf
\override TupletNumber.text = #tuplet-number::calc-fraction-text
e4. e32 e e e \tuplet 7/3 { e4 d e \grace e8( f4) e d cs8 d } |
\revert TupletNumber.text
e4 ~ e8 \ottava #0 cs,32 d e16 ~ e8 cs,32 d e16 ~
e4 gs,16 a b e,
a4. b8 ~ b4 c4 d16 e f g |
a4. b8 ~ b4 c4 d16 e fs a |
b2 \tuplet 6/4 4 { b16( fs) e ds e c b c a fs g e ds e c b g fs } |
e4. a,8 b16 e( fs\glissando g) b16 e( fs\glissando g) b16 e( fs\glissando g) |
\time 4/4
\key e \minor
a1 | r1 | r1 | r1 |
\key e \phrygian
R1*8 |
r4 \grace d,8( e4) \grace d8( e4) \grace d8( e8.) d16 ~ |
d4 d32( b) a b d( b) a b d( b) a b d( b) a b f'( d) b d f( d) b d |
e8. <b e>16 ~ q4 \tuplet 6/4 4 { f'16( d) b d b gs b( gs) f gs f d f( d) b d b gs b( gs) f gs f d f e d e f d }
e4 |
\tuplet 9/8 4 {
e32 f g a b c d e f
b, c d e f g a b c
e, f g a b c d e f
}
a, b c d e f e d |
e8. \ottava #1 e32 f
g f e f g f e f gs f e f gs f e f a f e f a f e f |
b8. a32 bf cs bf a bf cs bf a bf d bf a bf d bf a bf ds b a b ds b a b |
\grace d8( e4.) \grace d8( e8) ~ e4 \grace d8( e4) |
d2. \ottava #0 r4 |
}
vocalMelody = \relative c'' {
\repeat unfold 8 r1 |
\repeat unfold 4 r1 |
\repeat unfold 2 r1 |
b4^"verse 1" b8 b ~ b b( as) as ~ |
as2 r2 |
c4 c8 d ~ d c8( b) b ~ |
b2. r4 |
b4 b8 a ~ a b4 c8 ~ |
c2 r2 |
b4 b8 c ~ c b( a) a ~ |
a2 r2 |
<e b' e>4 q8 q ~ q q( <e as e'>) q ~ |
q2 r4 r8 e |
<e c' e>4 q8 <fs d' fs> ~ q <e c' e>8( <d b' d>) q ~ |
q2. r4 |
<e b' e>4 q8 <e a e'> ~ q q4 <fs c' ds>8 ~ |
q4.( d'!16 c b8 a4) r8 |
<g b>4 q8 <fs a> ~ q <d g>( <e a>) q ~ |
q2 r2 |
R1*8 |
R1*4 |
% verse 2
e'8^"verse 2" e4 gs8 ~ gs e gs g ~ | g2 r2 |
e8 e e e ~ e fs e d ~ | \override Glissando #'style = #'trill d1\glissando |
b'8 b b b ~ b b b b ~ | b2 r4 r8 e,8 |
c'8 c c d ~ d c b b( | a2) r4 r8 a,8 |
b4 b8 b ~ b b( as) as ~ |
as2 r4 r8 e |
c'4 c8 d ~ d c8( b) b ~ |
b2 r4 r8 b8 |
b4 b8 a ~ a b4 c8 ~ |
c2 r2 |
b4 b8 c ~ c b( a) a ~ |
a2 r2 |
% pre-chorus
e4^"pre-chorus" g8 b ~ b e,4 fs8 ~ | fs4 a8 c ~ c4 r4 |
g4 b8 d ~ d c4 c8 ~ | c b( a) a ~ a4 r |
b4 ds8 fs ~ fs b,4 c8 ~ | c4 e8 g8 ~ g b4. |
a4.( g8 ~ g4 fs | e2.) r4 |
r4 r8 e e d4 f8 ~ | f e4 d8 ~ d c4 b8 ~ |
b c4 b8 ~ b a4 f8 ~ | f2 r |
r4 r8 e' e d4 f8 ~ | f e4 g8 ~ g f4 e8 ~ |
e f4 e8 ~ e d4 e8 ~ | e2 r |
R1*4 |
% chorus
\key e \phrygian
r8 e16 d e4 ~ e16 g8. ~ g16 a8. ~ |
a16 e8. ~ e16 d8. ~ d4 r4 |
r8 e16 d e4 ~ e16 g8. ~ g16 a8. ~ |
a16 e8. ~ e16 f8. ~ f4 r4 |
e16 d8 e16 ~ e8 d16 e16 ~ e d8 b16 ~ b4 |
a8 a16 a ~ a b8 c16 ~ c4 r4 |
r8 e16 d e8 d16 f ~ f e8 d16 ~ d b8. |
c4 d e f |
e1 | \time 2/4 r2 |
\time 4/4 \key e \minor
R1*8 |
\time 5/4
% verse 3
r8^"verse 3" b16 a b8 d16 e ~ e8 e16 d e8 f16 f ~ f e d8 |
r8 b16 a b8 d16 e ~ e8. d16 e8 f16 f ~ f e ds8 |
r8 b16 a b8 a16 b ~ b d8 e16( f4 ~ f16) f f8 |
g4( ~ g8 fs!16) fs ~ fs2 r4 |
r4 e8. d16 ~ d8 b c8 c16 c ~ c d d8 ~ |
d8 r e8. d16 ~ d8 b c8 c16 c ~ c d d8 |
r b'8 b a16 b ~ b8 a b16( a8. ~ a4) |
r8 e16 e ds8. e16 ~ e8 fs ~ fs2 |
\time 4/4
e,4^"pre-chorus" g8 b ~ b e,4 fs8 ~ | fs4 a8 c ~ c4 r4 |
g4 bf8 d ~ d ef4 d8 ~ | d cs4 cs8 ~ cs4 r |
d4 ef8 f ~ f d4 ef8 ~ | ef4 f8 g8 ~ g bf4. |
a4.( g8 ~ g4 fs | e2.) r4 |
R1*4 |
R1*8 |
e1 | r1 |
\time 5/4 \key d \minor
R1*4*5/4 |
% guitar solo
R1*8*5/4 |
R1*12*5/4 |
\key e \minor
\time 4/4
R1*4 |
% chorus
R1*8 |
% chorus (double time)
R1*8 |
e4 d c b |
a b c a |
<b fs'>1( | <b f'>4) r2. |
\key e \minor
R1*16 |
}
allTheLyrics = \lyricmode {
% verse 1
Bleed -- ing from __ the __ eyes, __
still the best __ dis __ guise. __
Hear the vir -- gin's cries, __
sad -- ness in her __ dies. __
Cold -- ness of the __ stone __
re -- flects through thee __ a -- lone. __
Fra -- gile flesh and bone
ne -- ver shall a -- tone. __
% verse 2
All eyes turn __ t'ward the sky, __
watch -- ing clouds form and then fly.
Beam -- ing dust in -- to the eye, __
but tears can't clean that __ which must die. __
The Sun can ne -- ver __ shine __
on those who walk __ the __ line __
'tween god and death __ di -- vine. __
Cruel -- ty by de -- sign. __
% pre-chorus
Ax -- es fall __ and spi -- rits rise. __
Scar -- let mist __ falls through __ her __ eyes. __
Pure of heart __ and weak __ of mind __ she dies. __
E -- tern -- al sleep __ lies cold __ be -- fore __ our na -- ked shame. __
The drip -- ping stones __ lie at __ our feet __ but who's __ to blame? __
% chorus
Look a -- way __ from __ their __ de -- mise. __
Wipe a -- way __ the __ tears __ she __ cries. __
Ne -- ver shall __ the wounds we bear __ drift be -- hind __ these lies. __
Tear a -- way the mask __ to show __ that
it's our blood dis -- guise.
% verse 3
Lay -- ing in the cold, __ star -- ing out in -- to __ the night.
Wink -- ing back at me, __ the stars blink out __ of sight.
Wish -- ing I could fly __ a -- way, __ but I'm drown -- ing. __
Drift -- ing __ a -- way __ in lone -- li -- ness. __
Fade to __ a new __ un -- con -- scious -- ness. __
I am the cho -- sen one, __
but the choice is __ gone. __
% pre-chorus
Ax -- es fall __ and spi -- rits rise. __
Scar -- let mist __ falls through __ her eyes. __
Pure of heart __ and weak __ of mind __ she dies. __
% end of chorus
guise.
% end of last chorus
It's our blood dis...
It's our blood dis --
guise.
}
guitarOneStaff = \new Staff \with { midiInstrument = "distorted guitar" midiMaximumVolume = #0.6 }{ \global \guitarOne }
guitarSoloStaff = \new Staff \with { midiInstrument = "distorted guitar" midiMaximumVolume = #1 }{ \global \guitarSolo }
vox = \new Staff \with { midiInstrument = "voice oohs" midiMinimumVolume = #0.7 } {
<<
\new Voice = "vocalMelody" { \clef treble \global \vocalMelody }
>>
}
demLyrics = \new Lyrics \lyricsto "vocalMelody" {
<<
\new Lyrics {
\set associatedVoice = "vocalMelody"
\allTheLyrics
}
>>
}
chordExceptionMusic = {
<c e g b d'>1-\markup { "maj9" }
<c e g b fs'>1-\markup { "maj7" \sharp "11" }
<c ef f g bf>1-\markup { "m7sus4" }
<c ef gf bff>1-\markup { "°7" }
<c e g d'>1-\markup { "add9" }
<c ef g d'>1-\markup { "m(add9)" }
<c e fs as>1-\markup { \super { \sharp "11" \sharp "13" } }
<c g>1-\markup { "5" }
<c e g bf>1-\markup { "7" }
<c e g b>1-\markup { "maj7" }
<c ef g bf>1-\markup { "m7" }
<c f g>1-\markup { "sus4" }
<c d g>1-\markup { "sus2" }
<c e g bf df'>1-\markup { "7" \super { \flat "9" } }
<c e g f'>1-\markup { "add11" }
}
chordExceptions = #(append
(sequential-music-to-chord-exceptions chordExceptionMusic #t)
ignatzekExceptions
)
chorusEChords = \chordmode {
\repeat unfold 2 {
e4:1.5 q16 d:1.5 e4:1.5 q16 d16:1.5 e4:1.5 |
d16:1.5 e:1.5 f4:1.5 q16 e16:1.5 d2:1.5 |
e4:1.5 q16 d:1.5 e4:1.5 q16 d16:1.5 e4:1.5 |
}
\alternative {
{ f16:1.5 e:1.5 d4.:1.5 f4:1.5 q16 g8.:1.5 }
{ f1 }
}
}
chordValues = \chordmode {
\global
\powerChords
\set chordNameExceptions = #chordExceptions
\set majorSevenSymbol = \markup "maj7"
e1:1.5 | e:1.5- | c:/e | g2:1.5 e:/gs |
e1:1.5 | b:1.3.5.7/ds | c:1.5 | a:/cs |
e2.:1.5 f4:1.5 | e2.:1.5 g4:1.5 |
e2.:1.5 f4:1.5 | b1:1.3.5-.7/f |
e1:1.5 | q |
% verse 1
\repeat unfold 2 {
e1:1.5 | e:1.5- | c:/e | g2:1.5 e:/gs |
e1:1.5 | b:1.3.5.7/ds | c:1.5 | a:/cs |
}
e1:m | fs:dim | g | a:m |
b | c | d | e |
a2:sus2 c:maj7 | d1:1.5 | f | b:1.3.5-.7/f |
% verse 2
\repeat unfold 2 {
e1:1.5 | e:1.5- | c:/e | g2:1.5 e:/gs |
e1:1.5 | b:1.3.5.7/ds | c | a:/cs |
}
e1:m | fs:dim | g | a:m |
b | c | d | e |
a:m | b:dim | c | d:m |
e | f | g | a |
b4:1.5 c:1.5 b:1.5 d:1.5 | c1:maj7 | f:maj7 | b:1.3.5-.7 |
% chorus
\chorusEChords
a1.:1.3.5.9
e1:1.5 | e:1.5- | c:/e | g2:1.5 e:/gs |
e1:1.5 | b:1.3.5.7/ds | c:1.5 | a:/cs |
% verse 3
\repeat unfold 2 {
e2.:m d4:m f | e2.:m a4:m b:1.3.5-.7 |
e2.:m d4:m f | e2.:m fs4:1.3.5.7.9- b:1.3.5.7.9- |
}
% pre-chorus
e1:m | fs:dim | g:m | a |
bf | c:m | d | e:m |
b4:1.5 c:1.5 b:1.5 d:1.5 | c1:maj7 | f:maj7 | b:1.3.5-.7 |
% chorus 2
R1*8 |
e1 | e1 |
% solo
\repeat unfold 3 { a1:1.3.5.7.9- q4 } | d1:m e4 |
\repeat unfold 3 { a1:1.3.5.7.9- q4 } | d1:m e4 |
f1*5/4:sus2 | g1*5/4:sus2 | af1*7/16:maj7 bf1*7/16:maj7 c4. | d1*5/4 |
g1:m q4 | q2. c2:sus4 | g1*5/4:m | q |
\repeat unfold 3 { a1:1.3.5.7.9- q4 } | d1:m e4 |
f1*5/4:sus2 | g1*5/4:sus2 | b:1.3.5.7.9- | e2:1.5 fs4:1.5 g:1.5 a:1.5 |
b4:1.5 c:1.5 b:1.5 d:1.5 | c1:maj7 | f:maj7 | b:1.3.5-.7/f |
% last chorus
R1*7 |
f2:1.5 d:1.5 |
R1*8 |
e1 | a2 d:m | b1 | b1:1.3.5-.7 |
% outro
e1:1.5 | e:1.5- | c:/e | g2:1.5 e:/gs |
e1:1.5 | b:1.3.5.7/ds | c:1.5 | a:/cs |
e2.:1.5 f4:1.5 | e2.:1.5 g4:1.5 | e2.:1.5 f4:1.5 | b1:1.3.5-.7 |
e2.:1.5 f4:1.5 | e2.:1.5 g4:1.5 | e2.:1.5 f4:1.5 | b1:1.3.5-.7 |
e1:1.5 |
}
chordNames = \new ChordNames {
\set chordChanges = ##t
\set chordNameExceptions = #chordExceptions
\chordValues
}
\score {
<<
\chordNames
\vox
\demLyrics
\guitarOneStaff
\guitarSoloStaff
>>
\layout {
\context {
\Staff \RemoveEmptyStaves
\override Glissando.minimum-length = #4
\override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
\override Glissando.thickness = #2
\override VerticalAxisGroup.remove-first = ##t
}
}
}
\score {
\unfoldRepeats {
<<
\transpose c c, \vox
\transpose c c, \guitarOneStaff
\transpose c c, \guitarSoloStaff
>>
}
\midi {}
}
Reference in New Issue View Git Blame Copy Permalink