From 252904f9eca3496665db7679bfb41b4549ccf881 Mon Sep 17 00:00:00 2001 From: Eric Teunis de Boone Date: Wed, 16 Nov 2016 02:24:46 +0100 Subject: [PATCH] Added tunes: Cabar Feidh(multiple versions), When the Pipers Play and Bells of Dunblane --- 4-4_marches/cabar_feidh/notes.pipes.agira.ily | 63 +++++++++ .../cabar_feidh/notes.pipes.charge.ily | 36 ++++++ .../cabar_feidh/notes.pipes.strathspey.ily | 63 +++++++++ 4-4_marches/cabar_feidh/pipes.agira.ly | 56 ++++++++ 4-4_marches/cabar_feidh/pipes.all.ly | 90 +++++++++++++ 4-4_marches/cabar_feidh/pipes.charge.ly | 50 ++++++++ 4-4_marches/cabar_feidh/pipes.strathspey.ly | 57 +++++++++ 4-4_marches/when_the_pipers_play/config.ily | 17 +++ .../when_the_pipers_play/notes.pipes.ily | 34 +++++ 4-4_marches/when_the_pipers_play/pipes.ly | 54 ++++++++ airs/bells_of_dunblane/config.ily | 17 +++ airs/bells_of_dunblane/notes.pipes.ily | 35 +++++ .../bells_of_dunblane/notes.pipes.seconds.ily | 43 +++++++ airs/bells_of_dunblane/pipes.full.ly | 120 ++++++++++++++++++ airs/bells_of_dunblane/pipes.ly | 64 ++++++++++ airs/bells_of_dunblane/pipes.seconds.ly | 68 ++++++++++ other/god_save_the_queen/GodSaveTheQueen.ly | 51 -------- todo | 1 + 18 files changed, 868 insertions(+), 51 deletions(-) create mode 100644 4-4_marches/cabar_feidh/notes.pipes.agira.ily create mode 100644 4-4_marches/cabar_feidh/notes.pipes.charge.ily create mode 100644 4-4_marches/cabar_feidh/notes.pipes.strathspey.ily create mode 100644 4-4_marches/cabar_feidh/pipes.agira.ly create mode 100644 4-4_marches/cabar_feidh/pipes.all.ly create mode 100644 4-4_marches/cabar_feidh/pipes.charge.ly create mode 100644 4-4_marches/cabar_feidh/pipes.strathspey.ly create mode 100644 4-4_marches/when_the_pipers_play/config.ily create mode 100644 4-4_marches/when_the_pipers_play/notes.pipes.ily create mode 100644 4-4_marches/when_the_pipers_play/pipes.ly create mode 100644 airs/bells_of_dunblane/config.ily create mode 100644 airs/bells_of_dunblane/notes.pipes.ily create mode 100644 airs/bells_of_dunblane/notes.pipes.seconds.ily create mode 100644 airs/bells_of_dunblane/pipes.full.ly create mode 100644 airs/bells_of_dunblane/pipes.ly create mode 100644 airs/bells_of_dunblane/pipes.seconds.ly delete mode 100644 other/god_save_the_queen/GodSaveTheQueen.ly diff --git a/4-4_marches/cabar_feidh/notes.pipes.agira.ily b/4-4_marches/cabar_feidh/notes.pipes.agira.ily new file mode 100644 index 0000000..35c63a6 --- /dev/null +++ b/4-4_marches/cabar_feidh/notes.pipes.agira.ily @@ -0,0 +1,63 @@ +% 4/4 Cabar Feidh (Agira Version) +% Pipes +\version "2.18.2" +composerPipesAgira = "" +titleAgira = "Cabar Feidh (Agira Version)" +meterAgira = "March" +instrumentPipesAgira = "Pipes" +pipeglobal = { + \bagpipeKey + } +% Music +pipesAgiraA = { + e8 | + \dblg g8. [ A16 ] \slurf g8 [ e8 ] \dblg g4 \thrwd d8. [ e16 ] | + \dblg g4 \thrwd d8 [ c8 ] \dblb b8. [ a16 ] \grg G8 [ \grd b8 ] | + \grg a8 [ A8 ] \grg A8 [ g8 ] \dblA A4 e8 [ f16 g16 ] | + \dblA A4 \hdble e8. [ d16 ] \dblc c8 [ \gre a8 ] \wbirl a8 [ \grd b8 ] | + + \dblg g8. [ A16 ] \slurf g8 [ e8 ] \dblg g4 \thrwd d8. [ e16 ] | + \dblg g4 \thrwd d8 [ c8 ] \dblb b8. [ a16 ] \grg G8 [ \grd b8 ] | + \grg a8. [ b16 ] \grip c8 [ \thrwd d8 ] \grg e8. [ f16 ] \dblg g8 [ e8 ] | + \dblA A4 \hdble e8. [ d16 ] \dblc c8 [ \gre a8 ] \wbirl a8 +} + +pipesAgiraB = { + \dblg g8 | + \dblc b8 [ \gre G8 ] \thrwd d8 [ \gre G8 ] \dblc b8 [ \gre G8 ] \whslurd d8. [ b16 ] | + \grg G8 [ \grd b8 ] \thrwd d8 [ c8 ] \dblb b8. [ a16 ] \grg G8 [ \grd b8 ] | + \grg a8. [ \grd c16 ] \dble e8 [ a8 ] \dblc c8 [ \gre a8 ] \dble e8. [ c16 ] | + \grg a8. [ \grd c16 ] \dble e8. [ d16 ] \dblc c8. [ b16 ] \grG a8 [ \dblg g8 ] | + + | + \dblc b8 [ \gre G8 ] \thrwd d8 [ \gre G8 ] \dblc b8 [ \gre G8 ] \whslurd d8 [ G8 ] | + \grg b8 [ e8 ] \thrwd d8 [ c8 ] \dblb b8. [ a16 ] \grg G8 [ \grd b8 ] | + \grg a8. [ b16 ] \grip c8 [ \thrwd d8 ] \grg e8. [ f16 ] \dblg g8 [ e8 ] | + \dblA A4 \hdble e8. [ d16 ] \dblc c8 [ \gre a8 ] \wbirl a8 +} + +pipesAgiraC = { + e8 | + \grg \tuplet 3/2 { c8 [ \grip e8 f8 ] } \dblg g8 [ c8 ] \dble e8 [ c8 ] \dblg g8. [ e16 ] | + \grg \tuplet 3/2 { c8 [ \grip e8 f8 ] } \dblg g8 [ f8 ] \dble e8. [ d16 ] \dblc c8 [ e8 ] | + \thrwd d16 [ e16 f16 g16 ] \dblA A8 [ d8 ] \dblf f8 [ d8 ] \dblA A8. [ f16 ] | + \thrwd d16 [ e16 f16 g16 ] \grg A8 [ g16 A16 ] g16 [ f16 e16 d16 ] c16 [ f16 e16 d16 ] | + + \grg c8 [ \grip e16 f16 ] g16 [ c16 \pelc c8 ] e16 [ c16 \pelc c8 ] g16 [ c16 \pelc c8 ] | + A16 [ c16 \pelc c8 ] \grip e8. [ f16 ] \dblg g8. [ e16 ] \dblc c8 [ e8 ] | + A16 [ g16 f16 A16 ] g16 [ f16 \grg e16 g16 ] f16 [ e16 \grg d16 f16 ] \grg e16 [ d16 \grg c16 e16 ] | + \dble e8 [ c8 ] \dblA A8. [ e16 ] \dblc c8 [ \gre a8 ] \wbirl a8 +} + +pipesAgiraD = { + \dblg g8 | + \grA G8. [ \grd G16 ] \gre G8 [ \grd b8 ] \grg G8. [ \grd G16 ] \gre G8 [ \grd b8 ] | + \grg G16 [ a16 b16 c16 ] \thrwd d8 [ c8 ] \dblb b8. [ a16 ] \grg G8 [ \grd b8 ] | + \grg a8. [ \grd a16 ] \gre a8 [ \grd b8 ] \grg a8. [ \grd a16 ] \gre a8 [ \grd b8 ] | + \grg a16 [ b16 \grg c16 d16 ] \grg e16 [ f16 \grg e16 f16 ] \grg e16 [ d16 \grg c16 b16 ] \grg a8 [ \dblg g8 ] | + + \grA G8. [ \grd G16 ] \gre G8 [ \grd b8 ] \grg G8. [ \grd G16 ] \gre G8 [ \grd b8 ] | + \grg G16 [ a16 b16 c16 ] \thrwd d8 [ c8 ] \dblb b8. [ a16 ] \grg G8 [ \grd b8 ] | + \grg a8. [ b16 ] \grip c8 [ \thrwd d8 ] \grg e8. [ f16 ] \dblg g8 [ e8 ] | + \dblA A4 \hdble e8. [ d16 ] \dblc c8 [ \gre a8 ] \wbirl a8 +} diff --git a/4-4_marches/cabar_feidh/notes.pipes.charge.ily b/4-4_marches/cabar_feidh/notes.pipes.charge.ily new file mode 100644 index 0000000..dcf585a --- /dev/null +++ b/4-4_marches/cabar_feidh/notes.pipes.charge.ily @@ -0,0 +1,36 @@ +% 4/4 Cabar Feidh (Charge) +% Pipes +\version "2.18.2" +composerPipesCharge = "" +meterCharge = "The Charge" +titleCharge = "Cabar Feidh" +instrumentPipesCharge = "Pipes" +pipeglobal = { + \bagpipeKey + } +% Music +pipesChargeA = { + e8 | + \dblg g8. [ A16 ] \tuplet 3/2 { g8 [ f8 e8 ] } \dblg g4 \thrwd d8. [ e16 ] | + \dblg g4 \thrwd d8 [ g8 ] \hdblb b8. [ a16 ] \grg G8. [ \grd b16 ] | + \gbirl a4 \dblA A8 [ g8 ] \dblA A4 \hdble e8. [ f16 ] | + \dblA A4 \hdble e8 [ A8 ] \hdblc c8. [ b16 ] \grg a8. [ \grd b16 ] | + + \dblg g8. [ A16 ] \tuplet 3/2 { g8 [ f8 e8 ] } \dblg g4 \thrwd d8. [ e16 ] | + \dblg g4 \thrwd d8 [ g8 ] \hdblb b8. [ a16 ] \grg G8. [ \grd b16 ] | + \grg a8. [ b16 ] \grg c8. [ d16 ] \grg e8. [ f16 ] \dblg g8. [ f16 ] | + \grg e16 [ A8. ] \hdble e8 [ A8 ] \hdblc c8. [ b16 ] \grg a8 +} + +pipesChargeB = { + \dblg g8 | + \hdblb b8. [ \gre G16 ] \hdbld d8. [ \gre G16 ] \dblb b8. [ \gre G16 ] \hdbld d8. [ \gre G16 ] | + \hdblb b8. [ \gre G16 ] \hdbld d8. [ \gre G16 ] \dblb b8. [ a16 ] \grg G8. [ \grd b16 ] | + \grg a8. [ \grd c16 ] \dble e8. [ a16 ] \dblf f8. [ a16 ] \dble e8. [ a16 ] | + \dblc c8 [ \gre a8 ] \dble e8. [ a16 ] \dblc c8. [ b16 ] \grg a8. [ \dblg g16 ] | + + \hdblb b8. [ \gre G16 ] \hdbld d8. [ \gre G16 ] \dblb b8. [ \gre G16 ] \hdbld d8. [ \gre G16 ] | + \hdblb b8. [ \gre G16 ] \hdbld d8. [ \gre G16 ] \dblb b8. [ a16 ] \grg G8. [ \grd b16 ] | + \grg a8. [ b16 c8. ] d16 ] \grg e8. [ f16 ] \dblg g8. [ f16 ] | + \grg e16 [ A8. ] \hdble e8 [ A8 ] \hdblc c8. [ b16 ] \grg a8 +} diff --git a/4-4_marches/cabar_feidh/notes.pipes.strathspey.ily b/4-4_marches/cabar_feidh/notes.pipes.strathspey.ily new file mode 100644 index 0000000..ff8b9b3 --- /dev/null +++ b/4-4_marches/cabar_feidh/notes.pipes.strathspey.ily @@ -0,0 +1,63 @@ +% 4/4 Cabar Feidh (Strathspey) +% Pipes +\version "2.18.2" +arrangerPipesStrathspey = "PM William Ross" +composerPipesStrathspey = "" +instrumentPipesStrathspey = "Pipes" +meterStrathspey = "Strathspey" +titleStrathspey = "Cabar Feidh" +pipeglobal = { + \bagpipeKey + } +% Music +pipesStrathspeyA = { + e16 | + \dblg g8. [ A16 ] g16 [ f16 e8 ] \dblg g4 \thrwd d8. [ e16 ] | + \dblg g4 \thrwd d16 [ g8. ] \hdblb b8. [ \grg a16 ] \grd G8. [ \grd b16 ] | + \gbirl a16 [ A8. ] \grg A8. [ g16 ] \dblA A4 e16 [ f16 g8 ] | + \dblA A4 \hdble e8. [ A16 ] \hdblc c16 [ \gre a8. ] \wbirl a8. [ e16 ] | + + \dblg g8. [ A16 ] g16 [ f16 e8 ] \dblg g4 \thrwd d8. [ e16 ] | + \dblg g4 \thrwd d16 [ g8. ] \hdblb b8. [ \grg a16 ] \grd G8. [ \grd b16 ] | + \grg a8. [ b16 ] \grip c8. [ d16 ] \dble e8. [ a16 ] \grg e16 [ f16 g8 ] | + \dblA A4 \hdble e8. [ A16 ] \hdblc c16 [ \gre a8. ] \wbirl a8. +} + +pipesStrathspeyB = { + g16 | + \grA G16 [ \grd G16 \gre G8 ] \whslurd d16 [ \gre G8. ] \dblb b16 [ \gre G8. ] \whslurd d8. [ b16 ] | + \grA G16 [ \grd G16 \gre G8 ] \whslurd d16 [ \gre G8. ] \hdblb b8. [ \grg a16 ] \grd G8. [ \grd b16 ] | + \gbirl a4 \dble e8. [ a16 ] \dblc c16 [ \gre a8. ] \dble e8. [ c16 ] | + \grg a8. [ \grd c16 ] \grg f16 [ e16 d8 ] \dblc c16 [ \gre a8. ] \wbirl a8. [ g16 ] | + + \grA G16 [ \grd G16 \gre G8 ] \whslurd d16 [ \gre G8. ] \dblb b16 [ \gre G8. ] \whslurd d8. [ b16 ] | + \grA G16 [ \grd G16 \gre G8 ] \whslurd d16 [ \gre G8. ] \hdblb b8. [ \grg a16 ] \grd G8. [ \grd b16 ] | + \grg a8. [ b16 ] \grip c8. [ d16 ] \dble e8. [ a16 ] \grg e16 [ f16 g8 ] | + \dblA A4 \hdble e8. [ A16 ] \hdblc c16 [ \gre a8. ] \wbirl a8. +} + +pipesStrathspeyC = { + g16 | + \hcatchc c4 \dblg g8. [ c16 ] \dble e8. [ c16 ] \dblg g8. [ e16 ] | + \grg c4 \grip e8. [ f16 ] \dblg g8. [ e16 ] \dblc c16 [ e8. ] | + \thrwd d4 \dblA A8. [ d16 ] \dblf f8. [ d16 ] \dblA A8. [ f16 ] | + \thrwd d8. [ e16 ] \grg f8. [ g16 ] \dblA A8. [ g16 ] \grA f16 [ A8. ] | + + \hcatchc c4 \dblg g8. [ c16 ] \dble e8. [ c16 ] \dblg g8. [ e16 ] | + \grg c4 \grip e8. [ f16 ] \dblg g8. [ e16 ] \dblc c16 [ e8. ] | + \dblA A8. [ f16 ] \dblg g8. [ e16 ] \dblf f8. [ d16 ] \dble e8. [ d16 ] | + \dblc c16 [ A8. ] \hdble e8. [ A16 ] \hdblc c16 [ \gre a8. ] \wbirl a8. +} + +pipesStrathspeyD = { + g16 | + \grg G8. [ \grd G16 ] \gre G8. [ \grd b16 ] \grg G8. [ \grd G16 ] \gre G8. [ \grd b16 ] | + \grg G16 [ \grd G16 \gre G8 ] \whslurd d16 [ \gre G8. ] \dblb b8. [ \grg a16 ] \grd G8. [ \grd b16 ] | + \grg a4 \taor a8. [ \grd c16 ] \grg a4 \taor a8. [ \grd c16 ] | + \dble e8. [ c16 ] \dblA A8. [ e16 ] \dblc c16 [ \gre a8. ] \wbirl a8. [ g16 ] | + + \grg G8. [ \grd G16 ] \gre G8. [ \grd b16 ] \grg G8. [ \grd G16 ] \gre G8. [ \grd b16 ] | + \grg G16 [ \grd G16 \gre G8 ] \whslurd d16 [ \gre G8. ] \dblb b8. [ \grg a16 ] \grd G8. [ \grd b16 ] | + \grg a8. [ b16 ] \grip c8. [ d16 ] \dble e8. [ a16 ] \grg e16 [ f16 g8 ] | + \dblA A4 \hdble e8. [ A16 ] \hdblc c16 [ \gre a8. ] \wbirl a8. +} diff --git a/4-4_marches/cabar_feidh/pipes.agira.ly b/4-4_marches/cabar_feidh/pipes.agira.ly new file mode 100644 index 0000000..ddfdad1 --- /dev/null +++ b/4-4_marches/cabar_feidh/pipes.agira.ly @@ -0,0 +1,56 @@ +\version "2.18.2" + +\include "config.ily" +\include "notes.pipes.agira.ily" + +\score { + \new Staff { + \global + \pipeglobal + << + \new NullVoice = "format" { + \repeat unfold 4 { + \repeat volta 2 { + \part + \line + } + \break + } + }%Format + + \new Voice = "pipes" { + \pipesAgiraA s8 + + \pipesAgiraB s8 + + \pipesAgiraC s8 + + \pipesAgiraD s8 + } + >> + } + \header { + title = \titleAgira + meter = \meterAgira + instrument = \instrumentPipes + composer = \composerPipesAgira + } +} +\score { + \new Staff { \global \pipeglobal + \set Staff.midiInstrument = #"bagpipe" + %%Tune + \partial 8 + \pipesAgiraA + \pipesAgiraB + \pipesAgiraC + \pipesAgiraD + } + \midi { \confTempo } + \header { + title = \titleAgira + meter = \meterAgira + instrument = \instrumentPipesAgira + composer = \composerPipesAgira + } +} diff --git a/4-4_marches/cabar_feidh/pipes.all.ly b/4-4_marches/cabar_feidh/pipes.all.ly new file mode 100644 index 0000000..8787731 --- /dev/null +++ b/4-4_marches/cabar_feidh/pipes.all.ly @@ -0,0 +1,90 @@ +\version "2.19.0" + +\include "config.ily" +\include "notes.pipes.ily" +\include "notes.pipes.agira.ily" +\include "notes.pipes.charge.ily" +\include "notes.pipes.strathspey.ily" + +\score { + \new StaffGroup << + \new Staff = "pipes" { + \global + \pipeglobal + \set Staff.instrumentName = \markup{ \instrumentPipes } + \set Staff.shortInstrumentName = \markup{ \shortInstrumentPipes } + << + \new NullVoice = "format" { + \repeat unfold 4 { + \repeat volta 2 { + \part + \line + } + \break + } + }%Format + + \new Voice = "pipes" { + \pipesA s8 + + \pipesB s8 + + \pipesC s8 + + \pipesD s8 + } + >> + } + \new Staff = "agira" { + \pipeglobal + \set Staff.instrumentName = \markup{ "Agira" } + \set Staff.shortInstrumentName = \markup{ "A."} + + \pipesAgiraA s8 + + \pipesAgiraB s8 + + \pipesAgiraC s8 + + \pipesAgiraD s8 + } + \new Staff = "strath" { + \pipeglobal + \set Staff.instrumentName = \markup{ "Strathspey" } + \set Staff.shortInstrumentName = \markup{ "S."} + + s16 \pipesStrathspeyA s16 + + s16 \pipesStrathspeyB s16 + + s16 \pipesStrathspeyC s16 + + s16 \pipesStrathspeyD s16 + } + \new Staff = "charge" { + \pipeglobal + \set Staff.instrumentName = \markup{ "Charge" } + \set Staff.shortInstrumentName = \markup{ "C."} + + \pipesChargeA s8 + + \pipesChargeB s8 + } + >> + \header { + title = \title + meter = "" + composer = \markup \large { + \column \right-align { + $(if (not (string=? "" composerPipes)) #{ \markup {\line { \composerPipes ":" }} #} ) + $(if (not (string=? "" composerPipessecnd)) #{ \markup {\line { \composerPipessecnd ":" }} #} ) + $(if (not (string=? "" composerPipesthrd)) #{ \markup {\line { \composerPipesthrd ":" }} #} ) + } + \column \right-align { + $(if (not (string=? "" composerPipes)) #{ \markup {\line { \instrumentPipes }}#} ) + $(if (not (string=? "" composerPipessecnd)) #{ \markup {\line { \instrumentPipessecnd }}#} ) + $(if (not (string=? "" composerPipesthrd)) #{ \markup {\line { \instrumentPipesthrd }}#} ) + } + } + } +} diff --git a/4-4_marches/cabar_feidh/pipes.charge.ly b/4-4_marches/cabar_feidh/pipes.charge.ly new file mode 100644 index 0000000..00d19a1 --- /dev/null +++ b/4-4_marches/cabar_feidh/pipes.charge.ly @@ -0,0 +1,50 @@ +\version "2.18.2" + +\include "config.ily" +\include "notes.pipes.charge.ily" + +\score { + \new Staff { + \global + \pipeglobal + << + \new NullVoice = "format" { + \repeat unfold 2 { + \repeat volta 2 { + \part + \line + } + \break + } + }%Format + + \new Voice = "pipes" { + \pipesChargeA s8 + + \pipesChargeB s8 + } + >> + } + \header { + title = \titleCharge + meter = \meterCharge + instrument = \instrumentPipesCharge + composer = \composerPipesCharge + } +} +\score { + \new Staff { \global \pipeglobal + \set Staff.midiInstrument = #"bagpipe" + %%Tune + \partial 8 + \pipesChargeA + \pipesChargeB + } + \midi { \confTempo } + \header { + title = \titleCharge + meter = \meterCharge + instrument = \instrumentPipesCharge + composer = \composerPipesCharge + } +} diff --git a/4-4_marches/cabar_feidh/pipes.strathspey.ly b/4-4_marches/cabar_feidh/pipes.strathspey.ly new file mode 100644 index 0000000..d215d75 --- /dev/null +++ b/4-4_marches/cabar_feidh/pipes.strathspey.ly @@ -0,0 +1,57 @@ +\version "2.18.2" + +\include "config.ily" +\include "notes.pipes.strathspey.ily" + +\score { + \new Staff { + \global + \pipeglobal + << + \new NullVoice = "format" { + \repeat unfold 4 { + \repeat volta 2 { + \partial 16 s16 + \line + } + \break + } + }%Format + + \new Voice = "pipes" { + \pipesStrathspeyA s16 + + \pipesStrathspeyB s16 + + \pipesStrathspeyC s16 + + \pipesStrathspeyD s16 + } + >> + } + \header { + title = \titleStrathspey + meter = \meterStrathspey + instrument = \instrumentPipesStrathspey + composer = \composerPipesStrathspey + arranger = \arrangerPipesStrathspey + } +} +\score { + \new Staff { \global \pipeglobal + \set Staff.midiInstrument = #"bagpipe" + %%Tune + \partial 16 + \pipesStrathspeyA + \pipesStrathspeyB + \pipesStrathspeyC + \pipesStrathspeyD + } + \midi { \confTempo } + \header { + title = \titleStrathspey + meter = \meterStrathspey + instrument = \instrumentPipesStrathspey + composer = \composerPipesStrathspey + } +} diff --git a/4-4_marches/when_the_pipers_play/config.ily b/4-4_marches/when_the_pipers_play/config.ily new file mode 100644 index 0000000..979a284 --- /dev/null +++ b/4-4_marches/when_the_pipers_play/config.ily @@ -0,0 +1,17 @@ +\version "2.19.0" +%% Globals +global = { + \time 4/4 + } +confTempo = { + \tempo 4 = 80 + } +%% Format +part = { \partial 4 s4 } +measure = { \grace {s1} s1 | } +halfline = { \repeat unfold 4 \measure } +line = { \repeat unfold 2 { \halfline } } + +%% Headers +title = "When the Pipers play" +meter = "March" diff --git a/4-4_marches/when_the_pipers_play/notes.pipes.ily b/4-4_marches/when_the_pipers_play/notes.pipes.ily new file mode 100644 index 0000000..64e4721 --- /dev/null +++ b/4-4_marches/when_the_pipers_play/notes.pipes.ily @@ -0,0 +1,34 @@ +% 4/4 When the Pipers play +% Pipes +\version "2.18.2" +composerPipes = "" +arrangerPipes = "J. Tuttle" +pipeglobal = { + \bagpipeKey + } +% Music +pipesA = { + \tuplet 3/2 { a8 d8 e8 } | + \grg f2~ f8 [ e8 ] d8. [ b16 ] | + \grG a2~ a8 [ d8 ] \grg d8 [ c8 ] | + \thrwd d2~ d8 [ \grg d16 e16 ] f8. [ g16 ] | + \hdble e2~ e8 [ \grg e8 ] f8 [ g8 ] | + + \dblA A2~ A8 [ g16 f16 ] e8 [ d8 ] | + \grg f8. [ d16 ] a4. \grg f8 d8 [ b8 ] | + \grg a8. [ e16 ] \grG e4. a8 \grg \tuplet 3/2 { a8 b8 d8 } | + \grg d2~ d4 +} + +pipesB = { + \tuplet 3/2 { a8 d8 e8 } | + \grg f2~ f8 [ e8 ] d8 [ A8 ] | + \hdblf f2~ f8 [ d8 ] e8 [ c8 ] | + \thrwd d2~ d8 [ \grg d16 e16 ] f8. [ g16 ] | + \hdble e2~ e8 [ A8 ] \grg A8. [ f16 ] | + + d16 [ f8.~ ] f4. e8 d8. [ b16 ] | + \grG a2~ a8 [ \grg f8 ] d8 [ b8 ] | + \grg a8. [ e16 ] \gra e4. a8 \grg \tuplet 3/2 { a8 b8 d8 } | + \grg d2~ d4 +} diff --git a/4-4_marches/when_the_pipers_play/pipes.ly b/4-4_marches/when_the_pipers_play/pipes.ly new file mode 100644 index 0000000..28a9ce9 --- /dev/null +++ b/4-4_marches/when_the_pipers_play/pipes.ly @@ -0,0 +1,54 @@ +\version "2.18.2" + +\include "config.ily" +\include "notes.pipes.ily" + +\score { + \new Staff { + \global + \pipeglobal + << + \new NullVoice = "format" { + \repeat volta 2 { + \part + \line + } + \break + \repeat volta 2 { + \part + \line + } + }%Format + + \new Voice = "pipes" { + \pipesA s4 + + \pipesB s4 + } + >> + } + \header { + title = \title + meter = \meter + instrument = \instrumentPipes + composer = \composerPipes + } +} +\score { + \new Staff { \global \pipeglobal + \set Staff.midiInstrument = #"bagpipe" + %%Tune + \partial 4 + \pipesA + \pipesA + \pipesB + \pipesB + } + \midi { \confTempo } + \header { + title = \title + meter = \meter + instrument = \instrumentPipes + composer = \composerPipes + } +} diff --git a/airs/bells_of_dunblane/config.ily b/airs/bells_of_dunblane/config.ily new file mode 100644 index 0000000..908438c --- /dev/null +++ b/airs/bells_of_dunblane/config.ily @@ -0,0 +1,17 @@ +\version "2.19.0" +%% Globals +global = { + \time 4/4 + } +confTempo = { + \tempo 4 = 80 + } +%% Format +part = { \partial 4 \grace{s1} s4 } +measure = { \grace {s1} s1 | } +halfline = { \repeat unfold 2 \measure } +line = { \repeat unfold 2 { \halfline } } + +%% Headers +title = "Bells of Dunblane" +meter = "Air" diff --git a/airs/bells_of_dunblane/notes.pipes.ily b/airs/bells_of_dunblane/notes.pipes.ily new file mode 100644 index 0000000..deab722 --- /dev/null +++ b/airs/bells_of_dunblane/notes.pipes.ily @@ -0,0 +1,35 @@ +% 4/4 Bells of Dunblane +% Pipes +\version "2.18.2" +composerPipes = "R. Mathieson" +pipeglobal = { + \bagpipeKey + } +% Music +pipesA = { + \grg a8. [ \grd c16 ] | + \dble e2~ e8 [ \grG e8 ] \grg f8 [ \dblA A8 ] | + e16 [ c8.~ ] c4~ c8 [ \grG c8 ] \grg d16 [ c16 b8 ] | + \grg c16 [ e8.~ ] e4~ e8 [ \grG e8 ] \grg d8. [ b16 ] | + \grg c16 [ a8.~ ] a2 +} +pipesBA = { + \grg a8 [ \grd a8 ] | + \grg f2~ f8 [ \grg f8 ] g16 [ \grA f16 g8 ] | + \grA f16 [ d8.~ ] d2 \grg \tuplet 3/2 { d8 [ c8 b8 ] } | + \grg c16 [ e8.~ ] e4~ e8 [ \grG e8 ] \grg d8. [ b16 ] | + \grd c2. \grg a8 [ \grd a8 ] +} +pipesBB = { + \grg f2~ f8 [ \grg f8 ] g16 [ \grA f16 g8 ] | + \grA f16 [ d8.~ ] d2 \grg \tuplet 3/2 { d8 [ c8 b8 ] } | + \grg c16 [ e8.~ ] e4~ e8 [ \grG e8 ] \grg d8. [ b16 ] | + \grg c16 [ a8.~ ] a4~ a8 [ e8 ] +} +pipesC = { + \grg f8 [ \dblA A8 ] | + e16 [ c8.~ ] c4~ c8 [ \grG c8 ] \grg d16 [ c16 b8 ] | + \grg c16 [ e8.~ ] e4~ e8 [ \grG e8 ] \grg f8 [ \dblA A8 ] | + e16 [ c8.~ ] c4~ c8 [ \grG c8 ] \grg d8. [ b16 ] | + \grG a2. +} diff --git a/airs/bells_of_dunblane/notes.pipes.seconds.ily b/airs/bells_of_dunblane/notes.pipes.seconds.ily new file mode 100644 index 0000000..1c3661c --- /dev/null +++ b/airs/bells_of_dunblane/notes.pipes.seconds.ily @@ -0,0 +1,43 @@ +% 4/4 Bells of Dunblane +% Pipes (Seconds) +\version "2.18.2" +composerPipesSecnd = "R. Mathieson" +pipessecndglobal = { + \bagpipeKey + } +pipessecndA = { + \grg a8. [ \grd c16 ] | + \dble e2~ e8 [ \grG e8 ] \grg f8 [ \dblA A8 ] | + e16 [ c8.~ ] c4~ c8 [ \grG c8 ] \grg d16 [ c16 b8 ] | + \grg c16 [ e8.~ ] e4~ e8 [ \grG e8 ] \grg d8. [ b16 ] | + e2. +} + +pipessecndBA = { + \grg a8 [ \grd a8 ] | + \grg d2~ d8 [ \grg d8 ] e16 [ d16 e8 ] | + \grg d16 [ f8.~ ] f2 \grg \tuplet 3/2 { f8 [ e8 d8 ] } | + \grg e16 [ A8.~ ] A4 e8 [ \grg A8 ] f8. [ d16 ] | + e2. +} +pipessecndBB = { + \grg a8 [ \grd a8 ] | + \grg d2~ d8 [ \grg d8 ] e16 [ d16 e8 ] | + \grg d16 [ f8.~ ] f2 \grg \tuplet 3/2 { f8 [ e8 d8 ] } | + \grg e16 [ A8.~ ] A4 e8 [ \grg A8 ] f8. [ d16 ] | + e2. +} + +pipessecndCA = { + c4 | + \grg d8. [ b16 ] c16 [ a8.~ ] a2 | + \grg b16 [ a16 G8 ] a16 [ c8.~ ] c4. \grG c8 | + \grg d8. [ b16 ] \grd c16 [ a8.~ ] a2 | + \grg d8. [ c8 b16 ] \grG a4. +} +pipessecndCB = { + e16 [ c8.~ ] c4~ c8 [ \grG c8 ] \grg d16 [ c16 b8 ] | + \grg c16 [ e8.~ ] e4~ e8 [ \grG e8 ] \grg f8 [ \dblA A8 ] | + e16 [ c8.~ ] c4~ c8 [ \grG c8 ] \grg d8. [ b16 ] | + \grG a2. +} diff --git a/airs/bells_of_dunblane/pipes.full.ly b/airs/bells_of_dunblane/pipes.full.ly new file mode 100644 index 0000000..f415e8c --- /dev/null +++ b/airs/bells_of_dunblane/pipes.full.ly @@ -0,0 +1,120 @@ +\version "2.19.0" + +\include "config.ily" +\include "notes.pipes.ily" +\include "notes.pipes.seconds.ily" +%\include "notes.pipes.thirds.ily" + +\score { + \new StaffGroup << + \new Staff = "pipes" { + \global + \pipeglobal + \set Staff.instrumentName = \markup{ \instrumentPipes } + \set Staff.shortInstrumentName = \markup{ \shortInstrumentPipes } + << + \new NullVoice = "format" { + \repeat volta 2 { + \part + \line + } + \break + + \part + \line + \bar "||" + \line + \bar "|." + \break + + \part + \line + \bar "||" + \line + \bar "|." + }%Format + \new Voice = "pipes" { + \pipesA s4 + + \pipesBA \pipesBB s4 + + \pipesC \pipesC s4 + }%Pipes + >> + } + \new Staff = "seconds" { + \pipessecndglobal + \set Staff.instrumentName = \markup{ \instrumentSecnd } + \set Staff.shortInstrumentName = \markup{ \shortInstrumentPipes \shortInstrumentSecnd} + \pipessecndA s4 + + \pipessecndBA \pipessecndBB s4 + + \pipessecndCA \pipessecndCB s4 + + } +% \new Staff = "thirds" { +% \pipesthrdglobal +% \set Staff.instrumentName = \markup{ \instrumentPipes \instrumentThrd } +% \set Staff.shortInstrumentName = \markup{ \shortInstrumentPipes \shortInstrumentThrd } +% +% } + >> + \header { + title = \title + meter = \meter + composer = \markup \large { + \column \right-align { + $(if (not (string=? "" composerPipes)) #{ \markup {\line { \composerPipes ":" }} #} ) + $(if (not (string=? "" composerPipessecnd)) #{ \markup {\line { \composerPipessecnd ":" }} #} ) + $(if (not (string=? "" composerPipesthrd)) #{ \markup {\line { \composerPipesthrd ":" }} #} ) + } + \column \right-align { + $(if (not (string=? "" composerPipes)) #{ \markup {\line { \instrumentPipes }}#} ) + $(if (not (string=? "" composerPipessecnd)) #{ \markup {\line { \instrumentPipessecnd }}#} ) + $(if (not (string=? "" composerPipesthrd)) #{ \markup {\line { \instrumentPipesthrd }}#} ) + } + } + } +} +\score { + \new StaffGroup << + \global + \new Staff = "pipes" { + \pipeglobal + \set Staff.midiInstrument = #"bagpipe" + %%Tune + \partial 4 + \pipesA \pipesA + + \pipesBA \pipesBB + + \pipesC \pipesC + + } + \new Staff = "seconds" { + \pipessecndglobal + \set Staff.midiInstrument = #"bagpipe" + %% Seconds + \pipessecndA \pipessecndA + + \pipessecndBA \pipessecndBB + + \pipessecndCA \pipessecndCB + + } +% \new Staff = "thirds" { +% \pipesthrdglobal +% \set Staff.midiInstrument = #"bagpipe" +% %% Thirds +% +% } + >> + \midi { \confTempo } + \header { + title = \title + meter = \meter + instrument = \instrumentPipes + composer = \composerPipes + } +} diff --git a/airs/bells_of_dunblane/pipes.ly b/airs/bells_of_dunblane/pipes.ly new file mode 100644 index 0000000..323369f --- /dev/null +++ b/airs/bells_of_dunblane/pipes.ly @@ -0,0 +1,64 @@ +\version "2.18.2" + +\include "config.ily" +\include "notes.pipes.ily" + +\score { + \new Staff { + \global + \pipeglobal + << + \new NullVoice = "format" { + \repeat volta 2 { + \part + \line + } + \break + + \part + \line + \bar "||" + \line + \bar "|." + \break + + \repeat volta 2 { + \part + \line + } + }%Format + + \new Voice = "pipes" { + \pipesA s4 + + \pipesBA \pipesBB s4 + + \pipesC s4 + + } + >> + } + \header { + title = \title + meter = \meter + instrument = \instrumentPipes + composer = \composerPipes + } +} +\score { + \new Staff { \global \pipeglobal + \set Staff.midiInstrument = #"bagpipe" + %%Tune + \pipesA \pipesA + \pipesBA \pipesBB + \pipesC \pipesC + + } + \midi { \confTempo } + \header { + title = \title + meter = \meter + instrument = \instrumentPipes + composer = \composerPipes + } +} diff --git a/airs/bells_of_dunblane/pipes.seconds.ly b/airs/bells_of_dunblane/pipes.seconds.ly new file mode 100644 index 0000000..5cc70b1 --- /dev/null +++ b/airs/bells_of_dunblane/pipes.seconds.ly @@ -0,0 +1,68 @@ +\version "2.18.2" + +\include "config.ily" +\include "notes.pipes.seconds.ily" + +\score { + \new Staff { + \global + \pipessecndglobal + << + \new NullVoice = "format" { + \repeat volta 2 { + \part + \line + } + \break + + \part + \line + \bar "||" + \line + \bar "|." + \break + + \part + \line + \bar "||" + \line + \bar "|." + }%Format + + \new Voice = "seconds" { + \pipessecndA s4 + + \pipessecndBA \pipessecndBB s4 + + \pipessecndCA \pipessecndCB s4 + + } + >> + } + \header { + title = \title + meter = \meter + instrument = \instrumentSecnd + composer = \composerPipesSecnd + } +} +\score { + \new Staff { \global \pipessecndglobal + \set Staff.midiInstrument = #"bagpipe" + %%Tune + \partial 4 + \pipessecndA \pipessecndA + + \pipessecndBA \pipessecndBB + + \pipessecndCA \pipessecndCB + } + \midi { \confTempo } + \header { + title = \title + meter = \meter + instrument = \instrumentSecnd + composer = \composerPipesSecnd + } + +} diff --git a/other/god_save_the_queen/GodSaveTheQueen.ly b/other/god_save_the_queen/GodSaveTheQueen.ly deleted file mode 100644 index 73046a3..0000000 --- a/other/god_save_the_queen/GodSaveTheQueen.ly +++ /dev/null @@ -1,51 +0,0 @@ -\include "bagpipe.ly" -melody = { - \set Staff.midiInstrument = #"bagpipe" - \hideKeySignature - \cadenzaOn - \once \override Score.BreakAlignment #'break-align-orders = - #(make-vector 3 '(instrument-name - left-edge - ambitus - span-bar - breathing-sign - clef - key-signature - time-signature - staff-bar - custos - span-bar)) - \time 3/4 - \thrwd d4 \slurd d4 \dble e4 \bar "|" - \dblc c4. d8 \dble e4 \bar "|" - \grg f4 \gre f4 \dblg g4 \bar "|" - \hdblf f4. e8 \thrwd d4 \bar "|" - \grg e4 \thrwd d4 c4 \bar "|" - \thrwd d2. \bar "|" \break - - \dblA A4 \grip A4 \grg A4 \bar "|" - \dblA A4. g8 \hdblf f4 \bar "|" - \dblg g4 \grA g4 \grf g4 \bar "|" - \grA g4. f8 \dble e4 \bar "|" \break - - \grg f4 \dblg g8 [ f8 ] \grg e8 [ d8 ] \bar "|" - \dblf f4. g8 \dblA A4 \bar "|" - \grip A8 [ g8 ] \hdblf f4 \dble e4 \bar "|" - \thrwd d2. \bar ".|" \break - - } - -\score { - \melody - \layout { - indent = 0.0\cm - \context { \Score \remove "Bar_number_engraver" } - } - \header { - title = "God Save The Queen" - meter = "Air" - arranger = "Traditional" - } - -} - diff --git a/todo b/todo index 104e45c..f5550df 100644 --- a/todo +++ b/todo @@ -2,3 +2,4 @@ my home: tenor + bass mist covered mountains: bass loch duich: last bar side la marseillaise: fix measure 15 (one 8th missing) +bells of dunblane: last part seconds missing quarter note