diff --git a/album4/gothra-organ-solo.ly b/album4/gothra-organ-solo.ly new file mode 100644 index 0000000..0dae699 --- /dev/null +++ b/album4/gothra-organ-solo.ly @@ -0,0 +1,152 @@ +\version "2.24.0" +\language "english" + +\header { + title = "Gothra (organ solo)" + composer = "Tommy Montgomery" + copyright = "(c) 2025 Tommy Montgomery" +} + +global = { + \key e \phrygian + \time 4/4 + \set Staff.printKeyCancellation = ##f + \numericTimeSignature + % \compressFullBarRests + \omit Voice.StringNumber + %\override TupletBracket #'bracket-visibility = #'if-no-beam + \override MultiMeasureRest.expand-limit = #3 +} + +\parallelMusic #'(right left) { + \tempo 4 = 150 + + \global 1 | + \global \clef treble R1 | + + 1 | + R1 | + + \grace { a16 b cs } 8 e 16 d a ~ q8 e8 r8 d16 e | + r16 r8 r8. 16 ~ q q r8 16 e r8 | + + 16 e d r d b r b a r a g r | + r8. 16 r8. 16 r8. 16 r8. 16 | + + r8 16 e g e r r8 16 e a g a | + e16 d' r8 r8. b16 e, d' r8 r4 | + + r8 16 e g e r r8 16 e, a e16 r | + e,16 d' r8 r8. b16 e, bf' r8 r8. bf16 | + + r16 d e g r g a b r b d e r e g a | + d16 r8. g16 r8. b16 r8. e16 r8. | + + \ottava 1 bf16 a g e d e b! a \ottava 0 bf a g e d e b! bf | + R1 | + + a4. cs8 ~ cs d e16 f e d | + R1 | + + e8 f g a \grace { g16 a } bf8 a g bf | + R1 | + + a8 cs d e f d e cs | + R1 | + + d8 bf cs a bf16 g a f g e f d | + R1 | + + e4. 8 ~ q4 ~ | + r4 8 r r r4 | + + q8 4. e'16 d b bf a g e d | + cs8 4. r2 | + + + e16 d b bf a g e d e g a bf b d e g | + R1 | + + b,16 d e g d e g a e g a bf e, g a bf | + R1 | + + b16 c b as b as a as a as a gs a gs g gs | + R1 | + + g16 gs g fs g fs f fs f fs f ds f ds cs b | + R1 | + + \tuplet 3/2 4 { cs8 b a b cs ef f g a b cs b } | + a4 ef' a ef' | + + \tuplet 3/2 4 { a8 g f ef cs b } a8 r8 r4 | + a,4 ef a,8 r r4 | + +%{ + r8. e,,16 g a d r4 b16 d e a | + \clef bass e,16 b' d r16 r8. a16 e' g | + + r4 e16 g a d r4 b16 d e a | + \tuplet 3/2 { e8 b' d } r4 \tuplet 3/2 { a8 e' g } r4 | + + r4 e16 g a d r4 b16 d e a | + \clef treble \tuplet 3/2 { e8 b' d } r4 \tuplet 3/2 { a8 e' g } r4 | + + r4 \ottava 1 e16 g a d e2 \ottava 0 | + \clef treble \tuplet 3/2 { e8 b' d } r4 r2 | +%} + + r4 e,16 g a d r4 b16 d e a | + \clef bass \tuplet 3/2 { e,8 b' d } r4 \tuplet 3/2 { a8 e' g } r4 | + + r4 e16 g a d r4 b16 d e a | + \tuplet 3/2 { e8 b' d } r4 \tuplet 3/2 { a8 e' g } r4 | + + r4 e16 g a d r4 b16 d e a | + \clef treble \tuplet 3/2 { e8 b' d } r4 \tuplet 3/2 { a8 e' g } r4 | + + r4 \ottava 1 e16 g a d e2 \ottava 0 | + \clef treble \tuplet 3/2 { e8 b' d } r4 r2 | + + + + +} + + +pianoStaff = \new PianoStaff \with { + instrumentName = "Piano" +} << + \new Staff = "right" \with { + \consists "Span_arpeggio_engraver" + midiInstrument = "rock organ" + } { \set Staff.connectArpeggios = ##t \relative c' \right } + \new Staff = "left" \with { + \consists "Span_arpeggio_engraver" + midiInstrument = "rock organ" + } { \set Staff.connectArpeggios = ##t \clef bass \relative c \left } +>> + +\score { + << + \pianoStaff + >> + \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 { + << + \pianoStaff + >> + } + \midi {} +} diff --git a/album4/gothra-organ-solo.pdf b/album4/gothra-organ-solo.pdf new file mode 100644 index 0000000..6b72a91 Binary files /dev/null and b/album4/gothra-organ-solo.pdf differ diff --git a/album4/gothra-strings.ly b/album4/gothra-strings.ly new file mode 100644 index 0000000..2e23708 --- /dev/null +++ b/album4/gothra-strings.ly @@ -0,0 +1,230 @@ +\version "2.24.0" +\language "english" + +\header { + title = "Gothra (strings)" + 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 = 150 + \key d \minor +} + + +guitarOne = \relative c' { + \time 4/4 + \global + + << + { + + r4^"strings/oboe" d'8 c d2 ~ | + d4 d8 c d2 ~ | + d4 d8 c d2 ~ | + d4 d8 c d4 f | + + e4 bf8 a bf2 ~ | + bf4 c8 bf c4 e | + d4 d8 c d2 ~ | + d4 fs8 e fs4 g | + } + \\ + { + + r2_"clarinet/trombone" r4 e, | f2. a4 | + g2. a4 | bf2. d4 | + c2. f,4 | e2. g4 | + << + { + a2. g4 | fs2. e4 | + } + \\ + { + fs2. e4 | d2. e4 | + } + >> + } + >> + + << + { + a'4 a8 g a2 ~ | + a4 d,8 c d2 ~ | + d4 f8 e f2 ~ | + f4 af8 g af2 | + + g4 e8 d e2 ~ | + e4 g8 f g4 a | + gs4 f8 e f4 gs | + g!2 a | + } + \\ + { + << + { + d,,2. e4 | f?2. d4 | + f2. g4 | af2. f4 | + e2. f4 | g2 bf4 cs | + b2 d4 f | e2 ef | + } + \\ + { + d,2. e4 | d2. d4 | + d2. e4 | f2. d4 | + cs2. d4 | e2 g4 bf | + gs2 b4 d | d2 cs | + } + >> + } + >> +} + + +brass = \relative c, { + \global + \clef bass + + 1^"low brass" | q1 | 1 | | + | | | q2 4 | + + 2 q4 q | q1 | 2 q4 q | q1 | + 2 4 | 2 4 | 2 | | +} + +flute = \relative c''' { + \global + R1*8 | + + << + { + r4^"flute" a d e | f1 ~ | + f4 af, f' e | d1 | + cs4 e, g a | bf2 a | + gs4 f gs b | d2 cs | + } + \\ + { + r4_"flute" d, f g | a1 ~ | + a4 d, af' g | f1 | + e4 g, bf cs | d2 cs | + b4 gs b d | e2 g | + } + >> + +} + +horns = \relative c' { + \global + R1*7 | + \clef bass + + r2^"fr. horns" a4 g | + a2 d, | a'2 bf4 a | + af2 d, | af' bf4 af | + g2 cs, | g' a?4 g | + f2 d | e2 a, | +} + + +guitarOneStaff = \new Staff \with { midiInstrument = "violin" } \guitarOne +oboeStaff = \new Staff \with { midiInstrument = "oboe" } \guitarOne +clarinetStaff = \new Staff \with { midiInstrument = "clarinet" } \guitarOne +tromboneStaff = \new Staff \with { midiInstrument = "trombone" } \guitarOne +fluteStaff = \new Staff \with { midiInstrument = "flute" } \flute +hornsStaff = \new Staff \with { midiInstrument = "french horn" } \horns +brassStaff = \new Staff \with { midiInstrument = "brass section" } \brass + + +chordExceptionMusic = { + 1-\markup { "maj9" } + 1-\markup { "maj7" \sharp "11" } + 1-\markup { "m7sus4" } + 1-\markup { \super "°7" } + 1-\markup { "add9" } + 1-\markup { "m(add9)" } + 1-\markup { \super { \sharp "11" \sharp "13" } } + 1-\markup { "5" } + 1-\markup { "maj7" } + 1-\markup { "sus4" } + 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 | g:m/bf | g:m | c | c:/e | d | q | + d1:m | q | d:dim | q | cs:dim7 | q | gs:dim7 | g2:6 a:1.3.5-7 | +} + +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 + \fluteStaff + \hornsStaff + \brassStaff + >> + \layout { + % indent = #0 + \context { + \Staff \RemoveEmptyStaves + % \override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods + \override VerticalAxisGroup.remove-first = ##t + } + } + } +} + +\score { + \unfoldRepeats { + << + + \guitarOneStaff + \clarinetStaff + \oboeStaff + \tromboneStaff + \fluteStaff + \hornsStaff + \brassStaff + + >> + } + \midi {} +} diff --git a/album4/gothra-strings.pdf b/album4/gothra-strings.pdf new file mode 100644 index 0000000..3780f88 Binary files /dev/null and b/album4/gothra-strings.pdf differ