A lot of new Tunes

Still work to do on the Anthems and Jim Thomson of flagstaff

other/god_save_the_queen/GodSaveTheQueen.ly

@@ -0,0 +1,51 @@
+\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"
+	}
+	
+}
+

other/god_save_the_queen/config.ily

@@ -0,0 +1,16 @@
+\version "2.19.0"
+%% Globals
+global = {
+	\time 3/4
+	}
+confTempo = { 
+	\tempo 4 = 60 
+	}
+%% Format
+measure = { \grace {s1} s2. | }
+halfline = { \repeat unfold 2 \measure }
+line = { \repeat unfold 2 { \halfline } }
+
+%% Headers
+title = "God Save The Queen"
+meter = "British National Anthem"

other/god_save_the_queen/lyrics.ly

@@ -0,0 +1,64 @@
+\version "2.18.2"
+
+\include "config.ily"
+%\include "notes.pipes.ily"
+\include "notes.lyrics.ily"
+
+\score {
+    \new Staff {
+		\global
+		\lyricsglobal
+		<<
+		  	\new NullVoice = "format"{
+				\line \halfline
+				\break
+				\line
+				\break
+				\line
+				\bar "|."
+			}%Format
+
+			\new Voice = "tune" {
+				\songA
+			}
+
+			\new Lyrics = "lyrics" {
+				\lyricsto "tune" { 
+					\lyricsA
+				}
+			}
+		>>
+	}
+	\header {
+		title = \title
+		meter = \meter
+		instrument = \instrumentLyrics
+		composer = \markup \large {
+		  	\column \right-align {
+				$(if (not (string=? "" composerLyrics)) #{ \markup { \line { \composerLyrics } } #} )
+				$(if (not (string=? "" composerPipes)) #{ \markup { \line { \composerPipes  ":" } } #} )
+		  	}
+			\column \right-align {
+				$(if (not (string=? "" composerLyrics)) #{ \markup { \line { } } #} )
+			    $(if (not (string=? "" composerPipes)) #{ \markup { \line { \instrumentPipes  } } #} )
+			}
+		}
+
+	}
+}
+\markup {
+  \line{
+	\column {
+	  \verseA
+	  \combine \null \vspace #0.5
+	  \verseC
+	  \combine \null \vspace #0.5
+	  \verseE
+	}
+	\column {
+	  \verseB
+	  \combine \null \vspace #0.5
+	  \verseD
+	}
+  }
+}

other/god_save_the_queen/notes.lyrics.ily

@@ -0,0 +1,94 @@
+% 3/4 God Save the Queen
+% Lyrics (From Wikipedia)
+\version "2.18.2"
+composerLyrics  = ""
+lyricsglobal = {}
+% Music
+songA = {
+	 d4  d4  e4 |
+	 c4. d8  e4 |
+	 f4  f4  g4 |
+	 f4. e8  d4 |
+	 e4  d4 c4 |
+	 d2. | 
+	
+	 A4  A4  A4 |
+	 A4. g8  f4 |
+	 g4  g4  g4 |
+	 g4. f8  e4 | 
+	
+	 f4  g8([ f8)]  e8([ d8)] |
+	 f4. g8  A4 |
+	 A8(  g8)   f4  e4 |
+	 d2.
+}
+lyricsA = \lyricmode {
+	\set stanza = #"1."
+	God save our grac- ious Queen,
+	Long live our no- ble Queen,
+	God save the Queen:
+	Send her vic- tor- i- ous,
+	Hap- py and glor- i- ous,
+	Long to reign  ov- er us:
+	God save the Queen.
+}
+verseA = \markup \column {
+  \line \bold {1.}
+  \line { God save our gracious Queen,}
+  \line { Long live our noble Queen,}
+  \line { God save the Queen:}
+  \line { Send her victorious,}
+  \line { Happy and glorious,}
+  \line { Long to reign over us:}
+  \line { God save the Queen.}
+}
+verseB = \markup \column {
+  \line \bold {2.}
+  \line { O Lord, our God, arise,}
+  \line { Scatter her enemies,}
+  \line { And make them fall:}
+  \line { Confound their politics,}
+  \line { Frustrate their knavish tricks,}
+  \line { On thee our hopes we fix:}
+  \line { God save us all.}
+}
+verseC = \markup \column {
+  \line \bold {3.}
+  \line { Thy choicest gifts in store,}
+  \line { On her be pleased to pour;}
+  \line { Long may she reign:}
+  \line { May she defend our laws,}
+  \line { And ever give us cause}
+  \line { To sing with heart and voice}
+  \line { God save the Queen.}
+}
+verseD = \markup \column {
+  \line \bold {4.}
+  \line { Not in this land alone,}
+  \line { But be God's mercies known,}
+  \line { From shore to shore!}
+  \line { Lord make the nations see,}
+  \line { That men should brothers be,}
+  \line { And form one family,}
+  \line { The wide world over.}
+}
+verseE = \markup \column {
+  \line \bold {5.}
+  \line { From every latent foe,}
+  \line { From the assassins blow,}
+  \line { God save the Queen!}
+  \line { O'er her thine arm extend,}
+  \line { For Britain's sake defend,}
+  \line { Our mother, prince, and friend,}
+  \line { God save the Queen!}
+}
+verseF = \markup \column {
+  \line \bold {During the Jacobite Risings}
+  \line { Lord grant that Marshall Wade}
+  \line { May by thy mighty aid}
+  \line { Victory bring.}
+  \line { May he sedition hush,}
+  \line { And like a torrent rush,}
+  \line { Rebellious Scots to crush.}
+  \line { God save the Queen!}
+}

other/god_save_the_queen/notes.pipes.ily

@@ -0,0 +1,28 @@
+% 3/4 God Save The Queen
+% Pipes
+\version "2.18.2"
+composerPipes = ""
+pipeglobal = {
+	\bagpipeKey
+	}
+% Music
+pipesA = {
+	\thrwd d4 \slurd d4 \dble e4 |
+	\dblc c4. d8 \dble e4 |
+	\grg f4 \gre f4 \dblg g4 |
+	\hdblf f4. e8 \thrwd d4 |
+	\grg e4 \thrwd d4 c4 |
+	\thrwd d2. | 
+}
+pipesB = {
+	\dblA A4 \grip A4 \grg A4 |
+	\dblA A4. g8 \hdblf f4 |
+	\dblg g4 \grA g4 \grf g4 |
+	\grA g4. f8 \dble e4 | 
+}
+pipesC = {
+	\grg f4 \dblg g8 [ f8 ] \grg e8 [ d8 ] |
+	\dblf f4. g8 \dblA A4 |
+	\grip A8 [ g8 ] \hdblf f4 \dble e4 |
+	\thrwd d2.
+}

other/god_save_the_queen/pipes.ly

@@ -0,0 +1,49 @@
+\version "2.18.2"
+
+\include "config.ily"
+\include "notes.pipes.ily"
+
+\score {
+    \new Staff {
+		\global
+		\pipeglobal
+		<<
+			\new NullVoice = "format" {
+				\line \halfline
+				\break
+				\line
+				\break
+				\line
+				\bar "|."
+			}%Format
+			
+			\new Voice = "pipes" {
+				\pipesA
+				\pipesB
+				\pipesC
+			}
+		>>
+	}
+	\header {
+		title = \title
+		meter = \meter
+		instrument = \instrumentPipes
+		composer = \composerPipes
+	}
+}
+\score {
+	\new Staff { \global \pipeglobal
+		\set Staff.midiInstrument = #"bagpipe"
+		%%Tune
+		\pipesA
+		\pipesB
+		\pipesC
+	}
+	\midi { \confTempo }
+	\header {
+		title = \title
+		meter = \meter
+		instrument = \instrumentPipes
+		composer = \composerPipes
+	}
+}