447 lines
12 KiB
Plaintext
447 lines
12 KiB
Plaintext
\version "2.24.0"
|
|
\language "english"
|
|
|
|
\header {
|
|
title = "Castles in the Sky"
|
|
composer = "Tommy Montgomery"
|
|
copyright = "(c) 2024 Tommy Montgomery"
|
|
}
|
|
|
|
global = {
|
|
\key e \minor
|
|
\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
|
|
\tempo 4 = 81
|
|
}
|
|
|
|
mainBRiff = \relative c' {
|
|
ds16 b e b fs' b, ds e b fs' b, ds g b, fs' b, e b fs' b,
|
|
}
|
|
|
|
guitarOne = \relative c' {
|
|
\global
|
|
\time 5/4
|
|
|
|
\ottava #1
|
|
\repeat volta 4 { \transpose c c'' \mainBRiff^"4x" | }
|
|
\repeat unfold 4 { \transpose c c'' \mainBRiff }
|
|
\repeat unfold 2 { \transpose c c'' \mainBRiff }
|
|
e'' c fs c g' c, e fs c g' c, g' a d, g d fs d g d |
|
|
e g a e b' e, g a e b' e, a c b a g fs g fs e |
|
|
|
|
ds2. \ottava #0 r2 | R1*5/4*7 |
|
|
|
|
\repeat unfold 2 \transpose c c' \mainBRiff |
|
|
\repeat volta 2 \transpose c c' \mainBRiff |
|
|
|
|
\time 4/4
|
|
e,2.. g8 | fs2.. d8 | b2.. fs'8 | e1 |
|
|
e,2.. g8 | fs2.. g8 | a2.. c8 | b1 |
|
|
|
|
\time 7/16
|
|
|
|
\repeat unfold 2 {
|
|
% \repeat unfold 3 { b,8[ b16] c8[ a8] | }
|
|
b,8[ b16 b] b[( c) a] |
|
|
b8[ b16( c] a)[ b( c)] |
|
|
b8[ b16 b] b[( c) a] |
|
|
}
|
|
|
|
\alternative {
|
|
{ g16[ fs e] fs[ e g a] | }
|
|
{ g16[ e' fs a] b[ c,8] | }
|
|
}
|
|
|
|
|
|
% \repeat unfold 3 { b16[ b32 b b b] c16[ c32 c a16 a32 a] | }
|
|
b8[ b32 b b b] b16[( c) a]
|
|
b16[ c e g] fs[ c a] |
|
|
b8[ b32 b b b] b16[( c) a]
|
|
<g d'>16[(\glissando <fs cs'>) e] <fs cs'>([ e) <g d'>\glissando( <a e'>)] |
|
|
<b fs'>16[ b32 b b b b b] <b fs'>16\glissando[( <c g'>) <a e'>]
|
|
<b fs'>16[(\glissando <c g'>) e g] fs[ c a'] |
|
|
b32[ b b b b b b b] b16[( c) a]
|
|
% \repeat unfold 3 { <b fs'>16[ b32 b b b] <c g'>16[ c32 c <a e'>16 a32 a] | }
|
|
f8. <g, d' g>8[ <a e' a>] |
|
|
|
|
\bar "||"
|
|
b16[( d) fs( e)] g[ a c] |
|
|
b[( c) a g] fs[( g) ds] |
|
|
e[( g) bf( a)] b[ d! f] |
|
|
e[( f) gs a] b[(\glissando c) as] |
|
|
|
|
b[ c a! ds,] e[ g! b] |
|
|
bf,[ cs e g] a[( bf) g] |
|
|
fs[( g) ef d] cs[ g' as] |
|
|
b[ fs, g! b] ds[( e) as,]
|
|
|
|
b[( d!) fs( e)] g[ a! c] |
|
|
b[( c) a g] fs[( g) ds] |
|
|
e[( g) bf( a)] \ottava #1 b[ d! f] |
|
|
e[( f) gs( a)] b[(\glissando c) as] |
|
|
|
|
b[( fs) g( fs)] e[ b a!] \ottava #0 |
|
|
b[( fs) g( fs)] e[ b a] |
|
|
b[( c) b( as)] b[ e,,8] |
|
|
R1*2/4^"double other" |
|
|
|
|
R1*2/4*8 |
|
|
|
|
\ottava #1
|
|
\repeat unfold 4 { e'''16 b fs' b, g' b, e fs b, g' b, e a b, g' b, fs' b, g' b, | }
|
|
c e g c, a' c, e g c, a' c, e b' c, a' c, g' c, a' c, |
|
|
\repeat unfold 2 { e c g' c, a' c, e g c, a' c, e b' c, a' c, g' c, a' c, | }
|
|
b d e b g' b, d e b g' b, d b d e b gs' b, d( e) \ottava #0 |
|
|
|
|
\key a \minor
|
|
|
|
r8 b8 c8 r16 b16 ~ b c8. |
|
|
r8 f,8 g8 r16 f16 ~ f g8. |
|
|
r8 a8 g8 r16 a16 ~ a g8. |
|
|
r8 g8 a8 r16 g16 ~ g a8. |
|
|
|
|
r8 <b d>8 <c e>8 r16 <b d>16 ~ q <c e>8. |
|
|
r8 <c e>8 <b d>8 r16 <c e>16 ~ q <b d>8. |
|
|
r8 <a c>8 <b d>8 r16 <a c>16 ~ q <b d>8. |
|
|
r8 <c e>8 <b d>8 r16 <c e>16 ~ q <b d>8. |
|
|
|
|
\ottava #1
|
|
r8 <a c>8 <b d>8 r16 <c e>16 ~ q <b d>8. |
|
|
r8 <a c e>8 <b d e>8 r16 <c e a>16 ~ q <b d e>8. |
|
|
r8 <a c a'>8 <b d b'>8 r16 <c e c'>16 ~ q <b d b'>8. |
|
|
r8 <a c a'>8 <gs b gs'>8 r16 <f a d f>16 ~ q <d f a d>8. |
|
|
\ottava #0
|
|
|
|
\key e \mixolydian
|
|
|
|
R1*2 |
|
|
|
|
gs2 e4 gs8 a | b4 \grace b8( c8 b) a4. b16( a) |
|
|
gs2 e4 gs8( a16 gs) | fs2. a4 |
|
|
|
|
gs2 e4 gs8 a | b4 \grace b8( c8 b) c2 ~ |
|
|
c4 b8 a16 c d4 c8 b16 d | \ottava #1 << { r2 c'16 b a g fs g fs e } \\ { e1 } >> |
|
|
|
|
\key e \minor
|
|
\time 5/4
|
|
|
|
|
|
|
|
\repeat unfold 2 { \transpose c c'' \mainBRiff }
|
|
e16 c fs c g' c, e fs c g' c, g' a d, g d fs d g d |
|
|
e g a e b' e, g a e b' e, a c b a g fs g fs e \ottava #0 |
|
|
|
|
|
|
\mainBRiff^"lots of harm."
|
|
|
|
\mainBRiff
|
|
\mainBRiff
|
|
\time 17/16
|
|
ds,,16->[ b ds] e->[ b] fs'->[ b, fs'] g->[ b,] a'->[ b, a'] b8->[ c->] |
|
|
|
|
\time 5/4
|
|
b8. b16 b' b, r8 b16 b' b, b' a c ds e fs b, a c |
|
|
b8. b,16 b' b, r8 b16 b' b, b' c a b ds e fs e ds |
|
|
b8. b,16 b' b, r8 b16 b' b, b' a c ds fs e b a c |
|
|
b8 c16 a b8. g16 e fs8. fs16 ds e \tuplet 3/2 { ds32( e ds) } \tuplet 6/4 { c16 b a b c a } |
|
|
|
|
b16 b' c a b b, ds e b e fs b, fs' g fs e ds b c a |
|
|
b b' c a b b, fs' g b, e fs b, a' b b, ds' e fs b, a' |
|
|
b,, b' c a b b, ds e b e fs b, fs' g fs e ds b c e |
|
|
|
|
\time 19/16
|
|
ds16->[ b ds] e->[ b] fs'->[ b, fs'] g->[ b,] a'->[ b, a'] b8->[ c-> d!->] |
|
|
|
|
|
|
|
|
\key e \major
|
|
|
|
gs,2.^"w/ strings" e4. gs4 a8 | b4. ~ b8 \grace b8( c b) a4. ~ a4 b16( a) |
|
|
gs2. e4. gs4( a16 gs) | fs2. ~ fs4. a4. |
|
|
|
|
gs2. e4. gs4 a8 | b4. ~ b8 \grace b8( c b) c2. ~ |
|
|
c4. b8 a c d4. c8 b d | e1. |
|
|
|
|
\transpose c f' \mainBRiff^"repeat and fade" |
|
|
|
|
\bar "|."
|
|
|
|
}
|
|
|
|
guitarTwo = \relative c {
|
|
\global
|
|
|
|
\repeat volta 4 { R1*5/4 }
|
|
|
|
<fs b fs'>4 ~ q8. q16 ~ q q8 r16 r2 |
|
|
<fs b fs'>4 ~ q8. e32 e e e <e a e'>8. q8 q r8 e32 e e e |
|
|
<fs b fs'>4 ~ q8. q16 ~ q q8 r16 r2 |
|
|
ds'16 b e\glissando( g) fs8. g16 ~ g e a\glissando( c) b4 e,8 fs |
|
|
|
|
<b, fs'>2. ~ q4 <a e'>8 q | <b fs'>2. ~ q4 <a e'>8 <b fs'> |
|
|
<c g'>2. <d a'>2 | <e, b'>2. a'16 g fs e d? e d c |
|
|
|
|
b16 b' c a b b, ds e b e fs b, fs' g fs e ds b c a |
|
|
b b' c a b b, fs' g b, e fs b, a' b b, ds' e fs b, a' |
|
|
b,, b' c a b b, ds e b e fs b, fs' g fs e ds b c a |
|
|
b b' c a b b, g' fs b, g' a b, c' b a, c \tuplet 6/4 { b c a b g fs } |
|
|
|
|
% b b' c a b b, fs' g e fs b, e fs ds e \tuplet 3/2 { ds32( e ds) } \tuplet 3/2 { c16 b a } g fs |
|
|
|
|
% e e' f d e e, e' f d e e, e' f d e\glissando( f) a d f( e) |
|
|
% e,16 e' f d e e, e' f d e e, e' f d e e, a c b f |
|
|
e e' f d e e, e' f e, f' g e, f' e e, d' e f d8 |
|
|
|
|
e,16 e' f d e e, g' b, c fs e bf a f' gs, a c b e, f |
|
|
|
|
% e e' f d e e, e' f d e e, e' f d e\glissando( f) a d f( d) |
|
|
e e' f d e e, a' b c b a c b c e f b f e d |
|
|
e e' f d e b c a b f8. \tuplet 6/4 4 { g16 f e d c b a g f e d c } |
|
|
|
|
b8 b b r16 b16 ~ b b8 r16 <c g'>4 <a e'> |
|
|
b8 b b r16 b16 ~ b b8 r16 <a e'>4 <c g'> |
|
|
|
|
\repeat volta 2 {
|
|
<b fs'>16 b32 b <b fs'>16 b32 b <b fs'>16 b32 b b b
|
|
<b fs'>16 b32 b <b fs'>16 b32 b b b g'32 g g g fs fs fs fs e e e e fs fs fs fs |
|
|
}
|
|
|
|
\time 4/4
|
|
\repeat unfold 2 {
|
|
c16^"clean" e g b e b g e c e g b e b g e |
|
|
d fs g d' e d g, fs d fs g d' e d g, fs |
|
|
}
|
|
\alternative {
|
|
{ \repeat unfold 2 { e, b' e g e' b g e e, b' e g e' b g e | } }
|
|
{
|
|
a, e' b' c e c b e, a, e' b' c e c b e, |
|
|
<e, b' e>8 q16 q ~ q <f c' f>8 <g d' g>16 ~ q4 ~ q16 <a e' a>8. |
|
|
}
|
|
}
|
|
|
|
\bar "||"
|
|
|
|
\repeat unfold 3 { b16[ fs' c' b] e[ b c] | }
|
|
g,[ e' b' b] e[ b b] |
|
|
\repeat unfold 3 { b,16[ fs' c' b] e[ b c] | }
|
|
g,[ e' b' b] f,[ c' d] |
|
|
\repeat unfold 3 { b16[ fs' c' b] e[ b c] | }
|
|
g,[ e' b' b] e[ b b] |
|
|
\repeat unfold 3 { b,16[ fs' c' b] e[ b c] | }
|
|
f,,[ c' f] g[ d] a8 |
|
|
|
|
% modulation mayhem
|
|
R1*7/16*8 |
|
|
fs'16[ b d( cs)] e[ fs g] |
|
|
fs[( g) fs e] ds[( e) a,] |
|
|
b[ e g( fs)] f[ b d] |
|
|
b[( d) e( f)] fs[( g) e] |
|
|
|
|
fs[ b, c( b)] a[ fs\glissando( e)] |
|
|
fs[ b, c( b)] a[ fs\glissando( e)] |
|
|
b[ c b as] b[ e,8] |
|
|
|
|
\time 2/4 <f c' f>8 f16 <g d' g> ~ q <a e' a>8 b16 ~ |
|
|
|
|
b( d) fs!( e) g a c b ~ |
|
|
b( c) a g fs( g) ds e ~ |
|
|
e( g) bf( a) b d! f e ~ |
|
|
e( f) gs( a) b\glissando( c) as b ~ |
|
|
|
|
b b, e fs! g! fs e c ~ | c c, fs g a g fs d ~ |
|
|
d a d e f e d a | \tuplet 6/4 4 { bf b a bf gs a g gs fs g f fs } |
|
|
|
|
\time 5/4
|
|
|
|
<e b' e>4 ~ q8. q16 r q r8 r2 |
|
|
<e b' e>4 ~ q8. <a e' a>16 r <a e' b'> r8 c'16 b a fs e c b g |
|
|
e32 e e e <e b' e>16 e32 e <e b' e>16 r8. r4 a8 g fs g |
|
|
e8 fs g8 r16 a16 ~ a b8 r16 c b c d e g fs d |
|
|
|
|
e a b e, c' e, a b e, c' e, a d e, c' e, b' e, c' e, |
|
|
a f b f c' f, a b f c' f, a d f, c' f, b f c' f, |
|
|
a fs! b fs c' fs, a b fs c' fs, a d fs, c' fs, b fs c' fs, |
|
|
g b c g d' g, b c g d' g, b gs b c gs d' gs, b( c) |
|
|
|
|
\time 3/4
|
|
\key a \minor
|
|
a,16 a <a e' b'> a <a e' c'> a a <a e' b'> a <a e' c'> a a |
|
|
f f <f c' f> f <f c' g'> f f <f c' f> f <f c' g'> f f |
|
|
g g <g d' a'> g <g d' g> g g <g d' a'> g <g d' g> g g |
|
|
a a <a e' g> a <a e' a> a a <a e' g> a <a e' a> a a |
|
|
|
|
a a <a e' b'> a <a e' c'> a a <a e' b'> a <a e' c'> a a |
|
|
b b <b f' c'> b <b f' b> b b <b f' c'> b <b f' b> b b |
|
|
c c <c e a> c <c e b'> c c <c e a> c <c e b'> c c |
|
|
d d <d f c'> d <d f b> d d <d f c'> d <d f b> d d |
|
|
|
|
\repeat unfold 3 { e e <e a> e <e b'> e e <e c'> e <e b'> e e | }
|
|
e e <e a> e <e gs> e e <d a'> d <d a'>8. |
|
|
|
|
\bar "||"
|
|
|
|
\time 4/4
|
|
\key e \major
|
|
\repeat unfold 2 {
|
|
e,16 e <e b' e> e <e b' e> e e <e b' e> e <e b' e> e e e e e e |
|
|
}
|
|
|
|
\repeat unfold 3 {
|
|
e16 e <e b' e> e <e b' e> e e <e b' e> e <e b' e> e e e e e e |
|
|
}
|
|
b' b <b fs' b> b <b fs' b> b b <b fs' b> b <b fs' b> b b c b a gs |
|
|
|
|
e16 e <e b' e> e <e b' e> e e <e b' e> e <e b' e> e e e e e e |
|
|
fs fs <fs b fs'> fs <fs b fs'> fs fs <fs b fs'> fs <fs b fs'> fs fs fs fs fs fs |
|
|
g g <g c g'> g <g c g'> g g g a a <a d a'> a <a d a'> a a a |
|
|
<e b' e gs b e>8. q16 ~ q8 q <e c' fs a b e>2 |
|
|
|
|
\key e \minor
|
|
|
|
\repeat unfold 2 { <fs b fs'>8 q q r16 q r q r8 q q q q | }
|
|
<g c g'>8 q q r16 q r q r8 <a d a'> q q q |
|
|
<e b' e>8 q q r16 q r q r8 c'16 b a g fs g fs e |
|
|
|
|
R1*5/4*2 |
|
|
<fs b fs'>16-> fs q-> fs q-> fs fs q-> fs q-> fs fs g' b, fs' b, e b fs' b, |
|
|
|
|
<fs b fs'>8 r16 <fs b fs'>8 q r16 q8 q r16 b8[ a] |
|
|
|
|
\repeat unfold 2 {
|
|
b16 b' c a b b, ds e b e fs b, fs' g fs e ds b c a |
|
|
b b' c a b b, fs' g b, e fs b, a' b b, ds' e fs b, a' |
|
|
b,, b' c a b b, ds e b e fs b, fs' g fs e ds b c
|
|
|
|
%b16 b' c a b b, b' c a b b, b' c a b fs g e fs ds |
|
|
%b b' c a b b, b' c a b b, b' c a b ds e fs b fs |
|
|
%b,, b' c a b b, b' c a b b, b' c a b fs g e fs
|
|
|
|
}
|
|
\alternative {
|
|
{ a | b b' c a b b, fs' g e fs b, e fs ds e \tuplet 3/2 { ds32( e ds) } \tuplet 6/4 { c16 b a b c a } | }
|
|
{
|
|
e' |
|
|
ds16->[ b ds] e->[ b] fs'->[ b, fs'] g->[ b,] a'->[ b, a'] a,8->[ g-> fs->] |
|
|
}
|
|
}
|
|
|
|
|
|
\time 12/8
|
|
\tempo 4. = 54
|
|
\key e \mixolydian
|
|
|
|
<e b' e>4. <b'' e> <e,, b' e> <b'' e>8 gs, a |
|
|
<e b' e>4. <b'' e> <e,, c'>4. c'8 b a |
|
|
<e b' e>4. <b'' e> <e,, b' e> <b'' e>8 gs, a |
|
|
b4. ds fs c8 a fs |
|
|
|
|
<e b' e>4. <b'' e> <e,, b' e> <b'' e>8 gs, a |
|
|
<fs b fs'>2. <e c' a'>4. b'8 a b |
|
|
<g c g'>4. c8 b c <a d a'>4. a8 g fs |
|
|
e4. e8 gs! b c4. a |
|
|
|
|
\time 5/4
|
|
<e b' e gs b e>2. ~ q2\fermata |
|
|
|
|
}
|
|
|
|
guitarOneStaff = \new Staff \with { midiInstrument = "distorted guitar" midiMaximumVolume = #0.6 }{ \global \guitarOne }
|
|
guitarTwoStaff = \new Staff \with { midiInstrument = "distorted guitar" midiMaximumVolume = #0.6 }{ \global \guitarTwo }
|
|
|
|
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 {
|
|
\global
|
|
% \powerChords
|
|
\set chordNameExceptions = #chordExceptions
|
|
\set majorSevenSymbol = \markup "maj7"
|
|
|
|
\repeat volta 4 { b1*5/4 | }
|
|
\repeat unfold 4 b1*5/4 |
|
|
|
|
b1*5/4 | q | c2. d2 | e2.:m a2:m |
|
|
|
|
b1*5/4 | q | q | q |
|
|
e:m | q | q | q |
|
|
|
|
b1*5/4 | q | \repeat volta 2 q |
|
|
|
|
c1:maj7 | d | e:m | e4:m e:m/fs e:m/g e:m/a |
|
|
c1:maj7 | d | a:1.3-.5.9 | e4:5 q16 f8:5 g4.:5 a8.:5 |
|
|
|
|
b1*7/16:1.3.5.7.9- | q | q | e:m/g |
|
|
b1*7/16:1.3.5.7.9- | q | q | e4:m/g f8.:1.3.5.11+ |
|
|
b1*7/16:1.3.5.7.9- | q | q | e:m/g |
|
|
b1*7/16:1.3.5.7.9- | q | q | f8.:5 g8:5 a:5 |
|
|
|
|
% modulation mayhem
|
|
b4:m a8.:m | c4:maj7 b8.:7/ds | e4:dim b8.:dim | e4:1.3.5.7.9- fs8.:1.3.5-.7 |
|
|
b4:1.3.5.7.9- e8.:m | bf4:dim7 g8.:m | d4:1.3.5.7.9- a8:1.3.5.7.9- fs16:1.3.5.7.9-/as | b8:m g fs8.:7 |
|
|
|
|
}
|
|
|
|
chordNames = \new ChordNames {
|
|
\set chordChanges = ##t
|
|
\set chordNameExceptions = #chordExceptions
|
|
\chordValues
|
|
}
|
|
|
|
\score {
|
|
<<
|
|
\chordNames
|
|
\guitarOneStaff
|
|
\guitarTwoStaff
|
|
>>
|
|
\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, \guitarOneStaff
|
|
\transpose c c, \guitarTwoStaff
|
|
>>
|
|
}
|
|
\midi {}
|
|
}
|
|
|