CMPD: added tunes

Bloody Fields of Flanders
I See Mull (Land of My Youth)
48th Highlanders of Holland
The Battle of Waterloo
Bonnie Black Isle
Rose of Kelvingrove
Highland Laddie

airs/rose_of_kelvingrove/config.ily

@@ -8,11 +8,12 @@ confTempo = {
 	\tempo 4 = 80 
 	}
 %% Format
-part = { \partial 8 \grace{s4.} s8 }
+part = { \partial 4 \grace{s4.} s4 }
 measure = { \grace {s1} s1 | }
-halfline = { \repeat unfold 4 \measure }
-line = { \repeat unfold 2 { \halfline } }
+quartline = { \repeat unfold 2 \measure }
+halfline = { \repeat unfold 2 \quartline }
+line = { \repeat unfold 2 \halfline }
 
 %% Headers
-title = "Rose of Kelvingrove"
+title = "The Rose of Kelvingrove"
 meter = "Air"

airs/rose_of_kelvingrove/full.ly

@@ -0,0 +1,147 @@
+\version "2.19.0"
+
+\include "bagpipe.ly"
+\include "lilydrum.ly"
+
+\include "./config.ily"
+%\include "./notes.bass.ily"
+%\include "./notes.tenor.ily"
+\include "./notes.side.ily"
+\include "./notes.pipes.ily"
+%\include "./notes.pipes.seconds.ily"
+%\include "./notes.lyrics.ily"
+
+\layout {
+	indent = 5.0
+	short-indent = 2.0
+}
+
+\score {
+	\new StaffGroup <<
+		\new Staff \with {
+			instrumentName = \markup{ \instrumentPipes }
+			shortInstrumentName = \markup{ \shortInstrumentPipes }
+		} {
+			\global
+			\pipeglobal
+			<<
+				\new NullVoice = "format" {
+					\part
+					\line
+					\bar "||"
+					\line
+					\bar ".|:-||"
+
+					\break
+					\repeat volta 2 {
+						\part \line
+					}
+					\break
+
+					\repeat volta 2 {
+						\part \halfline
+						\quartline
+					} \alternative {
+						\quartline
+						{ \halfline \quartline }
+					}
+					\bar "|."
+				}%Format
+
+				\new Voice = "pipes" {
+					\pipesAA \pipesABA
+					\pipesAA \pipesABB s4
+
+					\pipesBA s4
+
+					\pipesBA s4
+					\pipesBEnding
+
+
+
+				}%Pipes
+			>>
+		}
+%{		
+		\new Staff = "song" {
+  			\lyricsglobal
+			\new Voice = "lyrics" {
+
+			}
+		}
+}%
+%{		
+		\new Lyrics = "verse1" {
+		  \lyricsglobal
+		  \lyricsto "lyrics" {
+			\verseA
+		  }
+		}
+%}
+%{		
+		\new Staff = "seconds" \with {
+			instrumentName = \markup{ \instrumentPipes \instrumentSecnd }
+			shortInstrumentName = \markup{ \shortInstrumentPipes \shortInstrumentSecnd }
+		} {
+			\pipessecndglobal
+
+		}
+%}
+		\new PipeBandDrumStaff = "side" \with {
+			instrumentName = \markup { \instrumentSide }
+			shortInstrumentName = \markup{ \shortInstrumentSide }
+		} {
+			\sideglobal
+
+			\unfoldRepeats {
+			s4 \snareA
+			\snareA
+
+			s4 \snareB
+
+			s4 \snareC
+		  }
+
+		}
+%{
+		\new PipeBandDrumStaff = "tenor" \with {
+			instrumentName = \markup{ \instrumentTenor }
+			shortInstrumentName = \markup{ \shortInstrumentTenor }
+		} {
+			\tenorglobal
+
+		}
+%}
+%{
+		\new PipeBandDrumStaff = "bass" \with {
+			instrumentName = \markup{ \instrumentBass }
+			shortInstrumentName = \markup{ \shortInstrumentBass }
+		} {
+			\bassglobal
+
+		}
+%}
+	>>
+	\header {
+		title = \title
+		meter = \meter
+		composer = \markup \large {
+			\column \right-align {
+				$(if (not (string=? "" composerLyrics)) #{ \markup { \line { \composerLyrics ":" } } #} )
+				$(if (not (string=? "" composerPipes))  #{ \markup {\line { \composerPipes  ":" }} #} )
+				$(if (not (string=? "" composerPipessecnd))  #{ \markup {\line { \composerPipessecnd ":" }} #} )
+				$(if (not (string=? "" composerSide))  #{ \markup {\line { \composerSide  ":" }} #} )
+				$(if (not (string=? "" composerTenor)) #{ \markup {\line { \composerTenor  ":" }} #} )
+				$(if (not (string=? "" composerBass))  #{ \markup {\line { \composerBass  ":" }} #} )
+			}
+			\column \right-align {
+				$(if (not (string=? "" composerLyrics)) #{ \markup { \line { "Lyrics" } } #} )
+				$(if (not (string=? "" composerPipes))  #{ \markup {\line { \instrumentPipes }}#} )
+				$(if (not (string=? "" composerPipessecnd))  #{ \markup {\line { \instrumentPipessecnd }}#} )
+				$(if (not (string=? "" composerSide))  #{ \markup {\line { \instrumentSide }}#} )
+				$(if (not (string=? "" composerTenor)) #{ \markup {\line { \instrumentTenor }}#} )
+				$(if (not (string=? "" composerBass))  #{ \markup {\line { \instrumentBass }}#} )
+			}
+		}
+	}
+}

airs/rose_of_kelvingrove/notes.pipes.ily

@@ -1,4 +1,4 @@
-% 4/4 The Rose of Kelvingrove
+% 4/4 Rose of Kelvingrove
 % Pipes
 \version "2.18.2"
 composerPipes = "D. Knox"
@@ -7,5 +7,48 @@ pipeglobal = {
 	\bagpipeKey
 }
 % Music
-pipesA = {
+pipesAA = {
+	\grg a8. [ d16 ] |
+	\grg f8 [ e8 ] \grg d8 [ c8 ] \thrwd d4 \grg a8. [ d16 ] |
+	\dblb b2~ b4 \grg b4 |
+	\grA g8 [ f8 ] \grg e8 [ d8 ] \dblb b4 \grg G8. [ d16 ] |
+	\dblc c2~ c4 \grg c8. [ b16 ] |
+
+	\grg a4~ a8 [ d8 ] \grg f4 A8. [ g16 ] |
+	\grA g2~ g4 d4 |
+}
+pipesABA = {
+	\dble e4 \gra e4 \grg f4 \grg e8. [ d16 ] |
+	\dble e2~ e4
+}
+pipesABB = {
+	\dble e4~ e8 [ \gra e8 ] \grg f8 [ e8 ] \grg d8 [ c8 ] |
+	\thrwd d2.
+}
+
+pipesBAA = {
+	a4 |
+	\dblA A4~ A8 [ g8 ] \grA f4 \grg e4 |
+	\thrwd d2~ d4 b4 |
+	\grA g4~ g8 [ f8 ] \grg e4 d4 |
+	\dbld d2 \dblc c4 \gre a4 |
+
+	\dblA A4~ A8 [ g8 ] \grA f4 \grg e4 |
+	\thrwd d4~ d8 [ g8 ] \grf g2 |
+}
+pipesBAB = {
+	\grA f4~ f8 [ \birl a8 ] \grg f8 [ e8 ] \grg d8 [ c8 ] |
+	\thrwd d2~ d4
+}
+pipesBA = {
+	\pipesBAA
+	\pipesBAB
+}
+pipesBEnding = {
+	\grA f2~ f4 \birl a4 |
+	\grg f4 e4 \grg d4 c4 |
+	\thrwd d1~ |
+	d1~  |
+	d1~  |
+	d1~ 
 }

airs/rose_of_kelvingrove/pipes.ly

@@ -0,0 +1,69 @@
+\version "2.18.2"
+
+\include "bagpipe.ly"
+\include "lilydrum.ly"
+
+\include "./config.ily"
+\include "./notes.pipes.ily"
+
+\pbreak = \break
+\score {
+    \new Staff {
+		\global
+		\pipeglobal
+		<<
+			\new NullVoice = "format" {
+				\repeat volta 2 {
+					\part \halfline
+					\pbreak
+					\quartline
+				} \alternative {
+				  \quartline
+				  \quartline
+				}
+				\bar ".|:-||"
+				\break
+				\repeat volta 4 {
+					\part \halfline
+					\pbreak
+					\quartline
+				} \alternative {
+					{\quartline \pbreak}
+					{ \halfline \quartline }
+				}
+				\bar "|."
+			}%Format
+
+			\new Voice = "pipes" {
+				\pipesAA
+				\pipesABA s4
+				\pipesABB s4
+
+				\pipesBA s4
+				\pipesBEnding
+			}
+		>>
+	}
+	\header {
+		title = \title
+		meter = \meter
+		instrument = \instrumentPipes
+		composer = \composerPipes
+		arranger = \arrangerPipes
+	}
+}
+\score {
+	\new Staff { \global \pipeglobal
+		\set Staff.midiInstrument = #"bagpipe"
+		%%Tune
+
+	}
+	\midi { \confTempo }
+	\header {
+		title = \title
+		meter = \meter
+		instrument = \instrumentPipes
+		composer = \composerPipes
+		arranger = \arrangerPipes
+	}
+}