music/album3/shine.ly
2024-08-23 14:06:11 -07:00

584 lines
15 KiB
Plaintext

\version "2.22.1"
\language "english"
\header {
title = "Shine"
composer = "Tommy Montgomery"
copyright = "(c) 2024 Tommy Montgomery"
}
#(define (scoop-stencil grob)
(ly:stencil-combine-at-edge
(ly:note-head::print grob) 0 -1
(grob-interpret-markup grob
(markup #:with-dimensions '(0 . 0) '(0 . 0)
#:translate '( -2 . -2) #:musicglyph "brackettips.up" )) 0 )
)
scoop = \once \override NoteHead.stencil = #scoop-stencil
global = {
\key a \mixolydian
\set Staff.printKeyCancellation = ##f
\numericTimeSignature
\compressEmptyMeasures
\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
}
eRiff = \relative c {
e4 e8 e f'( e) d e ~ | e4 e,8 e f'( e) d e ~ |
e4 e,8 e f'( e) d e ~ | e4 d8 c b c d e, |
}
guitar = \relative c' {
\time 4/4
\tempo 4 = 216
\repeat volta 2 {
a4 a8 a d'( cs) a, cs'(\glissando b) a, b'( cs)
a,4 a8 a b'( a) a, a'(\glissando g) a, g'( a)
a,4 a8 a g'( fs) a, fs'(\glissando e) a, e'( fs)
a,4 a8 a f'( e) a, e'( d) a d( e)
}
\alternative {
{
e,4 e8 e gs( e) e a ~ | a( e) b'( e,) d'4 e |
e,4 e8 e gs( e) e a ~ | a( e) b'( e,) d'4 e |
}
{
e,4 e8 e gs( e) e a ~ | a( e) b'( e,) d'4 e |
}
}
% \repeat volta 3 \eRiff
% \textMark "3x"
%{
e,4 e8 e f'( e) d e ~ | e4 e,8 e f'( e) d e ~ | \time 7/8 e4 e,8[ e] f'([ e) d] |
\time 6/8 <c g' c>4. <d a' d> | <b fs' b>4. <c g' c>4. | <a e' a> <b fs' b> |
<g d'g>4. <a e' a>4. | \time 2/4 <f c' f>4 <g d' g>4 |
\time 4/4
%}
<a, e' a>2. ~ q8 <e'' a> ~ | q1 ~ | q1 ~ | q |
% e,,4^"bass" e8 e g( e) e a ~ | a( e) b'( e,) d'4 e |
% e,4 e8 e g( e) e a ~ | a( e) b'( e,) d'4 e |
% e,4 e8 e g( e) e a ~ | a( e) b'( e,) d'4 e |
% e,8 a g e g a e bf' | e, a g e g( a) d( e) |
% \repeat unfold 3 { e,4^"gtr" e8 e e e e e ~ | e e e4 e e | }
% e8 a g e g a e bf' | e, a g e g( a) d( e) |
% d4 a' d a e' a, d a | cs, a' cs a e' a, cs a |
% c,! g' c g d' g, c g | b, g' b g d' g, b g |
% \tuplet 3/2 4 { \repeat unfold 12 bf,8 } |
% bf4 r r2 |
\bar "||"
\repeat unfold 2 {
a,8_"clean" cs d cs d e d cs | d cs d e a cs d e |
a,8 cs d cs d e d cs | a e d cs d e cs a |
}
\alternative {
{
g a cs d cs a cs d | g a g d g a cs d |
cs a cs d g a g d | cs d cs a g d cs b |
}
{
f8 a b a b c b a | b c e c e f e c |
f8 a b a b c b a | b c e c e f e d |
}
}
e4. e8 ~ e4 e ~ | e1 |
\tuplet 3/2 4 { \repeat unfold 12 e,,8 } | <f c' f>4-. r r2 |
% chorus
a,2 a8 a a a'8 ~ | a4 a8 a cs( d) e4 |
a,,2 a8 a a a'8 ~ | a4 a8 a e( fs) g4 |
a,2 a8 a a a'8 ~ | a4 a8 a cs( d) e4 |
\repeat unfold 2 { e,8 fs g e fs d e c | }
a2 a8 a a a'8 ~ | a4 a8 a cs( d e4) |
a,,2 a8 a a a'8 ~ | a4 a8 a e'( fs g4) |
a,,2 a8 a a a'8 ~ | a4 a8 a cs( d e4) |
e,8 f g e f d e c | d e f d e c d b |
<a e' a cs! b e>8 r r q r4 q4 ~ | q1 |
<a e' a cs b e>8 r r q r4 q4 ~ | q1 |
<f c' f a b e>8 r r q r4 q4 ~ | q1 |
%{<b fs' b>4. b8 b b <b fs' b>4 ~ | q4 b8 b b c d4 |
<c g' c>4. c8 c c <c g' c>4 ~ | q4 c8 c c d e4 |
<d a' d>4. d8 d d <d a' d>4 ~ | q4 d8 d d4 e |
%}
<<
{ f'4. a8 ~ a4 d | e4. f8 ~ f4 b, | } \\
{ d,1 | c2 b | }
>>
% \repeat volta 2 \eRiff
a4 a8 a d'( cs!) a, cs'(\glissando b) a, b'( cs)
a,4 a8 a b'( a) a, a'(\glissando g) a, g'( a)
a,4 a8 a g'( fs) a, fs'(\glissando e) a, e'( fs)
a,4 a8 a f'( e) a, e'(\glissando d) a d( e) |
e,4 e8 e gs( e) e a ~ | a( e) b'( e,) d'4 e |
a,4 a8 a d'( c) a, c'(\glissando b) a, b'( c)
a,4 a8 a b'( a) a, a'(\glissando g) a, g'( a)
a,4 a8 a g'( f) a, f'(\glissando e) a, e'( f)
a,4 a8 a e'( d) c b( a) g f( g) |
e8 e4 e8 ~ e e <e' b' e a d>4 ~ | q1 |
e16^+( e, a b) a'^+( a, d e) d'^+( d, gs a) b'^+( b, e fs) |
d'^+( b, e fs) e'^+( b, e fs) gs'^+( e, d' e) a^+( e, d' e) |
b'2^+ r2 | R1 |
% verse 2
\repeat unfold 2 {
a,,,4 a8 a \tuplet 3/2 { a( a') e'^+ } e4 ~ | e4 a,,8 a \tuplet 3/2 { a( a') e'^+ } e4 |
}
\repeat unfold 2 {
a,,4 a8 a \tuplet 3/2 { a( g') d'^+ } d4 ~ | d4 a,8 a \tuplet 3/2 { a( g') d'^+ } d4 |
}
\repeat unfold 2 {
a,4 a8 a \tuplet 3/2 { a( fs') cs'^+ } cs4 ~ | cs4 a,8 a \tuplet 3/2 { a( fs') cs'^+ } cs4 |
}
a,4 a8 a \tuplet 3/2 { a( f') c'^+ } c4 ~ | c4 a,8 a \tuplet 3/2 { a( f') c'^+ } c4 |
a,4 a8 a \tuplet 3/2 { a( e') b'^+ } b4 ~ | b4 a,8 a \tuplet 3/2 { a( d) a'^+ } a4 |
% verse 3
\repeat unfold 4 { a8( e') e^+ b'^+ cs,( a') a^+ e'^+ | }
\repeat unfold 4 { g,,8( d') d^+ a'^+ b,( g') g^+ d'^+ | }
\repeat unfold 4 { fs,,8( cs') e^+ a^+ a,( e') fs^+ cs'^+ | }
\repeat unfold 4 { f,,8( c') d^+ a'^+ a,( e') f^+ c'^+ | }
\repeat unfold 2 { e,,8( b') e^+ b'^+ a,( e') a^+ e'^+ | }
\repeat unfold 2 { e,,8( b') e^+ b'^+ gs,( e') gs^+ e'^+ | }
R1*16^"chorus riff" |
\bar "||"
\textMark "Interlude"
\repeat unfold 2 {
a,,,4 a8 a a'( g) e g e( d) c d c b( a) g |
}
% f4. c'8 ~ c4 f | g4. f8 ~ f4 c |
f8 c' e c e( f e) c e f a b c( b a) g |
g, b c b c d c b | g b c d e d c b |
a4 a8 a a'( g) e g e( d) c d c b( a) g |
a4 a8 a a'( g) e g e( d) cs d e cs( a) b |
c4. e8 ~ e4 g | <b e>1 |
d,4. fs8 ~ fs4 a | <f c'>2 <g b> |
a4 a8 a e'( d) a a' a, d( e) a, g'( fs) e( d) |
e4 e,8 a d c b a | r g r a r c r b |
r g r a ~ a2 | d,8 e f a d e f d |
e f g a b c b g | a e b' e, c' g d' g, |
a4 a8 a e'( d) a a' a, d( e) a, g'( fs) e( d) |
e4 e,8 a d c b a | r g r a r c r b |
r g r a ~ a2 | \ottava #1 a8 b c d e f g a |
r c r b r g r a | r d r c r b r
<< { \stemDown a8 ~ \stemNeutral | a1 \ottava #0 | s1 | s1 | s1 | } \\ { s8 | <a,, e' a>1 ~ | \stemNeutral <a, e' a>1 ~ | q1 ~ | q1 | } >> |
\bar "||"
% verse 3
a4. a'8 ~ a4 e' | a1 | a,,4. a'8 ~ a4 e' | a4. e8 ~ e4 a, |
a,4. a'8 ~ a4 e' | g1 | a,,4. a'8 ~ a4 e' | g4. e8 ~ e4 a, |
a,4. a'8 ~ a4 e' | fs1 | a,,4. a'8 ~ a4 e' | fs4. e8 ~ e4 a, |
a,4. a'8 ~ a4 e' | f1 | a,,4. a'8 ~ a4 e' | f4. e8 ~ e4 a, |
e,4 e8 e << { <a' d>8([ <b e>]) } \\ { e,4 } >> r8 <b' e>8 ~ |
q4 e,,8 e << { <a' d>8([ <b e>]) } \\ { e,4 } >> r8 <c' f>8 |
r <b e>4. \tuplet 3/2 4 { e,8 e e e e e } |
<f c' f>4 r4 r2 |
% chorus 3
\repeat unfold 2 {
a,4 a8 a <a' cs>( d) r <a cs> ~ | q <a d> r <a e'> ~ q2 |
a,4 a8 a <a' e' g>( <d fs>) r <a e' g> ~ | q <a d fs> r <a e' g> ~ q2 |
a,4 a8 a <a' cs>( d) r <a cs> ~ | q <a d> r <a e'> ~ q2 |
}
\alternative {
{ \repeat unfold 2 { e8 fs g e fs d e c | } }
{ e8 f g e f d e c | d b c a b g a b | }
}
a4. e'8 ~ e4 a | <b cs e>1\arpeggio |
<<
{ f4. a8 ~ a4 d | e4. f8 ~ f4 d | }
\\
{ d,4. e8 ~ e4 f | a4. c8 ~ c4 b | }
>>
\repeat volta 3 {
e,,4 e8 e f'( e) d e ~ | e4 e,8 e f'( e) d e ~ |
e4 e,8 e f'( e) d e ~ | e4 d8 c b c d \textMark "3x" e, ~ |
}
e4. e8 ~ e e <e b' e b' e>4 ~ | q2 <f c' f>4. q8 ~ |
q q q2. | <g d' g>2 q |
a4 a8 a d'( cs) a, cs'(\glissando b) a, b'( cs)
a,4 a8 a b'( a) a, a'(\glissando g) a, g'( a)
a,4 a8 a g'( fs) a, fs'(\glissando e) a, e'( fs)
a,4 a8 a f'( e) a, e'( d) a d( e)
e,4 e8 e gs( e) e a ~ | a( e) b'( e,) d'4 e |
e4 e8 e gs( e) e a ~ | a( e) b'^+( e,) d'4^+ e^+ |
e4 e8 e gs( e) e a ~ | a( e) b'( e,) d'4 e |
<<
{ \grace e8( f2. e4) | d2. e8( d) | e2 }
\\
{ e,,8 f g e f d e c | d e f d e c d b | a2 }
>>
a'''8( e) a, e' e, d'( cs) b b, e fs fs, d' cs g b a2
\bar "|."
%{
\bar "||"
\repeat unfold 4 { a8 cs e }
\repeat unfold 4 { a, d f }
\repeat unfold 4 { a, e' g }
\repeat unfold 2 { a, e' a }
a, e' a2 |
\repeat unfold 4 { a8 cs e }
\repeat unfold 4 { a, d f }
\repeat unfold 4 { a, e' g }
\repeat unfold 2 { a, e' a }
a, e' a2 |
\tuplet 3/2 4 {
\repeat unfold 36 e,,8
} |
<f c' f>4-> r r2 |
\repeat unfold 2{ e,,4 e8 e gs( e) e a ~ | a( e) b'( e,) d'4 e | }
% chorus
R1*16^"chorus" |
%}
}
vocalMelody = \relative c' {
\repeat volta 2 R1*6
\alternative {
{ R1*4 }
{ R1*2 }
}
%{
\repeat volta 3 R1*4 |
R1*2 | R1*7/8 | R1*6/8*4 | R1*2/4 |
%}
R1*4 |
% verse 1
\textMark "Verse 1"
r4 cs'4 b a | d4. e8 r4 a, | d4. e8 r2 | fs4 e e cs |
d4. cs8 ~ cs4 a | d4. cs8 ~ cs4 b ~ | b1 | R1 |
r4 cs4 b a | d4. e8 r4 a, | d4. e8 r2 | fs4 e e cs |
d4 c c b | a4. b8 ~ b4 c ~ | c1 | r4 c4 c8 d4. |
b1 ~ | b1 | R1 | r2 b8 cs4. |
% chorus
\bar "||"
\textMark "Chorus"
d2. ~ d8 cs ~ | cs2 r2 | d2. ~ d8 e ~ | e2 r4 a, |
d4 cs cs b | b4 a a b8 c ~ | c1 | R1 |
d2. ~ d8 cs ~ | cs2 r4 a | fs'2( ~ fs8 g fs) fs( ~ | fs4 e) r4 r8 a, |
d4 cs cs b8 b ~ | b4 a a b | c1 | b |
a1 ~ | a1 | R1*6 |
% \repeat volta 2 R1*4 |
R1*20 |
\bar "||"
\textMark "Verse 2"
r4 cs4 b a | d4. e8 r4 a, | d4. e8 r2 | d4. cs8 ~ cs4 a |
d4 cs a a | d4. cs8 ~ cs4 b ~ | b1 | R1 |
r4 cs4 b a | d4. e8 r4 a, | d4. e8 r2 | fs4 e e cs |
d4 c c b | a4. b8 ~ b4 c ~ | c1 | R1 |
r4 cs4 b a | d4. e8 r4 a, | d4. e8 r2 | d4 cs cs a |
d4 cs a a | d4 cs cs a | | b1 | R1 |
r4 cs4 b a | d4. e8 r4 a, | d4. e8 r2 | fs4 e e cs |
d4 c c b | a4 a a b8 c ~ | c1 | r4 c4 c8 d4. |
b1 ~ | b1 | R1 | r2 b8 cs4. |
\bar "||"
\textMark "Chorus"
d2. ~ d8 cs ~ | cs2 r2 | d2. ~ d8 e ~ | e2 r4 a, |
d4 cs cs b | b4 a a b8 c ~ | c1 | R1 |
d2. ~ d8 cs ~ | cs2 r4 a | fs'2( ~ fs8 g fs) fs( ~ | fs4 e) r4 r8 a, |
d4 cs cs b8 b ~ | b4 a a b | c1 | b |
% interlude
a2 r | R1*7 |
R1*8 |
R1*8 |
R1*8 |
R1*4 |
\bar "||"
\textMark "Verse 3"
r4 cs4 b a | d4. e8 r4 a, | d4. e8 r2 | d4 cs4 b( a) |
d4 cs b a | d4. cs8 ~ cs4 b ~ | b1 | R1 |
r4 cs4 b a | d4. e8 r4 a, | d4. e8 r2 | fs4 e e cs |
d4 c c b | a4. b8 ~ b4 c ~ | c1 | r4 c4 c8 d4. |
b1 ~ | b1 | R1 | r2 b8 cs4. |
\bar "||"
\textMark "Chorus"
d2. ~ d8 cs ~ | cs2 r2 | d2. ~ d8 e ~ | e2 r4 a, |
d4 cs cs b | b4 a a b8 c ~ | c1 | R1 |
d2. ~ d8 cs ~ | cs2 r4 a | fs'2( ~ fs8 g fs) fs( ~ | fs4 e) r4 r8 a, |
d4 cs cs b8 b ~ | b4 a a b | c1 | b |
a1 ~ | a1 | R1 | R1 |
}
allTheLyrics = \lyricmode {
% verse 1
There was a bright light, a star -- light,
beam -- ing down its won -- der __ for all to __ see. __
Then came a dark night, a last rite,
cast -- ing down a sha -- dow like it's meant to __ be. __
Or so it seems. __
% chorus 1
Will it shine __ on, __ shine __ long, __
or burn out like some dist -- ant mem -- o -- ry? __
Shine __ on, __ or die __ wrong. __
The on -- ly choice to make __ is how to fade a -- way. __
% verse 2
There was a young boy, who felt joy,
liv -- ing __ and play -- ing un -- der -- neath the __ stars. __
But this was de -- stroyed, null and void,
shat -- tered by a bott -- le and a do -- zen __ scars. __
He's now a grown man, with no plan,
haunt -- ed and em -- bitt -- ered by his youth -- ful tra-- ge -- dies.
It's now a last stand, while out -- manned,
fight -- ing for what once were all those cher -- ished mem -- or -- ies. __
Oh, hear his pleas. __
% chorus 2
Will he shine __ on, __ shine __ long, __
or burn out like some dist -- ant mem -- o -- ry? __
Shine __ on, __ or die __ wrong. __
The on -- ly choice to make __ is how to fade a -- way.
% verse 3
There was a mo -- ment, so co -- gent,
all the world __ stopped to watch this beam of __ light. __
But then de -- struc -- tion, re -- duc -- tion,
dark -- ness fell and with it our last will to __ fight.
Yet still so bright.
% chorus 3
Will we shine __ on, __ shine __ long, __
or burn out like some dist -- ant mem -- o -- ry? __
Shine __ on, __ or die __ wrong. __
The on -- ly choice to make __ is how we fade a -- way. __
}
guitarStaff = \new Staff \with { midiInstrument = "distorted guitar" midiMaximumVolume = #0.6 } {
\global
\guitar
}
vox = \new Staff \with { midiInstrument = "voice oohs" midiMinimumVolume = #0.7 } {
<<
\new Voice = "vocalMelody" { \clef treble \global \vocalMelody }
\new Lyrics \lyricsto "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 ef gf bf>1-\markup { \super { "ø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
)
chordValues = \chordmode {
\set chordNameExceptions = #chordExceptions
\set majorSevenSymbol = \markup "maj7"
\repeat volta 2 {
a1. a:/g fs:m7 d:m/f |
}
\alternative {
{ e1*2 | e | }
{ e1*2 | }
}
%{
\repeat volta 3 {
e1:1.3.5.7.9- | q | q | q |
}
q1 | q | q2.. |
c4.:1.5 d:1.5 | b:1.5 c:1.5 | a:1.5 b:1.5 | g:1.5 a:1.5 |
f4:1.5 g:1.5 |
%}
a1*4:1.5 |
% verse 1
a1*4 | a:/g | fs:m7 | d:m/f |
e1 | q | q | f |
% chorus
a1*6 | c1 | d |
a1*6 | f1 | g |
a1*2:1.3.5.9 | q | f:1.3.5.7+11+ | d:1.3-.5.6.9 |
a1*6 | e1*2 |
a1*6:m | e1*2:1.4.5.7 |
r1*4 |
% verse 2
a1*4:5 | g:/a | fs:m7/a | f1:maj7/a | q | e:5/a | d:5/a |
a1*4 | g:/a | fs:m7/a | d:m7/a |
e1:sus4 | q | e | q |
% chorus 2
a1*6 | c1 | d |
a1*6 | f1 | g |
% interlude
a1*4:m7 | f1*2:maj7 | g |
a1*2:m7 | a:7 | c1*2:maj7 | d1 | f2 g |
a1:1.4.5.7 | q2 g | a c | g f | g4. a8 a2 | d1:m | c2 g:/b | a:5 c4:/g g |
a1:1.4.5.7 | q2 g:m6/bf | a d:m/f | a:/e f:maj7/e | g4.:/d a8:/cs q2 | f2:/c c4. d8:m | q1 | c2 g4.:/b a8 |
a1 | q | q | q |
% verse 3
a1*4:5 | a:1.4.5.7 | a:6 | d:m9/a |
e1*3:5 | f1:5 |
% chorus 3
a1*6 | c1 | d |
a1*6 | f1 | g |
a1:1.3.5.9 | q | d:m | d2:m/c d:m/b |
\repeat volta 3 { e1*4:1.3.5.7.9- }
e1.:5 f:5 g2 q |
a1*6 | e1*2 |
e1 | q | q | q |
c2:sus4 c | g2:/b g |
a1:5 |
}
chordNames = \new ChordNames {
\set chordChanges = ##t
\set chordNameExceptions = #chordExceptions
\chordValues
}
\score {
<<
\chordNames
\vox
\guitarStaff
>>
\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 {
<<
\vox
\transpose c c, \guitarStaff
>>
}
\midi {}
}