\version "2.22.1"
\language "english"

\header {
  title = "Real Thing-ish"
  composer = "Tommy Montgomery"
  copyright = "(c) 2023 Tommy Montgomery"
}

global = {
  \key e \phrygian
  \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
}


guitar = \relative c {
  \tempo 4 = 75

  \repeat volta 4 {
    e8^"bass" e e'8. e,16 ~ e e8 f'16 ~ f e, d'8^"4x" |
  }
  \repeat volta 4 {
    e,8^"ac. gtr." e <e e' b' b e e>8. e16 ~ e e8 <e f' c' f b, e>16 ~ q8 <e d' a' d b e>^"3x" |
  }
  e8 e \ottava #1 \tuplet 6/4 { e''16\harmonic a\harmonic a\harmonic d\harmonic fs\harmonic b\harmonic } e4\harmonic \ottava #0 e,,,4\glissando |

  <e, b'>8 q r r16 <e b'> ~ q <e b'>8 <e b'>16 ~ q r16 r8 |
  <e b'>8 q r r16 <e b'> ~ q <e b'>8 <e b'>16 <d' g>4 |
  <e, b'>8 q r r16 <e b'> ~ q <e b'>8 <e b'>16 ~ q r16 r8 |
  <e b'>8 q r r16 <e b'> ~ q <e b'>8 e16 g( e) b' f |

}

vocalMelody = \relative c' {
}

allTheLyrics = \lyricmode {

}

guitarStaff = \new Staff \with { midiInstrument = "distorted guitar" midiMaximumVolume = #0.6 } {
  \global
  \guitar
}

vox = \new Staff \with { midiInstrument = "voice oohs" midiMinimumVolume = #0.7 } {
  <<
    \new Voice = "vocalMelody" { \clef treble \global \vocalMelody }
    \new Lyrics \lyricsto "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 {
  \set chordNameExceptions = #chordExceptions
  \set majorSevenSymbol = \markup "maj7"
}

chordNames = \new ChordNames {
  \set chordChanges = ##t
  \set chordNameExceptions = #chordExceptions
  \chordValues
}

\score {
  <<
    % \chordNames
    % \vox
    \guitarStaff
  >>
  \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 {
    <<
      \guitarStaff
    >>
  }
  \midi {}
}