88 lines
2.2 KiB
Plaintext
88 lines
2.2 KiB
Plaintext
\version "2.18.2"
|
|
\language "english"
|
|
\include "lib/guitar-bend.ily"
|
|
|
|
\header {
|
|
title = "Divisi"
|
|
composer = "Tommy Montgomery"
|
|
copyright = "(c) 2016 Tommy Montgomery"
|
|
}
|
|
|
|
globalConfig = {
|
|
\key fs \minor
|
|
\time 4/4
|
|
\numericTimeSignature
|
|
\tempo 4 = 104
|
|
\omit Voice.StringNumber
|
|
\override TupletBracket #'bracket-visibility = #'if-no-beam
|
|
}
|
|
|
|
pinchHarmonic =
|
|
#(define-music-function (parser location fretted actual duration) (ly:pitch? ly:pitch? number?)
|
|
"Do some shit"
|
|
#{ <\parenthesize #fretted \tweak NoteHead.style #'harmonic-black #actual >4 #}
|
|
)
|
|
|
|
guitarOne = \relative c {
|
|
<gs cs gs'>2. <a cs a'>4 |
|
|
<fs b fs'>2. q8 q |
|
|
q2. <e b' e>4 |
|
|
<gs bs ds>2. gs4 |
|
|
|
|
<gs cs gs'>2. <as fs' as>4 |
|
|
<b fs' b>2. q8 q |
|
|
<cs gs' cs>2. <ds b' ds>4 |
|
|
<e b' e>1 |
|
|
|
|
\time 7/8
|
|
\repeat volta 2 {
|
|
cs16[ gs' cs b] cs[ b gs] cs,[ gs' cs b] cs[ b gs] |
|
|
cs,[ fss cs' b] cs[ b fss] cs[ fss cs' b] cs[ b fss] |
|
|
}
|
|
|
|
\time 4/4 cs gs' cs b e( ds) cs( b) \pinchHarmonic cs cs'' #4 r4 |
|
|
|
|
\repeat volta 2 {
|
|
\time 13/16 cs,16[ gs' cs b] cs[( b) gs] d'![ cs b] cs[( b) gs] |
|
|
\time 7/8 cs,[ gs' cs b] cs[( b) gs] fs[ a gs fs] gs[( fs) e] |
|
|
\time 13/16 cs[ gs' cs b] cs[( b) gs] d'[ cs b] cs[( b) gs] |
|
|
\time 21/16 cs,[ gs' cs b] cs[ b gs] es[ gs fs es] fs[( es) cs] fs[ a gs fs] gs[( fs) d] |
|
|
}
|
|
|
|
\time 3/8 gs16[ b a] gs[ a b] |
|
|
|
|
\time 21/16 a8. a16[ e a] b8. b16[ fs b] cs8. cs16[ fs, cs'] d8. |
|
|
\time 12/16 gs,16[ a e'] fs8. a,16[ b fs'] gs8. |
|
|
|
|
a8. a16[ e a] b8. b16[ fs b] |
|
|
cs8. cs16[ fs, cs'] d8. d16[ cs d] |
|
|
e8. e16[ d cs] b8. b16[ cs d] |
|
|
e8. e16[ d cs] b8. a32( b cs) d( e fs) |
|
|
g8. g16[ fs e] d8. d16[ e fs ] |
|
|
g8. g16[ fs e] d8. d16[ e fs ] |
|
|
g[( e) cs] as[ g e] cs[ g' e] cs[ as g] |
|
|
\time 11/16 fs[ g fs e] fs[( e) d] cs[ d cs b] |
|
|
|
|
\time 12/16 \repeat unfold 8 { cs[ cs32 cs cs16] cs[ cs cs] }
|
|
|
|
|
|
|
|
}
|
|
|
|
|
|
\score {
|
|
<<
|
|
\new Staff \with { \clef "G_8" } {
|
|
\globalConfig
|
|
\guitarOne
|
|
}
|
|
>>
|
|
\layout {
|
|
\context {
|
|
\Staff \RemoveEmptyStaves
|
|
\override Glissando.minimum-length = #4
|
|
\override Glissando.springs-and-rods = #ly:spanner::set-spacing-rods
|
|
\override Glissando.thickness = #2
|
|
}
|
|
}
|
|
} |