diff --git a/solara.ly b/solara.ly new file mode 100644 index 0000000..b5eb173 --- /dev/null +++ b/solara.ly @@ -0,0 +1,399 @@ +\version "2.18.2" +\language "english" + +\header { + title = "Solara" + composer = "Tommy Montgomery" + copyright = "(c) 2017 Tommy Montgomery" +} + +global = { + \key b \minor + \time 4/4 + \tempo 4 = 98 + \set Staff.printKeyCancellation = ##f + \numericTimeSignature + \compressFullBarRests + \omit Voice.StringNumber + \override TupletBracket #'bracket-visibility = #'if-no-beam + \override MultiMeasureRest.expand-limit = #3 +} + +fSharpRiff = \relative c { + \tuplet 6/4 { fs16 fs fs fs fs fs } fs fs' fs, fs fs fs' fs, fs fs fs' fs, fs | + \tuplet 6/4 { fs fs fs fs fs fs } fs fs' fs, fs fs fs' fs, fs' e( fs) g8 | +} + + +guitarOne = \relative c { + R1*8^\markup { "synth pad" } | + + \time 7/4 + fs16 cs' fs as b( as) fs cs fs, cs' fs as b( as) fs cs fs, cs' fs as b( as) cs( as) b( as) fs cs | + g d' g b cs( b) g d g, d' g b cs( b) g d g, d' g b cs( b) d( b) cs( b) g d | + fs, cs' fs as b( as) fs cs fs, cs' fs as b( as) fs cs fs, cs' fs as b( as) cs( as) b( as) fs cs | + \time 6/4 + e, b' e fs g\glissando( fs) e b e, b' e fs g\glissando( fs) e b \tuplet 6/4 4 { e, fs g b e fs g b e b fs' b, } + \time 4/4 + \grace fs'16( g2..) fs16( e) \bar "||" | + + \repeat unfold 2 { + << + { fs4. g8 ~ g4 fs | \grace fs16( g4 fs8) \grace fs16( g8) ~ g4. fs16( e) | fs4. g8 ~ g4 fs } \\ + { as,4. b8 ~ b4 cs | \grace cs16( d4 cs8) b ~ b4. e,16( fs) | as4. b8 ~ b4 cs } + >> + } + \alternative { + { + << + { \grace e16( g4) \grace e16( g8 e) ~ e2 | } \\ + { \grace d16( e4) \grace d16( e8 d) ~ d2 | } + >> + } + { + << + { b'2\glissando e2 | } \\ + { e,2\glissando b'2 | } + >> + } + } + + \repeat unfold 4 { + << + { fs1 | } \\ + { \grace e16( fs2 e2) | } + >> + } + + \repeat unfold 2 { + << + { fs16 fs fs fs fs fs' fs, fs fs fs' fs, fs fs fs' fs, fs | fs16 fs fs fs fs fs' fs, fs fs fs' fs, fs' e( fs) g8 | } \\ + { fs,,16 fs fs fs fs fs' fs, fs fs fs' fs, fs fs fs' fs, fs | fs16 fs fs fs fs fs' fs, fs fs fs' fs, fs' e( fs) g8 | } + >> + } + \repeat unfold 8 r1 | +} + + +guitarTwo = \relative c { + R1*8 | + R1..*3 | r1. | r1 | + + \repeat unfold 2 { + 4. 8 ~ q4. fs16 fs | + \glissando( ) ~ q4 8 ~ q4. g16 g | + \glissando( ) ~ q4 8 ~ q4. fs16 fs | + } + \alternative { + { 2 4 | } + { 2 4 | } + } + + \repeat unfold 4 { + 8 q16 q q q8 q16 q q8 q16 q q8 q16 | + q8 q16 q q q8 q16 q q8 q16 q q 8 | + } + + cs16-> b g fs cs'-> b cs-> b g fs cs'-> b cs-> b g fs | + d'-> b g fs d'-> b d-> b g fs d'-> b d-> b g fs | + cs'->( b) g fs cs'->( b) cs->( b) g fs cs'->( b) cs->( b) g fs | + d'->( b) g fs d'->( b) d->( b) g fs d'->( b) d->( b) g fs | + + 1 | 2 | + 1 | 1 | + + \repeat volta 2 \fSharpRiff + + cs16-> b g fs cs'-> b cs-> b g fs cs'-> b cs-> b g fs | + d'-> b g fs d'-> b d-> b g fs d'-> b d-> b g fs | + cs'->( b) g fs cs'->( b) cs->( b) g fs cs'->( b) cs->( b) g fs | + g8. d'16 ~ d8 b' 2 \bar "||" | + + R1*8^"f# riff 4x" | + + \repeat unfold 2 { + \tuplet 6/4 { g,16 g g g g g } g g' g, g g g' g, g g g' g, g | + \tuplet 6/4 { g16 g g g g g } g g' g, g g g' g, g' b( cs) d8 | + \tuplet 6/4 { a,16 a a a a a } a a' a, a a a' a, a' cs( d) e8 | + \tuplet 6/4 { b,16 b b b b b } b b b b b b b b b | + + } + \alternative { + { \tuplet 6/4 { b16 b b b b b } b b b b b b b b b | } + { \tuplet 6/4 { a16 a a a a a } a a a a a a a a a | } + } + + \bar "||" + + \repeat unfold 4 { b16 ds e } + \repeat unfold 4 { b ds fs } + \repeat unfold 4 { b, e g } + \repeat unfold 4 { b, ds fs } + \repeat unfold 4 { a, b ds } + e fs e ds | + \repeat unfold 4 { b16 ds e } + \repeat unfold 4 { b ds fs } + \repeat unfold 4 { b, e g } + \repeat unfold 4 { b, fs' a } + \repeat unfold 4 { b, fs' b } + a b c a | + + b8. a16 ~ a8 b ~ b8 b16 b a( b) ds( e) | + ds8. e16 ~ e8 fs ~ fs4 \tuplet 6/4 { e16 fs g a b c } | + b8. a16 ~ a8 b ~ b8 b16 b a( b) ds( e) | + \tuplet 6/4 4 { fs( e ds) b fs ds b ds fs b ds( fs) } b2^"+" \bar "||" | + + \repeat unfold 2 { + 16 8 16 8 16 ~ q q q 8 | + 16 8 16 8 16 ~ q q q 8 | + 16 8 16 8 16 ~ q q q 8 | + 8. 16 ~ q8 ~ q a,16 a 4 | + } + + 8. 16 ~ q8 ~ q q16 q d( e) f8 | + 8. 16 ~ q8 ~ q4. a16 e' | + a e a, g'! e a, fs' e fs( g32 fs) e16 d e d cs a | + b16 cs d cs d( cs) b cs b a b a b a gs e | + + % pre-chorus + \repeat unfold 3 { + 4 b16 b b8 8 b16 b | + 4 q16 8 ~ q2 | + } + 4 b16 b b8 8 b16 b | + 2 | + + b16 cs d cs d cs b cs b cs d e d e fs g | + e fs g fs g fs e fs e fs g a g a b c | + a b c b c b a b a b c d c d e f | + d e f e f e d e d e f g f g a bf | + fs gs a gs a gs fs gs fs gs a b! a b cs d | + cs ds e ds e ds cs ds cs ds e fs e fs gs a | + gs1 ~ | gs \bar "||" | + + % chorus + \key cs \minor + %{ + 4 cs16 cs cs cs 8 cs16 cs 8 ~ | + q4 cs16 cs cs cs 8 cs16 cs 8 ~ | + q4 b16 b b b 8 b16 b 8 ~ | + q4 b16 b b b 8 ds8( e16 ds) | + cs4 cs16 cs cs cs 8 cs16 cs 8 ~ | + q4 cs16 cs cs cs 8 cs16 cs 8 ~ | + q4 b16 b b b 8 b16 b 8 ~ | + q4 a16 a a a 8 ds8( e16 ds) | + %} + + \repeat unfold 2 { cs,,,16 gs' cs ds e ds e fs gs fs e ds e ds cs gs | } + \repeat unfold 2 { a, e' gs a cs a cs ds e ds cs a cs a gs e | } + \repeat unfold 2 { cs ds es gs cs gs cs ds es ds cs gs cs gs es ds | } + a cs fs gs a fs gs a cs a cs fs gs a gs fs | + gs ds cs ds bs ds a ds gs, ds' fs, ds' e, ds' ds, ds' | + + + +} + +vocalMelody = \relative c' { + R1*8 | + R1..*3 | r1. | r1 | + \repeat unfold 8 r1 | + \repeat unfold 8 r1 | + \repeat unfold 8 r1 | + \repeat volta 2 { r1 | r1 | } + \repeat unfold 3 r1 | + + r2 r4 fs | + % verse 1 + as2. b4 | cs2. d4 | cs2. b4 | cs2 r4 fs,4 | + as2. b4 | cs2. d4 | cs2. b4 | cs2 r4 as4 | + b2. d4 | cs4.( d16 cs b4) d | cs2. e4 | e8( ds4.) r2 | r2 r4 b | + b2. d!4 | cs4.( d16 cs b4) d | e2. e4 | fs2. r4 | r1 | + + r2 ds8 ds ds e ~ | e fs4 g8 ~ g g4 g8( | + fs4.) b,8 b b4 ds8 ~ | ds b b b( a4) r4 | + r2 ds8 ds ds e ~ | e fs4 g8 ~ g g4 g8( | + fs8) fs fs fs ~ fs fs4 a8 ~ | a b4 b8 ~ b2 | + + \repeat unfold 4 r1 | + + d,4. e8 ~ e4 b | d e8 e r4 r8 e8 | + g4. fs8 ~ fs4 fs8( e ~ | e2) r2 | + b16 b b b ~ b16 cs8 d16 ~ d8 d d16( cs8.) | + d16 d d d ~ d8 d16 d( cs8) b b b | + g'8. fs16 ~ fs8 g8 ~ g4.( fs16 e) ~ | e2 r2 | + + \repeat unfold 4 r1 | + + r4 b4 b8 d4 e8 ~ | e2. r4 | + r4 fs e d8 e ~ | e2. r4 | + r4 b4 b8 d4 e8 ~ | e2. r4 | + r8 b fs'4 e d8 e( ~ | e1 | d2) r2 | + + \repeat unfold 8 r1 | + + % chorus + + \key cs \minor + r4 e4 ds8( cs) cs fs ~ | fs4. e8 ~ e4 r4 | + r4 + +} + + +allTheLyrics = \lyricmode { + % verse 1 + These eyes, they see all that I dream, + all that I am, all that I'll be. + I once was lost __ but now I know __ + that strength will fade __ but still I'll grow. + + Fo -- llow me to __ the wa -- ter's edge, __ + it's bu -- ried deep __ in the sand. __ + All that you wished __ up -- on a star __ + can be gained __ by strength __ of hand. __ + + Un -- der __ the pale moon -- light, + the pain sub -- sides. __ + I -- ma -- ges of __ what might __ have been, __ + words that were ne -- ver said -- will + turn your glass to __ sand. __ + + And so I'll wait, __ + time af -- ter time. + Seek what you will, __ + the rest will be mine. __ + + + % chorus + I feel __ the wind blow % c#m + I feel the Sun shine down % b + I feel the tide pull me away % c#m b g# + I dream of something % c#m + more than I can ever do alone % b + So follow me down down down % c#m + Wherever I may go +} + + +guitarOneStaff = \new Staff \with { midiInstrument = "electric guitar (jazz)" }{ \global \guitarOne } +guitarTwoStaff = \new Staff \with { midiInstrument = "electric guitar (jazz)" }{ \global \guitarTwo } + + +vox = \new Staff \with { midiInstrument = "voice oohs" } { + << + \new Voice = "vocalMelody" { \clef treble \global \vocalMelody } + >> +} + +demLyrics = \new Lyrics \lyricsto "vocalMelody" { + << + \new Lyrics { + \set associatedVoice = "vocalMelody" + \allTheLyrics + } + >> +} + + +chordExceptionMusic = { + 1-\markup { "maj9" } + 1-\markup { "maj7" \sharp "11" } + 1-\markup { "m7sus4" } + 1-\markup { "dim7" } + 1-\markup { "add9" } + 1-\markup { "m(add9)" } + 1-\markup { \super { \sharp "11" \sharp "13" } } + 1-\markup { "5" } + 1-\markup { "maj7" } + 1-\markup { "add" \super { \sharp "11" } } + 1-\markup { "sus4" } + 1-\markup { "sus2" } + 1-\markup { "m(maj7)" } + 1-\markup { "m(maj9)" } +} + +chordExceptions = #(append + (sequential-music-to-chord-exceptions chordExceptionMusic #t) + ignatzekExceptions +) + +chordValues = \chordmode { + R1*8 | + + fs1.. | g:1.3.5.11+ | fs | e1.:m | q1 | + + fs | g:1.3.5.11+ | fs | e2:m e4:m6 e:m7 | + fs1 | g:1.3.5.11+ | fs | e2:m e4:m7 e:m6 | + + \repeat unfold 4 fs1 | + \repeat unfold 4 fs1 | + fs1 | g:maj7 | fs | g:maj7 | + e:m | e2:m6 e:m7 | b1:m | b:dim7 | + \repeat volta 2 { fs1 | fs2.. g8:1.5 | } + fs1 | g:maj7 | fs | g:1.3.5.11+ | + + % verse 1 + \repeat unfold 4 { fs1 | fs2.. g8:1.5 | } + g1 | g | a | b | b | + g1 | g | a | b | a:m | + + b1 | b2 e:m | q4 b2. | b1:7 | + b1 | b2 e:m | q4 b2.:7 | b1:1.5 | + b1:7 | q | q | q | + + % bridge or something + \repeat unfold 2 { + e2.:m g8 d:/fs | e2.:m d8:/fs g | + e2.:m g8 d:/fs | a1:/cs | + } + + d1:m | q4. e8:/gs q2 | a1:6 | e:9 | + + % pre-chorus or something + b1:m | e | b:m | e | b:m | e | b:m | g2:/d a:/cs | + + b1:m | e:m | a:m | d:m | fs:m | cs:m | gs | gs:7 | + + % chorus or something + cs:m | q | a:1.3.5.7+.11+ | q | cs | cs | fs:m/a | gs:1.3.5.7.9- | + +} + +chordNames = \new ChordNames { + \powerChords + \set majorSevenSymbol = \markup "maj7" + \set chordChanges = ##t + \set chordNameExceptions = #chordExceptions + \chordValues +} + +\score { + << + \chordNames + \vox + \demLyrics + \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, \vox + \transpose c c, \guitarOneStaff + \transpose c c, \guitarTwoStaff + >> + } + \midi {} +} diff --git a/solara.pdf b/solara.pdf new file mode 100644 index 0000000..d8d5de1 Binary files /dev/null and b/solara.pdf differ