\version "2.24.3"
\language "english"

\header {
  title = "Exit Music"
  subtitle = "for String Quartet"
  composer = "Radiohead"
  arranger = "H.N.M. DIjkema"
  copyright = "(c) H.N.M. DIjkema 2026 - CC-BY-NC-SA-3.0 - Lilypond 2.24"
  tagline = "(c) H.N.M. DIjkema 2026 - CC-BY-NC-SA-3.0 - Lilypond 2.24"
}

\paper {
  #(set-paper-size "a4")
  % Add space for instrument names
  indent = 25\mm
}

global = {
  \key c \major
  \time 4/4
}

\include "lilypond-hd/functions.ly"

scoreAViolinI = \relative c'' {
  \global
  % Music follows here.
  r1 | r1 | r1 | r1 | 
  fs,4 r4 r4 r4 r4 r8 g4( fs8-.) fs4 r4 r4 r4 r4 g4( fs4) fs2~ fs8 ( 
  e4 d4.-.) fs4.-. fs2.~ fs8 e2.~ e8 
  d4-. r r r r e4 d8-. cs4-. r r r cs-. cs2. cs1 b4
  %b4-. b4~ b4-. fs'2-. fs4~ fs2. e4~ e2 r4 r4 
}

scoreAViolinII = \relative c'' {
  \global
  % Music follows here.
  r4 fs,4. r8 fs8 r8 | \rep 3 {r4 fs4. r8 fs8 r8 |}
}

scoreAViola = \relative c' {
  \global
  % Music follows here.
  r4 d4. r8 d8 r8 | \rep 3 {r4 d4. r8 d8 r8 |}
}

scoreACello = \relative c {
  \global
  % Music follows here.
  b2. r4 | \rep 3 { b2. r4 |}
}

scoreAViolinIPart = \new Staff \with {
  instrumentName = "Violin I"
  midiInstrument = "violin"
} \scoreAViolinI

scoreAViolinIIPart = \new Staff \with {
  instrumentName = "Violin II"
  midiInstrument = "violin"
} \scoreAViolinII

scoreAViolaPart = \new Staff \with {
  instrumentName = "Viola"
  midiInstrument = "viola"
} { \clef alto \scoreAViola }

scoreACelloPart = \new Staff \with {
  instrumentName = "Cello"
  midiInstrument = "cello"
} { \clef bass \scoreACello }

\score {
  <<
    \scoreAViolinIPart
    \scoreAViolinIIPart
    \scoreAViolaPart
    \scoreACelloPart
  >>
  \layout { }
  \midi {
    \tempo 4=81
  }
}