ja

radiohead-exit-music-string-quartet.ly

@@ -0,0 +1,83 @@
+\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 g8( fs4) r8 fs8~ fs8 r4. r4 r4 r4 g4( fs4) fs2~ 
+  fs4 b,4-. 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=61
+  }
+}