kastdeur
/
pipeband-music
mirror of https://github.com/kastdeur/pipeband-music.git
1
0
Fork 0
Code Issues Releases Activity

[tune] Additional Black Bear setting

This commit is contained in:
Eric Teunis de Boone 2022-10-19 02:05:54 +02:00
parent 1429966189
commit f0ee9bfd5e
3 changed files with 97 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

61
2-4_marches/black_bear/notes.pipes.ily
View File

@ -1,31 +1,52 @@
% 2/4 Black Bear
% Pipes
\version "2.18.2"
composerPipes = "1936"
composerFacsimilePipes = "1936"
composerPipes = ""
arrangerPipes = "M. Bain" % PM Mike Bain, SHoC
pipeglobal = {
\bagpipeKey
}
pipesA = {
pipesSourceA = {
\tag #'upbeat { \grg a16. [ b32 ] | }
\thrwd d8 [ \dbld d8 ] \grg f16.[ d32 A16. f32 ]|
\thrwd d8 [ \dbld d8 ] \grg f16.[ d32 A16. f32 ]|
\dble e8 [ \grg b8 ] \grip b8 [ \grg e16 d16 ] |
\grg c32 [ d16. \grg b32 \grd c16. ] \grg a16. [ b32 \grg c32 \grd a16. ]
\thrwd d8 [ \dbld d8 ] \grg f16. [ d32 A16. f32 ] |
\thrwd d8 [ \dbld d8 ] \grg f16. [ d32 A16. f32 ] |
\dble e8 [ \grip e8 ] \grg e16. [ g32 \grA f32 e16. ] |
\thrwd d8 [ \grg f8 ] \thrwd d8
\repeat unfold 2 {
\thrwd d8 [ \tag #'facsimile {\dbld} \tag #'current {\slurd} d8 ] \grg f16.[ d32 A16. f32 ]|
\thrwd d8 [ \tag #'facsimile {\dbld} \tag #'current {\slurd} d8 ] \grg f16.[ d32 A16. f32 ]|
} \alternative {
{
\dble e8 [ \grg b8 ] \grip b8 [ \tag #'facsimile {\grg e16 d16 ]} \tag #'current {\grg e16. d32]} |
\grg c32 [ d16. \tag #'facsimile {\grg b32 \grd c16. ]} \tag #'current {\grg b16. \grd c32 ]} \grg a16. [ b32 \grg c32 \grd a16. ]
}
{
\dble e8 [ \grip e8 ] \grg e16. [ g32 \tag #'facsimile {\grA f32 e16. ]} \tag #'current {f16. e32 ]} |
\thrwd d8 [ \grg f8 ] \thrwd d8
}
}
}
pipesB = {
pipesSourceB = {
e8 |
\grg a16. [ \grd a32 a16 \grd b16 ] \thrwd d8 [ \grg d16 e16 ] |
\dblg g8 [ \grA f16 e16 ] \grg f32 [ A16. f16. d32 ] |
\grg a16. [ \grd a32 a16 ] \grd b16 ] \thrwd d8 [ \grg d16 e16 ] |
\dblg g8 [ \grA f16 e16 ] \grg f32 [ A16. f16. d32 ] |
\repeat unfold 2 {
\grg a16. [ \grd a32 \tag #'facsimile {a16 \grd b16 ]} \tag #'current {\gre a16. b32 ]} \thrwd d8 [ \tag #'facsimile {\grg d16 e16 ]} \tag #'current {\slurd d16. e32 ]} |
\dblg g8 [ \tag #'facsimile {\grA f16 e16 ]} \tag #'current {f16. e32 ]} \grg f32 [ A16. \tag #'facsimile {f16. d32 ]} \tag #'current {f32 d16. ]} |
}
A8 [ a16 \dbla a16 ] \grg c8 [ \grd a16 \dbla a16 ] |
\grg d8 [ b16 \dblb b16 ] \grg e8 [ c16 \dblc c16 ] |
\grg d32 [ f16. \grg d32 f16. ] e16. [ g32 \grA f32 g16. ] |
\tag #'facsimile {
A8 [ a16 \dbla a16 ] \grg c8 [ \grd a16 \dbla a16 ] |
\grg d8 [ b16 \dblb b16 ] \grg e8 [ c16 \dblc c16 ] |
\grg d32 [ f16. \grg d32 f16. ] e16. [ g32 \grA f32 g16. ] |
}
\tag #'current {
A32 [ a16. \grg a32 \grd a16. ] \grg c32 [ a16. \grg a32 \grd a16. ] |
\grg d32 [ b16. \grg b32 \grd b16. ] \grg e32 [ c16. \grg c32 \grd c16. ] |
\grg d16. [ f32 \grg d16. f32 ] \grg e16. [ g32 \grA f16. g32 ] |
}
A8 [ \grip A8 ] \grg A16. [ g32 f16. e32 ]
}
}
pipesFacsimileA = { \removeWithTag #'current \pipesSourceA }
pipesFacsimileB = { \removeWithTag #'current \pipesSourceB }
pipesA = { \removeWithTag #'facsimile \pipesSourceA }
pipesB = { \removeWithTag #'facsimile \pipesSourceB }

55
2-4_marches/black_bear/pipes.1936.ly Normal file
View File

@ -0,0 +1,55 @@
\version "2.18.2"
\include "bagpipe.ly"
\include "./config.ily"
\include "./notes.pipes.ily"
markTextEol = #(define-music-function (parser location text) (string?) #{
\once \override Score.RehearsalMark #'break-visibility = #end-of-line-visible
\once \override Score.RehearsalMark #'self-alignment-X = #RIGHT
\mark \markup $text
#})
\score {
\new Staff {
\global
\pipeglobal
<<
{
\repeat volta 2 {
\part \line \markTextEol "Fine"
}\break
\part \line \markTextEol "D.C. al Fine" \bar "||"
}
{
\pipesFacsimileA s8
\pipesFacsimileB
}
>>
}
\header {
title = \title
meter = \meter
instrument = \instrumentPipes
composer = \composerFacsimilePipes
}
}
\score {
\new Staff { \global \pipeglobal
\set Staff.midiInstrument = #"bagpipe"
%%Tune
\partial 8
\pipesFacsimileA
\pipesFacsimileA
\pipesFacsimileB
\removeWithTag #'upbeat \pipesFacsimileA
}
\midi { \confTempo }
\header {
title = \title
meter = \meter
instrument = \instrumentPipes
composer = \composerPipes
}
}

1
2-4_marches/black_bear/pipes.ly
View File

@ -33,6 +33,7 @@ markTextEol = #(define-music-function (parser location text) (string?) #{
meter = \meter
instrument = \instrumentPipes
composer = \composerPipes
arranger = \arrangerPipes
}
}
\score {