Steam Train of Mallaig Part 2: full score available

complement to a2949f2

suites/steam_train_to_mallaig/config.ily

@@ -1,13 +1,12 @@
 \version "2.19.0"
 %% Globals
 global = {
-	\key d \major
+	\key a \mixolydian
 	}
 confTempo = {
 	\tempo 4 = 80
 	}
 %% Format
-part = { \partial 8 \grace{s4.} s8 }
 measure = { \grace {s1} s2 | }
 halfline = { \repeat unfold 4 \measure }
 line = { \repeat unfold 2 { \halfline } }

suites/steam_train_to_mallaig/notes.pipes.ily

@@ -17,11 +17,14 @@ pipesIntro = {
 	\grg e16 c8. \grg c8		\grip c4. |
 	\grg d8 e8. d16			\grg G16 \grd a8.\grd b8\fermata |
 }
-pipesA = {
+pipesAA = {
-	\repeat unfold 2 {
 	\dble e8 \gra e16 d16		\grg d16 c16 \grg a8 |
 	\grg d16 c16 \grG c16 d16	\grg G16 \grd G16 \gre G16 \grd a16 |
 }
+pipesA = {
+	\repeat unfold 2 {
+		\pipesAA
+	}
 }
 pipesB = {
 	\grg G16 [ g16 \grf g16 G16 ]	g16 [ \grf g16 G16  g16 ] |

suites/steam_train_to_mallaig/notes.pipes.seconds.ily

@@ -0,0 +1,80 @@
+% 6/8 - 2/4 Steam Train to Mallaig
+% Pipes (Seconds / 3rd Piper)
+\version "2.18.2"
+composerPipesSecnd = "Mary-Ann MacKinnon"
+arrangerPipesSecnd = ""
+pipessecndglobal = {
+	\key a \mixolydian
+}
+% Music
+pipessecndIntro = {
+	R2.*7
+}
+pipessecndAA = {
+	R2*4
+}
+pipessecndAB = {
+	\repeat unfold 2 {
+		A8 [ \grg A16 f16 ] \grg f16 [ e16 \grg c8 ] |
+		\grg f16 [ e16 \gra e16 f16 ] \grg b16 [ \grd b16 \gre b16 \grd c16 ] |
+	}
+}
+
+pipessecndB = {
+	\dblg g4~ g8 [ A16 g16 ] |
+	\hdblf f4~ f8 [ A16 f16 ] |
+	\dble e4~ e4~ |
+	e4~ e4
+}
+
+pipessecndC = {
+	\grg c4~ c4~ |
+	c4~ c16 [ d16 \grg c16 b16 ] |
+	\grg c4~ c4~ |
+	c4~ c16 [ d16 \grg c16 b16 ] |
+
+	\grg d4~ d4~ |
+	d4~ d16 [ e16 \grg d16 b16 ] |
+	\grg c4~ c4~ |
+	c4~ c16 [ d16 \grg c16 b16 ]
+}
+
+pipessecndD = {
+	\grg c16 [ e16 \gra e16 c16 ]	\grg c16 [ e16 \gra e16 b16 ] |
+	\grg b16 [ d16 \grc d16 b16 ]	\grg b16 [ d16 \grc d16 a16 ] |
+	\grg a16 [ c16 \grG c16 a16 ]	\grg d16 [ a16 \grg c16 a16 ] |
+	\grg a16 [ c16 \grG c16 a16 ]	\grg d16 [ a16 \grg c16 a16 ] |
+
+	\pipessecndB
+}
+
+pipessecndE = {
+	\repeat unfold 2 {
+		\grg a16 [ \grd c16 e16 \grg a16 ]	\grd c16 [ e16 a16 \grd c16 ]
+		\grg G16 [ b16 d16 G16 ]				\grg b16 [ d16 G16 \grd b16 ]
+		\grg a16 [ \grd c16 e16 \grg a16 ]	\grd c16 [ e16 a16 \grd c16 ]
+		e16 [ \grg a16 c16 e16 ]				\grg a16 [ \grd c16 e16 a16 ]
+	}
+}
+
+pipessecndF = {
+	A16 [ \grg A16 \grg A16 f16~ ]				f16 [ \grg f16 e8 ]
+	\grg d16 [ c16 d16 \dble e16~ ]					e4 |
+	\grg d16 [ \gre d16 \grG d16 \grg d16~ ]		d16 [ A16 f8 ] |
+	\dblc c8 [ \gre a8~ ]							a4 |
+
+	\grg c16 [ \grd c16 \gre c16 a16~ ]	a16 [ d16 c8 ]
+	\grg d16 [ e16 f16 \grg e16~ ]		e4 |
+	\grg b16 [ c16 d8~ ]					d4 |
+	\grg d16 [ e16 f8~ ]					f4 |
+
+	\grg e4~ e4 |
+	\grg d4~ d4 |
+	A8 [ \grg A16 f16 ]					\grg f16 [ e16 \grg c8 ] |
+	\grg f16 [ e16 \gra e16 f16 ]		\grg b16 [ \grd b16 \gre b16 \grd c16 ] |
+
+	A8 [ \grg A16 f16 ]					\grg f16 [ e16 \grg c8 ] |
+	\grg b4~								b4~ |
+	\grg b16 [ \grd b16 \gre b8 ]	\grd c4~ |
+	c4~									c4 |
+}

suites/steam_train_to_mallaig/notes.pipes.thirds.ily

@@ -0,0 +1,81 @@
+% 6/8 - 2/4 Steam Train to Mallaig
+% Pipes (1st Harmony / 3rd Piper)
+\version "2.18.2"
+composerPipesthrd = ""
+arrangerPipesthrd = ""
+pipesthrdglobal = {
+	\key a \mixolydian
+}
+% Music
+pipesthrdIntro = {
+	R2.*7
+}
+pipesthrdAA = {
+	R2*6
+}
+pipesthrdAB = {
+	\dble e8 [ \gra e16 d16 ]	\grg d16 [ c16 \grg a8 ] |
+	d16 [ c16 \grG c16 d16 ]			\grg G16 [ \grd G16 G16 \grd a16 ]
+}
+
+pipesthrdBA = {
+	\grg e4~ e8 [ \grg f16 e16 ] |
+	\thrwd d4~ d8 [ \grg e16 d16 ] |
+	\dblc c4~ c4~ |
+	c4~ c4
+}
+
+pipesthrdC = {
+	\grg e4~ e4~ |
+	e4~ e16 [ f16 \grg e16 d16 ]
+	\grg e4~ e4~ |
+	e4~ e16 [ f16 \grg e16 d16 ] |
+
+	\grg f4~ f4~ |
+	f4~ f16 [ g16 \grA f16 d16 ] |
+	\grg e4~ e4~ |
+	e4~ e16 [ f16 \grg e16 d16 ]
+}
+
+pipesthrdD = {
+	\grg c16 [ e16 \gra e16 c16 ]	\grg c16 [ e16 \gra e16 b16 ] |
+	\grg b16 [ d16 \grc d16 b16 ]	\grg b16 [ d16 \grc d16 a16 ] |
+	\grg a16 [ c16 \grG c16 a16 ]	\grg d16 [ a16 \grg c16 a16 ] |
+	\grg a16 [ c16 \grG c16 a16 ]	\grg d16 [ a16 \grg c16 a16 ] |
+
+	\grg e4~ e8 [ \grg f16 e16 ] |
+	\thrwd d4~ d8 [ \grg e16 d16 ] |
+	\dblc c4~ c4~ |
+	c4~ c4
+}
+
+pipesthrdE = {
+	\repeat unfold 2 {
+ 		\grg c16 [ e16 A16 c16 ]	\grg e16 [ A16 c16 e16 ] |
+ 		\grg b16 [ d16 g16 \grA b16 ]	d16 [ g16 \grA b16 d16 ] |
+ 		\grg c16 [ e16 A16 c16 ]	\grg e16 [ A16 c16 e16 ] |
+ 		A16 [ c16 \grg e16 A16 ]	c16 [ e16 A16 c16 ] |
+	}
+}
+
+pipesthrdF = {
+	\dblA A4~	A4 |
+	e8. [ \dblA A16~ ]	A4 |
+	\grf g8. [ \grA f16~ ]	f4 |
+	\dblA A8 [ e8~ ]	e4 |
+
+ 	\grg e16 [ \grg e16 \gra e16 \dblA A16~ ] A4 |
+ 	G16 [ a16 b16 \grg e16~ ]	e4 |
+ 	\grg b16 [ c16 d8 ] \grg b16 [ c16 d8 ] |
+ 	\grg d16 [ e16 f8 ] \grg d16 [ e16 f8 ] |
+
+ 	\dblA A4~ A4 |
+ 	\grf g4~ g4 |
+ 	A8 [ \grg A16 f16 ]	\grg f16 [ e16 \grg c8 ] |
+ 	\grg f16 [ e16 \grd e16 f16 ]	\grg b16 [ \grd b16 \gre b16 \grd c16 ] |
+
+ A8 [ \grg A16 f16 ]	\grg f16 [ e16 \grg c8 ] |
+ \dblg g4~ g4~ |
+ g16 [ d16 \gre d16 \grc d16 ]	\dble e4~ |
+ e4~ e4
+}

suites/steam_train_to_mallaig/pipes.full.ly

@@ -0,0 +1,268 @@
+\version "2.19.0"
+
+\include "bagpipe.ly"
+
+\include "./config.ily"
+\include "./notes.pipes.ily"
+\include "./notes.pipes.seconds.ily"
+\include "./notes.pipes.thirds.ily"
+
+%% Remove EmptyStaves
+\layout {
+  \context {
+    \RemoveEmptyStaffContext
+  }
+  \context {
+    \Score
+    \override VerticalAxisGroup #'remove-first = ##t
+  }
+  \context{
+    \StaffGroup
+    \override SystemStartBracket #'collapse-height = #5
+  }
+}
+
+\layout {
+	indent = 8.0
+	short-indent = 2.0
+}
+
+%% We want this a4 in portrait
+#(set-default-paper-size "a4portrait")
+
+
+\score {
+	\new StaffGroup <<
+		\new Staff = "pipes" \with {
+			instrumentName = \markup{ \instrumentPipes }
+			shortInstrumentName = \markup{ \shortInstrumentPipes }
+		} {
+			\global
+			\pipeglobal
+		\set Score.markFormatter = #format-mark-box-letters
+		\time 6/8
+			<<
+			  	\new NullVoice = "format" {
+					\repeat unfold 7 { \grace {s2} s2. }
+					\bar "||"
+					\break
+
+					\time 2/4
+					\bar "||"
+					\mark \default
+					<<
+						\repeat unfold 2 { \halfline }
+						{ s2*2 \bar "--" \mark \markup { \box \tiny "2nd Piper" } }
+					>>
+					\break
+
+					\mark \default
+					\repeat volta 2 {\halfline }
+					\break
+
+					\mark \default
+					\repeat unfold 1 { \line }
+					\break
+
+					\bar "||"
+					\mark \default
+					\repeat unfold 1 { \line }
+					\break
+
+					\bar "||"
+					\mark \default
+					\repeat unfold 1 { \line \line}
+					\pageBreak
+
+					\bar "||"
+					\mark \markup \box \bold "Fine"
+					\line \line
+					\bar "|."
+			  	}
+				\new Voice = "pipes" {
+					\pipesIntro
+
+
+					\repeat unfold 2 {
+						\pipesA
+					}
+					%\repeat volta 2 {
+						\pipesB
+					%}
+
+					\pipesC
+
+					\pipesD
+
+					\pipesE
+
+					\pipesF
+				}%Pipes
+			>>
+		}
+		\new Staff = "piper3 - seconds" \with {
+			instrumentName = \markup{ \instrumentPipesSecnd }
+			shortInstrumentName = \markup{ \shortInstrumentPipesSecnd }
+		} {
+			\pipessecndglobal
+			%%Tune
+			R2.*7
+
+			\repeat unfold 1 {
+				R2*2 \pipesAA \pipesA
+
+				%\repeat volta 2 {
+					\pipesB
+				%}
+
+				\pipesC
+
+				\pipesD
+
+				\pipesE
+			}
+			\pipesF
+
+		}
+		\new Staff = "piper4 - thirds" \with {
+			instrumentName = \markup{ \instrumentPipesThrd }
+			shortInstrumentName = \markup{ \shortInstrumentPipesThrd }
+		} {
+			\pipesthrdglobal
+			%% Thirds
+			\pipesthrdIntro
+
+			\repeat unfold 1 {
+				\pipesthrdAA
+				\pipesthrdAB
+
+				%\repeat volta 2 {
+					\pipesthrdBA
+				%}
+
+				\pipesthrdC
+
+				\pipesthrdD
+
+				\repeat unfold 2 {
+					\pipesthrdE
+				}
+			}
+
+			\pipesthrdF
+		}
+
+	>>
+	\header {
+		title = \title
+		meter = \meter
+		composer = \markup \large {
+			\column \right-align {
+				$(if (not (string=? "" composerPipes))  #{ \markup {\line { \composerPipes  ":" }} #} )
+			}
+			\column \right-align {
+				$(if (not (string=? "" composerPipes))  #{ \markup {\line { \instrumentPipes }}#} )
+			}
+		}
+	}
+}
+\score {
+	\unfoldRepeats \new StaffGroup <<
+		\global
+		\new Staff = "piper1" {
+			\pipeglobal
+			\set Staff.midiInstrument = #"bagpipe"
+			%%Tune
+			\tempo 4. = 40
+			\time 6/8
+			\pipesIntro
+
+			\break
+			\confTempo
+			\time 2/4
+			\repeat unfold 1 {
+				\mark \default
+				\repeat volta 2 {\pipesA}
+				\mark \default
+				\repeat volta 2 {\pipesB}
+				\mark \default
+				\repeat unfold 1 {\pipesC}
+				\mark \default
+				\repeat unfold 1 {\pipesD}
+				\mark \default
+				\repeat unfold 1 {\pipesE}
+			}
+			\mark \markup \box \bold "Fine"
+			\pipesF
+
+		}
+		\new Staff = "piper2" {
+			\pipeglobal
+			\set Staff.midiInstrument = #"bagpipe"
+			%%Tune
+			R2.*7
+
+			\repeat unfold 1 {
+				R2*2 \pipesAA \pipesA
+
+				\repeat volta 2 { \pipesB }
+
+				\pipesC
+
+				\pipesD
+
+				\pipesE
+			}
+			\pipesF
+		}
+		\new Staff = "piper3 - seconds" {
+			\pipessecndglobal
+			\set Staff.midiInstrument = #"bagpipe"
+			%% Seconds
+			\pipessecndIntro
+
+			\repeat unfold 1 {
+				\pipessecndAA
+				\pipessecndAB
+
+				\repeat volta 2 { \pipessecndB }
+
+				\pipessecndC
+
+				\pipessecndD
+
+				\repeat volta 2 { \pipessecndE }
+			}
+
+			\pipessecndF
+		}
+		\new Staff = "piper4 - thirds" {
+			\pipesthrdglobal
+			\set Staff.midiInstrument = #"bagpipe"
+			%% Thirds
+			\pipesthrdIntro
+
+			\repeat unfold 1 {
+				\pipesthrdAA
+				\pipesthrdAB
+
+				\repeat volta 2 { \pipesthrdBA }
+
+				\pipesthrdC
+
+				\pipesthrdD
+
+				\repeat volta 2 { \pipesthrdE }
+			}
+
+			\pipesthrdF
+		}
+	>>
+	\midi { \confTempo }
+	\header {
+		title = \title
+		meter = \meter
+		instrument = \instrumentPipes
+		composer = \composerPipes
+	}
+}

suites/steam_train_to_mallaig/pipes.ly

@@ -1,4 +1,3 @@
-
 \version "2.18.2"
 
 \include "bagpipe.ly"
@@ -6,40 +5,48 @@
 \include "./config.ily"
 \include "./notes.pipes.ily"
 
-
 #(set-default-paper-size "a4" 'portrait)
 \score {
     \new Staff {
 		\global
 		\pipeglobal
 		\set Score.markFormatter = #format-mark-box-letters
-		\time 6/8
 		<<
 			\new NullVoice = "format" {
+
+				\time 6/8
 				\repeat unfold 7 { \grace {s2} s2. }
 				\bar "||"
 				\break
 
 				\time 2/4
 				\mark \default
+				<<
 					\repeat volta 2 { \halfline }
+					{ s2*2 \bar "--" \mark \markup { \box \tiny "2nd Piper" } }
+				>>
 				\break
+
 				\mark \default
 				\repeat volta 2 { \halfline }
 				\break
+
 				\mark \default
 				\repeat unfold 1 { \line }
-				\bar "||"
 				\break
+
+				\bar "||"
 				\mark \default
 				\repeat unfold 1 { \line }
-				\bar "||"
 				\break
+
+				\bar "||"
 				\mark \default
 				\repeat unfold 1 { \line \line}
-				\bar "||"
 				\break
-  				\mark \default
+
+				\bar "||"
+				\mark \markup \box \bold "Fine"
 				\line \line
 				\bar "|."
 			}%Format
@@ -47,8 +54,12 @@
 			\new Voice = "pipes" {
 				\pipesIntro
 
+				%\repeat volta 2 {
 					\pipesA
+				%}
+				%\repeat volta 2 {
 					\pipesB
+				%}
 				\pipesC
 				\pipesD
 				\pipesE
@@ -67,20 +78,24 @@
 }
 
 \score {
-	\new Staff { \global \pipeglobal
+	\unfoldRepeats \new Staff {
+		\global \pipeglobal
 		\set Staff.midiInstrument = #"bagpipe"
 		%%Tune
+		\tempo 4. = 40
 		\time 6/8
 		\pipesIntro
 
 		\time 2/4
+		\confTempo
 		\repeat unfold 1 {
-			\repeat unfold 2 {\pipesA}
+			\repeat volta 2 { \pipesA }
-			\repeat unfold 2 {\pipesB}
+			\repeat volta 2 { \pipesB }
-			\repeat unfold 2 {\pipesC}
+			\pipesC
-			\repeat unfold 2 {\pipesD}
+			\pipesD
-			\repeat unfold 2 {\pipesE}
+			\pipesE
 		}
+
 		\pipesF
 	}
 	\midi { \confTempo }
@@ -91,4 +106,5 @@
 		composer = \composerPipes
 		arranger = \arrangerPipes
 	}
+
 }

suites/steam_train_to_mallaig/pipes.seconds.ly

@@ -0,0 +1,115 @@
+\version "2.18.2"
+
+\include "bagpipe.ly"
+
+\include "./config.ily"
+\include "./notes.pipes.seconds.ily"
+
+\score {
+    \new Staff {
+		\global
+		\pipessecndglobal
+		\compressFullBarRests
+  		\override Score.MultiMeasureRest.expand-limit = #1
+		\set Score.markFormatter = #format-mark-box-letters
+		<<
+			\new NullVoice = "format" {
+
+				\time 6/8
+				s2.*7
+				\bar "||"
+
+				\time 2/4
+				\bar "||"
+				\mark \default
+				s2*4
+				\repeat unfold 1 { \halfline }
+				\break
+
+				\mark \default
+				\repeat volta 2 {\halfline }
+				\break
+
+				\mark \default
+				\repeat unfold 1 { \line }
+				\break
+
+				\bar "||"
+				\mark \default
+				\repeat unfold 1 { \line }
+				\break
+
+				\mark \default
+				\repeat volta 2 { \halfline \break \halfline }
+				\break
+
+				\mark \markup \box \bold "Fine"
+				\line \line
+				\bar "|."
+			}%Format
+			\new Voice = "seconds" {
+				\pipessecndIntro
+
+				\pipessecndAA
+				\pipessecndAB
+
+				%\repeat volta 2 {
+					\pipessecndB
+				%}
+
+				\pipessecndC
+
+				\pipessecndD
+
+				%\repeat volta 2 {
+					\pipessecndE
+				%}
+
+				\pipessecndF
+			}
+		>>
+	}
+	\header {
+		title = \title
+		meter = \meter
+		instrument = \instrumentSecnd
+		composer = \composerPipesSecnd
+		arranger = \arrangerPipesSecnd
+	}
+}
+\score {
+	\unfoldRepeats \new Staff {
+		\global \pipessecndglobal
+		\set Staff.midiInstrument = #"bagpipe"
+		%%Tune
+		\tempo 4. = 40
+		\time 6/8
+		\pipessecndIntro
+
+		\time 2/4
+		\confTempo
+		\repeat unfold 1 {
+			\pipessecndAA
+			\pipessecndAB
+
+			\repeat volta 2 { \pipessecndB }
+
+			\pipessecndC
+
+			\pipessecndD
+
+			\repeat volta 2 { \pipessecndE }
+		}
+
+		\pipessecndF
+	}
+	\midi { \confTempo }
+	\header {
+		title = \title
+		meter = \meter
+		instrument = \instrumentSecnd
+		composer = \composerPipesSecnd
+		arranger = \arrangerPipesSecnd
+	}
+
+}

suites/steam_train_to_mallaig/pipes.thirds.ly

@@ -0,0 +1,115 @@
+\version "2.18.2"
+
+\include "bagpipe.ly"
+
+\include "./config.ily"
+\include "./notes.pipes.thirds.ily"
+
+\score {
+    \new Staff {
+		\global
+		\pipesthrdglobal
+		\compressFullBarRests
+  		\override Score.MultiMeasureRest.expand-limit = #1
+		\set Score.markFormatter = #format-mark-box-letters
+		<<
+			\new NullVoice = "format" {
+
+				\time 6/8
+				s2.*7
+				\bar "||"
+
+				\time 2/4
+				\bar "||"
+				\mark \default
+				\repeat unfold 1 { \grace {s4} s2*8 }
+				\break
+
+				\mark \default
+				\repeat volta 2 { \grace { s32 } s2*4 }
+				\break
+
+				\mark \default
+				\repeat unfold 1 { \line }
+				\break
+
+				\bar "||"
+				\mark \default
+				\repeat unfold 1 { \line }
+				\break
+
+				\mark \default
+				\repeat volta 2 { \halfline \break \halfline }
+				\break
+
+				\mark \markup \box \bold "Fine"
+				\line \line
+				\bar "|."
+			}%Format
+
+			\new Voice = "thirds" {
+				\pipesthrdIntro
+
+				\pipesthrdAA
+				\pipesthrdAB
+
+				%\repeat volta 2 {
+					\pipesthrdBA
+				%}
+
+				\pipesthrdC
+
+				\pipesthrdD
+
+				%\repeat volta 2 {
+					\pipesthrdE
+				%}
+
+				\pipesthrdF
+			}
+		>>
+	}
+	\header {
+		title = \title
+		meter = \meter
+		instrument = \instrumentThrd
+		composer = \composerPipesthrd
+		arranger = \arrangerPipesthrd
+	}
+}
+\score {
+	\unfoldRepeats \new Staff {
+		\global \pipesthrdglobal
+		\set Staff.midiInstrument = #"bagpipe"
+		%%Tune
+		\tempo 4. = 40
+		\time 6/8
+		\pipesthrdIntro
+
+		\time 2/4
+		\confTempo
+		\repeat unfold 1 {
+			\pipesthrdAA
+			\pipesthrdAB
+
+			\repeat volta 2 { \pipesthrdBA }
+
+			\pipesthrdC
+
+			\pipesthrdD
+
+			\repeat volta 2 { \pipesthrdE }
+		}
+
+		\pipesthrdF
+	}
+	\midi { \confTempo }
+	\header {
+		title = \title
+		meter = \meter
+		instrument = \instrumentThrd
+		composer = \composerPipesthrd
+		arranger = \arrangerPipesthrd
+	}
+
+}