music/album4/halloween.ly
2025-05-02 12:39:08 -07:00

207 lines
4.9 KiB
Plaintext

\version "2.24.0"
\language "english"
\header {
title = "Halloween Camp"
composer = "Tommy Montgomery"
tagline = ""
}
global = {
\set Staff.printKeyCancellation = ##f
\numericTimeSignature
\compressEmptyMeasures
\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
\override Staff.OttavaBracket.font-series = #'normal
\set Staff.ottavationMarkups = #ottavation-simple-ordinals
\tempo 4 = 160
\key d \minor
}
guitarOne = \relative c' {
\time 6/4
\global
\repeat unfold 4 { f8 a d f d a } |
\repeat unfold 4 { f8 af c f c af } |
\repeat unfold 2 { e8 gs b e b gs } |
\repeat unfold 2 { e8 gs b d b gs } |
\repeat unfold 2 { e8 a cs e cs a } |
\repeat unfold 2 { e8 g cs e cs g } |
\repeat unfold 4 { f8 a d f d a } |
\repeat unfold 2 { g8 bf d g d bf } |
\repeat unfold 2 { g8 bf d f d bf } |
\repeat unfold 2 { g8 c e g e c } |
\repeat unfold 2 { gs8 c e gs e c } |
\repeat unfold 2 { a8 cs e a e cs } |
a8 cs e a cs e\glissando( a e) cs a e cs |
\bar "||"
\repeat unfold 2 { d f a d a f } |
\repeat unfold 2 { c fs a c a fs } |
\repeat unfold 2 { b, d g b g d } |
\repeat unfold 2 { bf! d g a g d } |
\repeat unfold 2 { a d e g e d } |
\repeat unfold 2 { a cs e f e cs } |
d f a f a d a d f d f a |
a f d f d a d a f a f d |
\repeat unfold 2 { e gs b e b gs } |
e gs b e gs b b gs e b gs e |
\repeat unfold 2 { d gs b d b gs } |
d gs b d gs b b gs d b gs d |
\repeat unfold 2 { cs gs' b cs b gs } |
cs, gs' b cs gs' b b gs cs, b gs cs, |
c e a b a e c' b a e c a |
b ds fs ds fs a fs a b a b ds |
\time 4/4
\repeat unfold 2 { e8 e16 f e8 ds e2 | }
e8 e16 f e8 ds e d c b |
\bar "||"
}
guitarTwo = \relative c {
\global
f8^"kbd" a d f a d f d a f d a |
f a d f a d f d a f d a |
\repeat unfold 2 { f af c f af c f c af f c af | }
\repeat unfold 2 { e gs b e gs b e b gs e b gs | }
e a cs e a cs e cs a e cs a |
e g cs e g cs e cs g e cs g |
\repeat unfold 2 { f a d f a d f d a f d a | }
\repeat unfold 2 { g bf d g bf d g d bf g d bf | }
g c e g c e g e c g e c |
gs c e gs c e gs e c gs e c |
\repeat unfold 2 { a cs e a cs e a e cs a e cs | }
R1.*16 |
R1*3 |
\repeat unfold 4 { a8 a' e a } |
\repeat unfold 4 { bf, g' d g } |
\repeat unfold 4 { a, a' e a } |
\repeat unfold 2 { c, g' e g } |
\repeat unfold 2 { cs, g' e g } |
\repeat unfold 4 { d a' f a } |
\repeat unfold 4 { d, bf' e, bf' } |
\repeat unfold 4 { cs, bf' e, bf' } |
\repeat unfold 2 { d, a' f a } |
\repeat unfold 2 { e bf' g bf } |
\repeat unfold 4 { f c' a c } |
\repeat unfold 4 { f, cs' a cs } |
\repeat unfold 4 { f, df' af df } |
\repeat unfold 4 { e, cs' gs cs } |
}
guitarOneStaff = \new Staff \with { midiInstrument = "distorted guitar" } \guitarOne
guitarTwoStaff = \new Staff \with { midiInstrument = "acoustic guitar (steel)" } \guitarTwo
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 { \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 b>1-\markup { "maj7" }
<c f g>1-\markup { "sus4" }
<c d g>1-\markup { "sus2" }
}
chordExceptions = #(append
(sequential-music-to-chord-exceptions chordExceptionMusic #t)
ignatzekExceptions
)
chordValues = \chordmode {
\global
\set chordNameExceptions = #chordExceptions
\set majorSevenSymbol = \markup "maj7"
d1.:m | q | f:m | q | e | e:7 | a | a:7 |
d:m/f | q | g:m | g:m7 | c:/g | c:aug/gs | a | q |
d:m | d:7/c | g:/b | g:m9/bf | a:7sus4 | a:1.3.5.13- | d:m | q |
e | q | e:7/d | q | cs:m7 | q | a:1.3-.5.9/c | b:7 |
e1 | q | q |
a1*2:1.5 | g:m/bf | a:1.5 | c1 | cs:dim |
d1*2:m | g:m6 | cs:dim7 | d1:m | e:dim |
}
chordNames = \new ChordNames {
\set chordChanges = ##t
\set chordNameExceptions = #chordExceptions
\chordValues
}
#(set-global-staff-size 18)
\book {
\paper {
system-system-spacing =
#'((basic-distance . 8)
(minimum-distance . 4)
(padding . 4)
(stretchability . 60)
)
}
\score {
<<
\chordNames
\guitarOneStaff
\guitarTwoStaff
>>
\layout {
% indent = #0
\context {
\Staff \RemoveEmptyStaves
% \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
\override VerticalAxisGroup.remove-first = ##t
}
}
}
}
\score {
\unfoldRepeats {
<<
\transpose c c, {
\guitarOneStaff
}
\transpose c c, {
\guitarTwoStaff
}
>>
}
\midi {}
}