diff --git a/suite/steam_to_mallaig/config.ily b/suite/steam_to_mallaig/config.ily new file mode 100644 index 0000000..b963555 --- /dev/null +++ b/suite/steam_to_mallaig/config.ily @@ -0,0 +1,17 @@ +\version "2.19.0" +%% Globals +global = { + \key d \major + } +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 } } + +%% Headers +title = "Steam Train to Mallaig" +meter = "" diff --git a/suite/steam_to_mallaig/notes.pipes.ily b/suite/steam_to_mallaig/notes.pipes.ily new file mode 100644 index 0000000..7b9de50 --- /dev/null +++ b/suite/steam_to_mallaig/notes.pipes.ily @@ -0,0 +1,95 @@ +% 6/8 - 2/4 Steam Train to Mallaig +% Pipes +\version "2.18.2" +composerPipes = "Mary-Ann MacKinnon" +arrangerPipes = "" +pipeglobal = { + \bagpipeKey +} +% Music +pipesA = { + \grg a8. \grd c16 e8 \dblg g8. \grA f16 d8 | + \grg e16 c8. \grg c8 \grip c8. \grg c16 b8 | + \grg a8. \grd c16 e8 \dblg g8. \grA f16 d8 | + \dble e4. \gra e4 \grg c16 b16 | + + \grg a8. \grd c16 e8 \dblg g8. \grA f16 d8 | + \grg e16 c8. \grg c8 \grip c4. | + \grg d8 e8. d16 \grg G16 \grd a8. \grd b8\fermata +} +pipesB = { + \dble e8 \gra e16 d16 \grg d16 c16 \grg a8 | + \grg d16 c16 c16 d16 \grg G16 \grd G16 G16 \grd a16 | + \dble e8 \gra e16 d16 \grg d16 c16 \grg a8 | + \grg d16 c16 c16 d16 \grg G16 \grd G16 G16 \grd a16 +} +pipesC = { + \grg G16 [ g16 \grf g16 G16 ] g16[ \grf g16 G16 g16 ] | + a16 [ f16 \gre f16 a16 ] f16 [ \gre f16 a16 f16 ] | + \grg a16 [ e16 \gra e16 a16 ] \grg f16[ a16 \grg e16 a16 ] | + \grg a16 [ e16 \gra e16 a16 ] \grg f16[ a16 \grg e16 a16 ]| +} +pipesD = { + \repeat unfold 2 { + \grg a16 b16 c16 d16 \grg e16 f16 g16 e16 | + A16 e16 \gra e16 A16 c16 A16 a8 | + } + + \grg d16 a16 \grg d16 f16 A16 f16 \grg d16 f16 | + \grg a16 d16 \grg f16 a16 \grg d16 f16 a16 d16 | + \grg a16 b16 c16 d16 \grg e16 f16 g16 e16 | + A16 e16 \grg e16 A16 c16 A16 a8 +} +pipesE = { + \grg e16 g16 \grf g16 e16 \grg e16 g16 \grf g16 d16 | + \grg d16 f16 \gre f16 d16 \grg d16 f16 \gre f16 c16 | + \grg c16 e16 \gra e16 c16 \grg f16 c16 \grg e16 c16 | + \grg c16 e16 \gra e16 c16 \grg f16 c16 \grg e16 a16 | + + \grg G16 g16 \grf g16 G16 g16 \grf g16 G16 g16 | + a16 f16 \gre f16 a16 f16 \gre f16 a16 f16 | + \grg a16 e16 \gra e16 a16 \grg f16 a16 \grg e16 a16 | + \grg a16 e16 \gra e16 a16 \grg f16 a16 \grg e16 a16 +} +pipesF = { + \grg a8 [ \grd c8~ ] c8 [ e8 ] | + \dblg g8 [ \grA f8~ ] f8 [ d8 ] | + \grg e8 [ c8~ ] c4~ | + c4~ c8 [ b8 ] | + + \grg a8 [ \grd c8~ ] c8 [ e8 ] | + \dblg g8 [ \grA f8~ ] f8 [ d8 ] | + \dble e4~ e4~ | + e4~ e8 [ \grg c16 b16 ] | + + \grg a8 [ \grd c8~ ] c8 [ e8 ] | + \dblg g8 [ \grA f8~ ] f8 [ d8 ] | + \grg e8 [ c8~ ] c4~ | + c4~ c4 | + + \grg d8 [ e8~ e8 d8 ] | + \grg G8 [ \grd a8~ ] a8 [ b8 ] | + \grg a4~ a4~ | + a4~ a4 +} +pipesG = { + e16 \grg e16 \gra e16 \grg d16~ d16 \grG d16 c8 | + \grg b16[ a16 b16 \grip c16]~ c4 | + g16 \grg g16 \grf g16 \grA f16~ f16 e16 d8 | + \grg e8 c8~ c4 | + + A16[ \grg A16 \grg A16 \hdblc c16]~ c16 b16 \grg a8 | + \grg b16[ c16 d16 \dblc c16]~ c4 | + \grg G16 a16 b8~ b4 | + \grg b16 c16 d8~ d4 | + + \grg c4~ c4 | + b4~ b4 | + \dble e8 \gra e16 d16 \grg d16 c16 \grg a8 | + \grg d16 c16 \grG c16 d16 \grg G16 \grd G16 \gre G16 \grd a16 | + + \dble e8 \gra e16 d16 \grg d16 c16 \grg a8 | + \thrwd d4~ d4~ | + d16 \grg G16 G16 \gre G16 \grg a4~ | + a4~ a4 +} \ No newline at end of file diff --git a/suite/steam_to_mallaig/pipes.ly b/suite/steam_to_mallaig/pipes.ly new file mode 100644 index 0000000..f866953 --- /dev/null +++ b/suite/steam_to_mallaig/pipes.ly @@ -0,0 +1,79 @@ +\version "2.18.2" + +\include "bagpipe.ly" + +\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" { + \mark \default + \repeat unfold 7 { \grace {s2} s2. } + \bar "||" + \break + + \time 2/4 + \mark \default + \repeat volta 2 { \halfline } + \break + \mark \default + \repeat volta 2 { \halfline } + \break + \mark \default + \repeat volta 2 { \line } + \break + \mark \default + \repeat volta 2 { \line } + \break + \mark \default + \repeat volta 2 { \line \line} + \break + \mark \default + \repeat volta 2 { \line \line } + }%Format + + \new Voice = "pipes" { + \pipesA + + \pipesB + \pipesC + \pipesD + \pipesE + \pipesF + \pipesG + + } + >> + } + \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 + } +} +%}