music/album3/instrumental3.ly

101 lines
2.2 KiB
Plaintext
Raw Normal View History

2023-07-30 03:55:25 +00:00
\version "2.24.0"
\language "english"
\header {
title = "Instrumental"
composer = "Tommy Montgomery"
copyright = "(c) 2023 Tommy Montgomery"
}
global = {
\key e \major
\set Staff.printKeyCancellation = ##f
\numericTimeSignature
\compressMMRests
\omit Voice.StringNumber
\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
\time 6/8
\tempo 4. = 66
}
guitarOne = \relative c' {
\partial 8 b'8\glissando |
e2. | ds4. e | fs ~ fs8. b,16 e( fs) | \grace fs8( g4 fs8) e8.( fs32 e) d16( e) |
e4. ~ e4 e16( d) | b8. b16 b a g8. g16 g b |
a8. a16 a g fs4. | a,16 b ds e fs a b ds e fs a b |
}
guitarOneStaff = \new Staff \with { midiInstrument = "distorted guitar" }{ \global \guitarOne }
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 { "°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"
\partial 8 s8 |
e2. | b | d | a |
e | g | d | b |
c | d | a | q |
bf | c | d | q |
}
chordNames = \new ChordNames {
\set chordChanges = ##t
\set chordNameExceptions = #chordExceptions
\chordValues
}
\score {
<<
\chordNames
\guitarOneStaff
>>
\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 {
<<
\transpose c c, \guitarOneStaff
>>
}
\midi {}
}