music/album3/something2.ly

\version "2.24.0"
\language "english"

\header {
  title = "Something 2"
  composer = "Tommy Montgomery"
  copyright = "(c) 2023 Tommy Montgomery"
}

global = {
  \key fs \minor
  \set Staff.printKeyCancellation = ##f
  \numericTimeSignature
  % \compressFullBarRests
  \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 = 92
}

mainRiffBarOne = \relative c {
  fs8 fs'32 fs fs fs fs16( e) cs e ~ e cs( b) a b a gs e |
}

guitarOne = \relative c {
  \global
  \time 4/4

  \mainRiffBarOne
  fs8 fs'32 fs fs fs fs16( e) cs <e a> ~ q a, <fs' b> a, <fs' b>(\glissando <g c>\glissando <fs b> <e a>) |
  \mainRiffBarOne
  fs,8. gs16 ~ gs8 a ~ a16 e8. <c' e g b>4 ~ | q4 ~ q16 <cs es b' b e!>8 q16 ~ q8. q16 ~ q q8. |

  \time 1,1,1,1,1,1 6/4


  \tuplet 6/4 { a'16( b a) fs e cs } \tuplet 3/2 4 { b8 fs' fs, cs' e b'\glissando cs fs, a gs b, d cs g es } |

  \time 4/4

  \bar "||"

  \mainRiffBarOne
  fs8 fs'32 fs fs fs fs16( e) cs <e a> ~ q a, fs' a, g' a, fs' c |
  \mainRiffBarOne
  fs,8. gs16 ~ gs8 a ~ a16 e8. <b'' e>4  |

  \mainRiffBarOne
  fs,8 fs'32 fs fs fs fs16( e) cs e ~ e b'( a) fs \tuplet 6/4 { fs( e) cs cs b a } |
  \mainRiffBarOne
  <fs cs' fs>8. <gs ds' gs>16 ~ q8 <a e' a> ~ q16 <b fs' b>8. <cs gs' cs es>4 |

  \time 9/8
  \repeat unfold 2 { d16 fs gs d fs a } d, fs gs a gs fs |
  \repeat unfold 2 { e gs a e gs b } e, gs a b a gs |

  \time 4/4
  fs8 fs16 fs' ~ fs8 e ~ e16 cs8. b16 a gs e |
  fs8 fs16 fs' ~ fs8 e ~ e16 cs8 b16 a b cs e |

  \repeat unfold 2 { d16 fs gs d fs a } d, fs gs32 a gs fs |
  \repeat unfold 2 { e16 gs a e gs b } e, gs a32 b a gs |

  fs8. \grace e'8( fs16) ~ fs8 e ~ e16 cs16 b32( c b a) b16( a) fs( e) |
  fs8. gs16 ~ gs8 a8 ~ a16 b8. cs4 |

  fs,,,16 a gs cs fs a gs cs fs cs gs' d a' e b' es, |

  \time 12/8

  \bar "||"

  fs4. r4. r2. | R1*12/8*2 | r2. r4. r8 a,,8 gs |
  fs4. r4. r2. | R1*12/8*2 | r2. <bs fs'>16 q8 q8. <cs gs'>16 q8 q8. |


  fs,16^"bass" fs8 fs e16 fs8 r4 fs16 fs8 fs e16 fs8 e16 fs a b |
  fs16 fs8 fs e16 fs8 r4 fs16 fs8 fs e16 fs8 e16 fs a b |

  %{
  \repeat unfold 2 {
    fs,16 fs fs cs' cs cs e e e fs fs fs g fs e g |
    fs fs fs e e e cs cs cs  fs, fs fs
  }
  \alternative {
    { e fs g fs | }
    { e fs g b  | }
  }

  \repeat unfold 2 {
    cs cs cs g' g g b b b cs cs cs d cs b d |
    cs cs cs b b b g g g cs, cs cs
  }
  \alternative {
    { b cs d b | }
    { \tuplet 6/4 { d cs b b g e } | }
  }
  %}



}

guitarTwo = \relative c {
  \global

  R1*5 |
  R1*6/4 |

  R1*8 |
  R1*9/8*2 |

  <fs cs'>8. <e b'>16 ~ q8 <fs cs'> ~ q16 <e b'>8. <fs cs'>8 <e b'> |
  <fs cs'>8. <e b'>16 ~ q8 <fs cs'> ~ q16 <e b'>8 fs16 a b cs e |

  \repeat unfold 2 { d16 fs gs d fs a } d, fs gs32 a gs fs |
  \repeat unfold 2 { e16 gs a e gs b } e, gs a32 b a gs |
  fs8. e16 ~ e8 cs ~ cs16 b8. a16 b gs e |
  <fs cs' fs>8. <gs ds' gs>16 ~ q8 <a e' a> ~ q16 <b fs' b>8. <cs gs' cs es>4 |

  R1 |





  % fs''8. fs16 fs( g32 fs) e16 fs ~ fs8. fs16 fs( g32 fs) e16 fs ~ |
%   fs8.
}

vocalMelody = \relative c'' {
}

allTheLyrics = \lyricmode {
}

guitarOneStaff = \new Staff \with { midiInstrument = "distorted guitar" midiMaximumVolume = #0.6 }{ \global \guitarOne }
guitarTwoStaff = \new Staff \with { midiInstrument = "distorted guitar" midiMaximumVolume = #0.6 }{ \global \guitarTwo }


vox = \new Staff \with { midiInstrument = "voice oohs" midiMinimumVolume = #0.7 } {
  <<
    \new Voice = "vocalMelody" { \clef treble \global \vocalMelody }
  >>
}

demLyrics = \new Lyrics \lyricsto "vocalMelody" {
  <<
    \new Lyrics {
      \set associatedVoice = "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 {
  \global
  % \powerChords
  \set chordNameExceptions = #chordExceptions
  \set majorSevenSymbol = \markup "maj7"

  fs1:m | q | q | q2. c4:maj7 | q4 q16 cs8.:1.3.5.7.9+ q2 | R1*6/4 |

  fs1:m | q | q | q2. e4:1.5 |
  fs1:m | q | q | fs8.:5 gs:5 a:5 b:5 cs4 |

  d1:1.3.5.11+ q8 | e1 q8 | fs1:m | q |
  d1:1.3.5.11+ | e1 | fs1:m | fs8.:5 gs:5 a:5 b:5 cs4 |
  R1 |

  fs1.:m | a2. e | fs1.:m | d2. e |
  fs1.:m | a2. e | fs2.:m fs4.:m/gs fs:m/a | b2. gs4.:7/bs cs:7 |
}

chordNames = \new ChordNames {
  \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 {}
}