Added new tunes for pipes

4-4_marches/flett_from_flotta/config.ily

@@ -4,9 +4,11 @@ global = {
 	\time 4/4
 	\eighthBeaming
 	}
-
+confTempo = {
+	\tempo 4 = 90
+	}
 %% Format
-part = { \partial 8 s8 }
+part = { \partial 4 s4 }
 halfline = { \repeat unfold 2 { s1 | } }
 line = { \repeat unfold 2 { \halfline } }
 
@@ -18,4 +20,4 @@ meter = "March"
 composerSide  = ""
 composerTenor = ""
 composerBass  = ""
-composerPipes = ""
+composerPipes = ""

4-4_marches/flett_from_flotta/full.ly

@@ -0,0 +1,73 @@
+\version "2.19.0"
+
+\include "config.ily"
+%\include "notes.bass.ily"
+%\include "notes.tenor.ily"
+\include "notes.side.ily"
+\include "notes.pipes.ily"
+
+\score {
+	\new StaffGroup <<
+		\new Staff {
+			\global
+			\pipeglobal
+			\set PipeBandDrumStaff.instrumentName = \markup{ \instrumentPipes }
+			\set PipeBandDrumStaff.shortInstrumentName = \markup{ \shortInstrumentPipes }
+			<<
+				{
+					\repeat volta 2 {
+						\part \line \break
+						\line \break
+					}
+					\repeat volta 2 {
+						\part \line \break
+						\line \break
+					}
+				}%Format
+				{
+					\pipesA s4
+
+					\pipesB s4
+				}%Pipes
+			>>
+		}
+		\new PipeBandDrumStaff = "side" {
+			\sideglobal
+			\set PipeBandDrumStaff.instrumentName = \markup \column {\instrumentSide}
+			\set PipeBandDrumStaff.shortInstrumentName = \markup{\shortInstrumentSide}
+			s8 \snareA s8
+
+			s4 \snareB s8
+		}
+%		\new PipeBandDrumStaff = "bass" {
+%			\bassglobal
+%			\set PipeBandDrumStaff.instrumentName = \markup{ \instrumentBass }
+%			\set PipeBandDrumStaff.shortInstrumentName = \markup{ \shortInstrumentBass}
+%
+%		}
+%		\new PipeBandDrumStaff = "tenor" {
+%			\tenorglobal
+%			\set PipeBandDrumStaff.instrumentName = \markup{ \instrumentTenor }
+%			\set PipeBandDrumStaff.shortInstrumentName = \markup{ \shortInstrumentTenor }
+%
+%		}
+	>>
+	\header {
+		title = \title
+		meter = \meter
+		composer = \markup \large {
+			\column \right-align {
+				$(if (not (string=? "" composerPipes))  #{ \markup {\line { \composerPipes  ":" }} #} )
+				$(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=? "" composerPipes))  #{ \markup {\line { \instrumentPipes }}#} )
+				$(if (not (string=? "" composerSide))  #{ \markup {\line { \instrumentSide }}#} )
+				$(if (not (string=? "" composerTenor)) #{ \markup {\line { \instrumentTenor }}#} )
+				$(if (not (string=? "" composerBass))  #{ \markup {\line { \instrumentBass }}#} )
+			}
+		}
+	}
+}

4-4_marches/flett_from_flotta/notes.pipes.ily

@@ -0,0 +1,32 @@
+% 4/4 Flett from Flotta
+% Pipes
+\version "2.18.2"
+composerPipes = "PM Donald MacLeod"
+pipeglobal = {
+	\bagpipeKey
+	}
+pipesA = {
+	\grg f8. [ e16 ]  |
+	\dblc c8. [ e16 ] \dblc c8 [ \gre b8 ] \dblc c4 \gre a8 [ \grd c8 ]  |
+	\grg e8. [ f16 ] \dble e8 [ c8 ] \dble e4 \dblc c8 [ e8 ]  |
+	\dblf f8. [ e16 ] \grg f8 [ A8 ] \hdblf f4 \dble e8 [ c8 ]  |
+	\dblf f8. [ e16 ] \dblc c8 [ \gre a8 ] \grip b4 \grg f8. [ e16 ]  | 
+
+	\dblc c8. [ e16 ] \dblc c8 [ \gre b8 ] \dblc c4 \gre a8 [ \grd c8 ]  |
+	\grg e8. [ f16 ] \dble e8 [ c8 ] \dblA A4 a8. [ b16 ]  |
+	\grip c4 \dblA A4 e16 [ \grg c8. ] \grg b8. [ \grd c16 ]  |
+	\grg a2 \wbirl a4 
+}
+
+pipesB = {
+	\grg a8 [ \grd c8 ]  |
+	\dble e4 \grg a8 [ \grd c8 ] \dblA A4 a8 [ \grd c8 ]  |
+	\grg e8. [ f16 ] \dble e8 [ c8 ] \dble e4 \grg a8 [ \grd c8 ]  |
+	\dblA A4 a8 [ \grd c8 ] \dble e4 \dblc c8 [ e8 ]  |
+	\dblf f8. [ e16 ] \dblc c8 [ \gre a8 ] \grip b4 \grg f8. [ e16 ]  | 
+
+	\dblc c8. [ e16 ] \dblc c8 [ \gre b8 ] \dblc c4 \gre a8 [ \grd c8 ]  |
+	\grg e8. [ f16 ] \dble e8 [ c8 ] \dblA A4 a8. [ b16 ]  |
+	\grip c4 \dblA A4 e16 [ \grg c8. ] \grg b8. [ \grd c16 ]  |
+	\grg a2 \wbirl a4
+}

4-4_marches/flett_from_flotta/notes.side.ily

@@ -2,7 +2,9 @@
 % Snare
 \version "2.18.2"
 composerSide = ""
-
+sideglobal = {
+	\eighthBeaming
+	}
 %%music
 snareA = \drummode {
 	d8:32( |
@@ -26,4 +28,4 @@ snareB = \drummode {
 	g8) \tuplet 3/2 { d16 g d-> }		g16. g32 d8		\flamg g4		d8:32( g8:32) |
 	\flamd d8 \tuplet 3/2 { g16 d g }	d8:32(-> g8:32)(->		\tuplet 3/2 { d16) g d } \flamg g8		\flamd d8 g8:32( |
 	d4)->		d4:32(		d4)		r8
-}
+}

4-4_marches/flett_from_flotta/pipes.ly

@@ -0,0 +1,49 @@
+\version "2.18.2"
+
+\include "config.ily"
+\include "notes.pipes.ily"
+
+\score {
+    \new Staff {
+		\global
+		\pipeglobal
+		<<
+			{
+				\repeat volta 2 {
+					\partial 4 s4
+					\line \break
+					\line \break 
+				}
+				\repeat volta 2 {
+					\partial 4 s4
+					\line \break
+					\line \break
+				}
+			}
+			{
+				\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 }
+}

4-4_marches/flett_from_flotta/side.ly

@@ -13,7 +13,7 @@
 
 			}
 			{
-			 \snareA s8
+			 s8 \snareA s8
 
 			 \snareB s8
 			}
@@ -25,4 +25,4 @@
 		instrument = \instrumentSide
 		composer = \composerSide
 	}
-}
+}