music/battle-galaxy.ly

\version "2.14.2"
\language "english"

\header {
  title = "To the Stars!"
  composer = "Tommy Montgomery"
  copyright = "(c) 2014 Tommy Montgomery"
}

ambience = \relative c'' {
  \ottava #'1
  e8\mf a b e b a b' a |
  e,8 a b e b a b' a |
  \repeat unfold 2 { gs a gs e fs g fs d }
  \repeat unfold 2 { fs g fs d e f e c }
 
  \ottava #'0
  fs16 g fs e ds e ds c b c b g fs g fs e |
  ds e ds c b c b g fs g fs e ds e ds b | 
  e2 r2 |
  
  \repeat unfold 7 r1
  r4 c'8 b g fs e ds | e2 r2 |
  \repeat unfold 7 r1 |
  r16 b\<\mp ds fs b b ds fs \ottava #'1 b b ds fs b4\!\mf|
  
  \repeat unfold 2 { e,,8 a b e b a b' a }
  \repeat unfold 2 { fs, a b fs' b, a cs' a }
  \repeat unfold 2 { gs, b e fs e b e' b }
  \repeat unfold 2 { a, d e a e d c' b }
  
  \ottava #'0
  \repeat unfold 2 { a16 gs e b a gs e b a gs e b a gs e b }
  \repeat unfold 2 { g''''16 fs d a g fs d a g fs d a g fs d a }
  \repeat unfold 2 { a''''16 gs e b a gs e b a gs e b a gs e b }
  \repeat unfold 2 { g''''16 fs d a g fs d a g fs d a g fs d a }
  
  r1 | r8 c' e fs ~ fs g4 a8 ~ | 
  a1 ~ | a8 c e fs ~ fs g4 a8 |
  b1 ~ | b1 |
  
  \repeat unfold 15 \repeat unfold 2 { e,,8 e' e' e, }
  \repeat unfold 2 { ds, ds' ds' ds, }
}

basicBassLine = \relative c, {
  e8 b' e4 e,8 e e'4 |
}

global = {
  \key e \major
  \set Staff.printKeyCancellation = ##f
  \numericTimeSignature
  \override TupletBracket #'bracket-visibility = #'if-no-beam
  \set Score.connectArpeggios = ##t
  \time 4/4
  \tempo 4 = 160
}

pad = \new Staff \with {
  instrumentName = "Pad"
  midiInstrument = #"pad 1 (new age)"
} { 
  \clef treble \relative c'' {
    \global
    \ambience
  }
}

goblins = \new Staff \with {
  instrumentName = "Goblins"
  midiInstrument = #"fx 6 (goblins)"
} { 
  \clef treble \relative c'' {
    \global
    \ambience
  }
}

strings = \new Staff \with {
  instrumentName = "Strings"
  midiInstrument = #"string ensemble 1"
} { 
  \clef treble \relative c'' {

    \global
    \repeat unfold 16 r1
    r4 c8\mf b g fs e ds |
    
    <e gs b>1 ~ |
    <es gs b> |
    <fs a cs> ~ |    
    <fs b d> ~ |
    
    <fs as cs> |
    <g b d>2. ~ q8 ~ <g a d> ~ |
    q4. ~ <fs a d>8 ~ q4. ~ <g a e'>8 ~ |
    <g a e'>1 |
    <fs b ds> |
    
    <e a b e> ~ | <e a b e> ~ | <fs a b fs'> ~ | <fs a b fs'> ~ |
    <e fs b e> ~ | <e fs b e> | <d a' c d> ~ | <d a' c d> |
    
    \repeat unfold 2 {
      <e, e' e'> 1 ~ | <e e' e'> | <d d' d'>1 ~ | <d d' d'>
    }
    
    \repeat unfold 4 { <c' fs>16[ r <c fs>] r r8 <c fs>16 r <c fs>[ r <c fs>] r r8 <c fs>16 r }
    <b b'>4.->\ff <a a'>8-> ~ q4 <g g'>-> ~ | q8 <a a'>4.-> <b b'>2-> |
    
    \clef bass
    <c, c'>4.\f <d d'>8 ~ q4 <e e'> ~ | q1 |
    <c c'>4. <d d'>8 ~ q4 <e e'> ~ | q1 |
    \repeat unfold 2 { <e e'>4. <fs fs'>8 ~ q4 <g g'> ~ | q1 | }
    \clef treble
    \repeat unfold 2 { <g g'>4. <a a'>8 ~ q4 <bf bf'> ~ | q1 | }
    <a a'>4. <b? b'?>8 ~ q4 <c c'> ~ | q1 |
    <a a'>4. <c c'>8 ~ q4 <b b'> ~ | q1 |
  }
}

lead = \new Staff \with {
  instrumentName = "Square"
  midiInstrument = #"lead 1 (square)"
} { 
  \clef treble \relative c' {
    \global
    \repeat unfold 8 r1
    
    e4.\mf b8 gs' a b b ~ |
    b b, a' <b, gs'>8 ~ <b gs'> a' gs <a, fs'> ~ |
    <a fs'>4. a8 cs e fs <a, fs'> ~ |
    <a fs'>4 q8 <a g'> ~ q <a fs'>4 <a e'>8 ~ |
    
    q <b d>4 <a cs>8 ~ q a4 <g b>8 ~ |
    q4. g8 a b cs <a d>8-> ~ |
    q cs d e-> ~ e c a f-> ~ |
    f4. g8 ~ g a4 b8 ~ |
    b1 |
    
    e'4.\f b8 gs' a b b ~ |
    b cs, a' <cs, gs'>8 ~ <cs gs'> a' gs <a, fs'> ~ |
    <a fs'>4. a8 cs e fs <b, fs'> ~ |
    <b fs'>4 q8 <b e g> ~ q <b d fs>4 <cs e>8 ~ |
    
    q <b d>4 <as fs>8 ~ q fs4 <g b>8 ~ |
    q4. <g cs>8 ~ q <a d>4 <g a d>8-> ~ |
    q4. <fs a d>8-> ~ q4. <g a e'>8-> ~ |
    q4. g8 g a e' ds ~ |
    ds1 |
    
    \repeat unfold 16 r1
    r8 c, e fs ~ fs g4 a8 ~ | a1 ~ |
    a8 c e fs ~ fs g4 a8 ~ | a1\< |
    b8->\!\ff c16 b a8 b-> c16 b a8 b-> c16 b |
    a8 b-> c16 b a8 b2-> |
    
    e,,8\mf e' e' e,
    \repeat unfold 29 { e,8 e' e' e, }
    ds, ds' ds' ds, ds, ds' ds' ds, \bar "|." |
  }
}

flute = \new Staff \with {
  instrumentName = "Flute"
  midiInstrument = #"pan flute"
} \relative c'' {
  \global
  
  \repeat unfold 8 r1
  \repeat unfold 8 r1
  r2 r4 g8\mf a |
  
  b4. e,8 e' fs gs gs ~ |
  gs gs, fs' es ~ es fs es cs ~ |
  cs4. fs,8 a cs e d ~ |
  d4 d8 e ~ e d4 cs8 ~ |
  
  cs b4 as8 ~ as fs4 g8 ~ |
  g4. a8 ~ a e4 g8-> ~ |
  g4. fs8-> ~ fs4. c'8-> ~ |
  c4. c8 c b a b8 ~ |
  b8 c b e ds g fs ds |
  \repeat unfold 16 r1 
  r8 c, e fs ~ fs e4 fs8 ~ | fs1 ~ |
  fs8 a c d ~ d e4 fs8 ~ | fs1\< |
  b8->\ff c16 b a8 fs-> g16 fs e8 ds-> e16 ds |
  c8 b-> c16 b a8 b2-> |
  
  c,8\mf d e c d e c d | e c d e c d e c |
  d e c d e c d e | c d e c d e c d |
  e fs g e fs g e fs | g e fs g e fs g e |
  fs g e fs g e fs g | e fs g e fs g e fs |
  g a bf g a bf g a | bf g a bf g a bf g |
  a bf g a bf g a bf | g a bf g a bf g a |
  b? c a b c a b c | a b c a b c a b |
  c a b c a b c a | b4. cs?8 ~ cs4 ds |
}

bass = \new Staff \with {
  instrumentName = "Bass"
  midiInstrument = #"synth bass 1"
} { 
  \clef bass \relative c, {
    \global
    \repeat unfold 8 r1
    
    
    << { \revert Stem #'direction \basicBassLine } \\ { s1\mf } >> |
    \transpose e b, \basicBassLine |
    \transpose e fs \basicBassLine |
    \transpose e d \basicBassLine |
    
    \transpose e a \basicBassLine |
    \transpose e g \basicBassLine |
    fs8 d' fs d f, c' f c |
    \transpose e c \basicBassLine |
    \transpose e b \basicBassLine |
    
    \basicBassLine |
    es,8 cs' es4 es,8 es es'4 |
    \transpose e fs \basicBassLine |
    b,8 fs' b4 e,8 b' e4 |
    
    \transpose e fs \basicBassLine |
    \transpose e g \basicBassLine |
    <a, a'>4. <d, d'>8 ~ q4. <c c'>8 |
    \transpose e c \basicBassLine |
    \transpose e b, \basicBassLine |
    
    e2\f ~ e8 b'4 e8 ~ | e2 ~ e8 b4 fs8 ~ |
    fs2 ~ fs8 a4 cs8 ~ | cs2 ~ cs8 fs4 e8 ~ |
    e2 ~ e8 b4 e,8 ~ | e2 ~ e8 d4 c8 ~ |
    c2 ~ c8 a'4 c8 ~ | c2 ~ c8 <d,  d'>4. |
    
    \repeat unfold 2 {
      <e e'>4. <gs gs'>8 ~ q4 <e e'> |
      <a a'>4. <gs gs'>8 ~ q4 <e e'> |
      <d d'>4. <fs fs'>8 ~ q4 <d d'> |
      <g g'>4. <fs fs'>8 ~ q4 <d d'> |
    }
    
    \repeat unfold 4 { <c c'>8 q r <c c'> q q r <c c'> }
    b'8 c16 b a8 b c16 b a8 b c16 b |
    a8 b c16 b a8 b2 |
    
    \repeat unfold 2 { <c, c'>4. <d d'>8 ~ q4 <e e'> ~ | q1 | }
    \repeat unfold 2 { <e e'>4. <fs fs'>8 ~ q4 <g g'> ~ | q1 | }
    \repeat unfold 2 { <g g'>4. <a a'>8 ~ q4 <bf bf'> ~ | q1 | }
    <a a'>4. <b b'>8 ~ q4 <c c'> ~ | q1 |
    <a a'>4. <c c'>8 ~ q4 <b b'> ~ | q1 |
  }
}
percussion = \new DrumStaff \with {
  instrumentName = "Drums"
} \drummode {
  \global
  \repeat unfold 8 r1
  
  \repeat unfold 5 { r4 hh r hh }
  
   r4 hh r  hh8 <sn cymca> |
   r4 hh8 <sn cymca> r4 hh8 <sn cymca> |
   r4 hh r hh8 <sn cymca> |
   r2 r4 <sn tomh>8 <sn toml> |

  \repeat unfold 3 { <bd hh>8 hh <sn hho> hh <bd hh>8 hh <sn hh> <bd cyms> }
  <bd hh>8 hh <sn hho> hh <bd hh>8 hh <sn hho> tomh16 toml |
  \repeat unfold 2 { <bd hh>8 hh <sn hho> hh <bd hh>8 hh <sn hh> <bd cyms> }
  <bd hh>8 hh <sn hho> <sn cyms> bd hh <sn hho> <sn cymca> |
  bd hh <sn hho> hh <bd hh> hh <sn hho> <sn cymca> |
  <bd hh> hh tomh16 tommh tomml toml <sn cyms> cymca sn sn <tomh cymca> toml <sn cyms>8 |
  
  cymc8 cymr
  \repeat unfold 31 { <ss cymr> <cymr hhp> }
  
  \repeat unfold 8 { <sn cymc>8 hhc16 hhc hh8 <sn cymc>8 hhc16 hhc hh8 <sn cymc> hhc }
  
  \repeat unfold 4 { <bd cymc> bd hho r sn r hho r }
  <sn cymc>8 r r <sn cymc> r4 <sn cymc>8 r |
  r <sn cymc>8 r4 <sn cymc>8 r r hho |
  
  \repeat unfold 7 { <sn cymc>8 r r <sn cymc>8 r4 <sn cymc>8 r | r4 hho hho hho }
  <sn cymc>8 r r <sn cymc>8 r4 <sn cymc>8 r | r4 sn8 sn sn sn <sn cymc>4 |
}
 
sweeper = \new Staff \with {
  instrumentName = "Sweep"
  midiInstrument = #"pad 8 (sweep)"
} \relative c, {
  \global
  \clef bass
  \repeat unfold 6 r1
  <b b'>1\p\< ~ | <b b' b'> | r1\! |
  
  
  \repeat unfold 8 r1
  \repeat unfold 9 r1
  <e e'>1\f ~ | <e e'> | <fs fs'> ~ | <fs fs'> |
  <gs gs'> ~ | <gs gs'> | <a a'> ~ | <a a'> |
  \repeat unfold 2 {
    <e e' e'> ~ | <e e' e'> | <d d' d'> ~ | <d d' d'> 
  }
  
  <c c' c'>1 ~ | q ~ | q ~ | q |
  <b b' b'>1 ~ | q |
  \repeat unfold 7 { <c c' c'>\<\mp ~ | q\!\ff | }
  <c c' c'>1 | <b b' b'> |
}

\score {
  <<
    \lead
    \flute
    \pad
    \goblins
    \strings
    \sweeper
    \bass
    \percussion
  >>
  \layout { 
    \context {
      \Staff \RemoveEmptyStaves
    }
  }
  \midi {}
}