\version "2.12.2"
\include "italiano.ly"

global = {
  \tempo 4=90 
  \override Score.VerticalAxisGroup #'remove-first = ##t
  \numericTimeSignature
}

tenorVoiceI = \relative do' {
  \key mi \major
  \time 9/8
  \global
  \dynamicUp
  
}

verseTenorVoiceI = \lyricmode {
  
}

tenorVoiceII = \relative do' {
  \global
  \dynamicUp
  
}

classicalGuitarI = \relative do' {
  \key mi \major
  \time 9/8
  \global
 
}

classicalGuitarII = \relative do' {
  \key mi \major
  \time 9/8
  \global

}

fuzzGuitar = \relative do' {
  \key mi \major
  \time 9/8
  \global
  
  <mi,, si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
  <mi si' mi>8 [<mi si' mi> <mi si' fad'> <mi si' mi>] 
    <mi si' si'> [<mi si' mi> <mi si' mi>] <mi si' mi> [<mi si' fad'>] |
}

distortedGuitar = \relative do' {
  \key mi \major
  \time 9/8
  \global

}

electricBass = \relative do, {
  \key mi \major
  \time 9/8
  \global

}

flute = \relative do'' {
  \key mi \major
  \time 9/8
  \global

}

drum = \drummode {
  \time 9/8
  \global  

}

rightOrgan = \relative do'' {
  \key mi \major
  \global
  
  \time 7/8 
  la'4 sold16 [la si8] mi, [red16 mi fad8] |
  si, [lad16 si] dod8 [fad,16 sold] lad [si dod red] mi [sold32 fad] |
  \time 2/4
  sold8 [fad] fad [\times 2/3 {dod16 fad sold]} |
  dod8 [\times 2/3 {fad,16 sold fad]} dod8 [\times 2/3 {dod16 fad sold]} |
  dod8 [\times 2/3 {fad,16 sold fad]} dod8 fad16 sol |
  fad re dod re dod la sold la |
  sold mi dod' re dod la sold la |
  sold mi lad si lad fad lad si |
  lad re lad si lad fad lad si |
  \time 7/8 
  lad [re fad, sold lad si] dod [red mi sold] fad4 |
  \times 2/3 {la,16 [re fad} la8] \times 2/3 {sol16 [fad mi} fad8] 
    \times 2/3 {la,16 [re fad} \times 2/3 {la sol fad} sol8] |
  \times 2/3 {si,16 [mi sol} si8] \times 2/3 {la16 [sol fad} sol8] 
    \times 2/3 {si,16 [mi sol} \times 2/3 {si la sol} la8] |
  \times 2/3 {mi16 [la dod} mi8] \times 2/3 {re16 [dod si} dod8] 
    \times 2/3 {mi,16 [la dod} \times 2/3 {mi red dod} red8] |
  \times 2/3 {fad,16 [si red} fad8] \times 2/3 {mi16 [red dod} red8] 
    \times 2/3 {fad,16 [si red} \times 2/3 {fad mi red} mi8] |
  \time 2/4
  \set tupletSpannerDuration = #(ly:make-moment 1 8)
  \times 2/3 {si,16 [mi sol] si [la sol] fad [sol la] red, [mi fad]} |
  \times 2/3 {si, [mi sol] si [la sol] fad [sol la] red, [mi fad]} |
  \times 2/3 {si, [mi sol] si [la sol] fad [sol la] red, [mi fad]} |
  \times 2/3 {si, [mi sol] si [la sol] fad [sol la] red, [mi fad]} |
  \time 3/8
  \times 2/3 {do [re red] la [si do] mi [fad sol]} |
  \time 2/4
  \times 2/3 {do, [re red] la [si do] fad, [sol la] sold [la si]} |
  \times 2/3 {la16 [si dod] si [dod re] dod [si la] sold [la si]} |
  \times 2/3 {la16 [si dod] si [dod re] dod [si la] sold [la si]} |
  \times 2/3 {la16 [si dod] si [dod re] dod [si la] si [la si]} |
  \times 2/3 {dod [si dod] red [dod red]} mi8 \times 2/3 {si16 [la si]} |
  \time 3/4
  \times 2/3 {dod [si dod] red [dod red]} mi8 \times 2/3 {si16 [la si]}
    \times 2/3 {dod [si dod] red [dod red]} |
  \time 4/4
  mi4 fad sol la |
  si dod re mi |
  #(set-octavation 1)
  fad mi si mi |
  fad mi si mi |
  sol8 fad mi re sol fad mi re |
  sol16 fad mi re sol fad mi re sol fad mi re sol fad mi re |
  do re mi fad do re mi fad do re mi fad do re mi fad |
  sol fad mi re sol fad mi re sol fad mi re sol fad mi re |
  do re mi fad do re mi fad do re mi fad do re mi fad |
  sol fad mi re sol fad mi re sol fad mi re sol fad mi re |
  do re mi fad do re mi fad do re mi fad do re mi fad |
  dod re mi fad dod re mi fad dod re mi fad dod re mi fad |
  red mi fad sold red mi fad sold red mi fad sold red mi fad sold |
  la sold fad mi la sold fad mi la sold fad mi la sold fad mi |
  lad sold fad mi lad sold fad mi lad sold fad mi lad sold fad mi |
  si' lad sold fad si lad sold fad si lad sold fad si lad sold fad |
  si lad sold fad #(set-octavation 0) mi red dod si 
    lad sold fad sold lad sold fad sold |

}

leftOrgan = \relative do' {
  \key mi \major
  \time 4/4
  \global
  
}

pedal = \relative do {
  \key mi \major
  \time 4/4
  \global

}

stringsright = \relative do'' {
  \key mi \major
  \time 9/8
  \global
  
}

stringsleft = \relative do' {
  \key mi \major
  \time 9/8
  \global

}

electricPianoright = \relative do'' {
  \key mi \major
  \time 9/8
  \global

}

electricPianoleft = \relative do' {
  \key mi \major
  \time 9/8
  \global

}

tubularBells = \relative do'' {
  \key mi \major
  \time 9/8
  \global

}

tenorVoiceIPart = \new Staff \with {
  instrumentName = "Peter"
  shortInstrumentName = "Peter"
  midiInstrument = "voice oohs"
  \consists "Ambitus_engraver"
} { \clef "treble_8" \tenorVoiceI }
\addlyrics { \verseTenorVoiceI }

tenorVoiceIIPart = \new Staff \with {
  instrumentName = "Phil"
  shortInstrumentName = "Phil"
  midiInstrument = "voice oohs"
  \consists "Ambitus_engraver"
} { \clef "treble_8" \tenorVoiceII }

classicalGuitarIPart = \new StaffGroup \with {
  \consists "Instrument_name_engraver"
  instrumentName = "Ac. Guit. I"
  shortInstrumentName = \markup {
    \column { "Acous."
    \line { "Guitar 1"} } }
  } <<
  \new Staff \with {
    midiInstrument = "acoustic guitar (nylon)"
    } { \clef "treble_8" \classicalGuitarI }
  >>

classicalGuitarIIPart = \new StaffGroup \with {
  \consists "Instrument_name_engraver"
  instrumentName = "Ac. Guit. II"
  shortInstrumentName = \markup {
    \column { "Acous."
    \line { "Guitar 2"} } }
  } <<
  \new Staff \with {
    midiInstrument = "acoustic guitar (nylon)"
    } { \clef "treble_8" \classicalGuitarII }
  >>

fuzzGuitarPart = \new StaffGroup \with {
  \consists "Instrument_name_engraver"
  instrumentName = "Fuzz Guitar"
  shortInstrumentName = \markup {
    \column { "Fuzz"
    \line { "Guitar"} } }
  } <<
  \new Staff \with {
    midiInstrument = "electric guitar (clean)"
    } { \clef "treble_8" \fuzzGuitar }
  >>

distortedGuitarPart = \new StaffGroup \with {
  \consists "Instrument_name_engraver"
  instrumentName = "Distorted Guitar"
  shortInstrumentName = \markup {
    \column { "Dist."
    \line { "Guitar"} } }
  } <<
  \new Staff \with {
    midiInstrument = "distorted guitar"
    } { \clef "treble_8" \distortedGuitar }
  >>

electricBassPart = \new Staff \with {
  instrumentName = "Electric Bass"
  shortInstrumentName = \markup {
    \column { "Elect."
    \line { "Bass"} } }
  midiInstrument = "electric bass (finger)"
  } { \clef "bass_8" \electricBass }

flutePart = \new Staff \with {
  instrumentName = "Flute"
  shortInstrumentName = "Flute"
  midiInstrument = "flute"
  } \flute

drumsPart = \new DrumStaff \with {
  \consists "Instrument_name_engraver"
  instrumentName = "Drums"
  shortInstrumentName = "Batt."
  } \drum

organPart = <<
  \new PianoStaff \with {
  instrumentName = \markup {
    \column { "Hammond"
    \line { "Organ"} } }
  shortInstrumentName = \markup {
    \column { "Ham."
    \line { "Organ"} } }
  } <<
  \new Staff = "right" \with {
    midiInstrument = "drawbar organ"
    } \rightOrgan
  \new Staff = "left" \with {
    midiInstrument = "drawbar organ"
    } { \clef bass \leftOrgan }
  \new Staff = "pedal" \with {
    midiInstrument = "drawbar organ"
    } { \clef "bass_8" \pedal }
  >>
>>

stringsPart = \new PianoStaff \with {
  instrumentName = "Mellotron"
  shortInstrumentName = "Mello."
  } <<
  \new Staff = "right" \with {
    midiInstrument = "string ensemble 1"
    } \stringsright
  \new Staff = "left" \with {
    midiInstrument = "string ensemble 1"
    } { \clef bass \stringsleft }
  >>

electricPianoPart = \new PianoStaff \with {
  instrumentName = "Electric Piano"
  shortInstrumentName = \markup {
    \column { "Elect."
    \line { "Piano"} } }
  } <<
  \new Staff = "right" \with {
    midiInstrument = "electric piano 1"
    } \electricPianoright
  \new Staff = "left" \with {
    midiInstrument = "electric piano 1"
    } { \clef bass \electricPianoleft }
  >>

tubularBellsPart = \new Staff \with {
  instrumentName = "Tubular Bells"
  shortInstrumentName = \markup {
    \column { "Tubul."
    \line { "Bells"} } }
  midiInstrument = "tubular bells"
  } \tubularBells

\score {
  <<
    \tenorVoiceIPart
    \tenorVoiceIIPart
    \classicalGuitarIPart
    \classicalGuitarIIPart
    \fuzzGuitarPart
    \distortedGuitarPart
    \electricBassPart
    \flutePart
    \drumsPart
    \organPart
    \stringsPart
    \electricPianoPart
    \tubularBellsPart
  >> 
  %{\header {
    title = ""
    poet = " "
  }%}
  \layout { 
    indent = 2\cm
    short-indent = 0.65\cm
    \context { \RemoveEmptyStaffContext }
    \context { 
      \DrumStaff 
      \remove "Axis_group_engraver" 
      \override VerticalAxisGroup #'remove-empty = ##t 
      \consists "Hara_kiri_engraver" 
    } 
    \context { 
      \Score 
      \remove "Timing_translator" 
      \remove "Default_bar_line_engraver" 
    } 
    \context { 
      \Staff 
      \consists "Timing_translator" 
      \consists "Default_bar_line_engraver" 
    } 
    \context { 
      \Voice 
      tupletFullLength = ##t 
    } 

  }
  
  \midi { }
}