diff --git a/radiohead-exit-music-string-quartet.ly b/radiohead-exit-music-string-quartet.ly new file mode 100644 index 0000000..9a2dbb1 --- /dev/null +++ b/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 + } +}