bagpipe.ly/cheatsheet.ly

%{
    All of the bagpipe specific markup.
%}

\version "2.16.0"

#(ly:set-option 'point-and-click #f)

% Choose a size
#(set-global-staff-size 18)
#(set-default-paper-size "a4" 'landscape)

\include "./bagpipe_new.ly"

\paper {
  indent = 0\mm
  ragged-right = ##t
  ragged-bottom = ##t
}
\layout {
  indent = 30\mm
  \context {
    \Score
    \override NonMusicalPaperColumn #'line-break-permission = ##f
  }
}

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = "Plain notes "
    G4 a b c cflat d e f fflat g gflat A
    }
    \addlyrics {
    G a b c cflat d e f fflat g gflat A
    }
}

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = "Single grace notes "
    \grG a4 \gra a \grb a \grc a \grd a
    \gre a \grf a \grg a \grA a
    }
    \addlyrics {
    "\grG" "\gra" "\grb" "\grc" "\grd"
    "\gre" "\grf" "\grg" "\grA"
    }
}

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = "Doublings "
    \dblG G \dbla a \dblb b \dblc c \dbld d
    \dble e \dblf f \dblg g \dblA A \tripleA A
    \hdblf f \tdblf f
    }
    \addlyrics {
    "\dblG" "\dbla" "\dblb" "\dblc" "\dbld"
    "\dble" "\dblf" "\dblg" "\dblA" "\\tripleA"
    "\hdblf" "\\tdblf"
    }
}
\markup { "All other half doublings and thumb doublings are available similarly." }

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = "Slurs "
    \slura a \slurb b \slurc c \slurd d \wslurd d
    \slure e \slurf f \slurg g \slurA A
    \hslurf f \tslurf f
    }
    \addlyrics {
    "\slura" "\slurb" "\slurc" "\slurd" "\wslurd"
    "\slure" "\slurf" "\slurg" "\slurA"
    "\hslurf" "\\tslurf"
    }
}
\markup { "All other half slurs and thumb slurs are available similarly. "
          "Note that many of these aren't really playable, and are only included for consistency." }

\pageBreak

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = "Shakes "
    \shakea a \shakeb b \shakec c \shaked d
    \shakee e \shakef f \shakeg g \shakeA A
    \hshakef f \tshakef f
    }
    \addlyrics {
    "\shakea" "\shakeb" "\shakec" "\shaked"
    "\shakee" "\shakef" "\shakeg" "\shakeA"
    "\hshakef" "\\tshakef"
    }
}
\markup { "All other half shakes and thumb shakes are available similarly. "
          "Note that many of these aren't really playable, and are only included for consistency." }

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = "Catches "
    e \catcha a e \catchb b e \catchc c e \catchd d
    f \catche e f \gcatchc c g \tcatchc c
    }
    \addlyrics {
    \skip 4 "\catcha" \skip 4 "\catchb" \skip 4 "\catchc" \skip 4 "\catchd"
    \skip 4 "\catche" \skip 4 "\gcatchc" \skip 4 "\\tcatchc"
    }
}
\markup { "All other g-grace catches and thumb catches are available similarly." }

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = "Throws "
    a \thrwd d G \Gthrwd d a \thrwe e a \wthrwe e
    d \thrwf f a \gripthrwd d
    }
    \addlyrics {
    \skip 4 "\\thrwd" \skip 4 "\Gthrwd" \skip 4 "\\thrwe" \skip 4 "\\wthrwe"
    \skip 4 "\\thrwf" \skip 4 "\\gripthrwd"
    }
}

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = "Grips and birls "
    a \grip c d \dgrip d a \egrip c
    \birl a \wbirl a \gbirl a \dbirl a
    }
    \addlyrics {
    \skip 4 "\grip" \skip 4 "\dgrip" \skip 4 "\egrip"
    "\birl" "\wbirl" "\gbirl" "\dbirl"
    }
}

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = \markup { "Taorluath " }
    e \taor a d \dtaor a G \Gtaor a
    b \taoramb b c \taoramc c b \taoramd d
    e \taorjmd a e \taorold a
    }
    \addlyrics {
    \skip 4 "\\taor" \skip 4 "\dtaor" \skip 4 "\Gtaor"
    \skip 4 "\\taoramb" \skip 4 "\\taoramc" \skip 4 "\\taoramd"
    \skip 4 "\\taorjmd" \skip 4 "\\taorold"
    }
}
\markup { "\\taorjmd is how the taorluath is written in Joseph MacDonald’s book."
          "It is never played that way nowdays." }
\markup { "\\taorold is how it was played in late 19:th early 20:th century."
          "It was usually not written like this, but rather as a grip and an e gracenote on a." }

\pageBreak

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = \markup { "Crunluath " }
    e \crun e d \dcrun e G \Gcrun e
    b \crunamb e c \crunamc e b \crunamd e
    s16 \grg a8[ \grd b16 \crunambfosg b] s16 \grg a8[ \grd c16 \crunamcfosg c]
    }
    \addlyrics {
    \skip 4 "\\crun" \skip 4 "\dcrun" \skip 4 "\Gcrun"
    \skip 4 "\\crunamb" \skip 4 "\\crunamc" \skip 4 "\\crunamd"
    \skip 4 "\\crunambfosg" \skip 4 "\\crunamcfosg"
    }
}

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = \markup { \column { "Piobaireachd " "notation " } }
    \cad c4 A \hcad c
    e \gracad e d \grGcad d
    a \pthrwd d c \darodo b c \pdarodo b G \Gdarodo c
    a \dre e G \bari g e \dari g e \dare f
    }
    \addlyrics {
    "\cad" \skip 4 "\hcad"
    \skip 4 "\gracad" \skip 4 "\grGcad"
    \skip 4 "\pthrwd" \skip 4 "\darodo" \skip 4 "\pdarodo" \skip 4 "\Gdarodo"
    \skip 4 "\dre" \skip 4 "\bari" \skip 4 "\dari" \skip 4 "\dare"
    }
}

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = " "
    a16_\trebling d8. a4_\txtaor a4_\txcrun a4_\txtaorcrun
    a4_\txtaoram a4_\txcrunam a4_\txtaorcrunam
    }
    \addlyrics {
    "\\trebling" \skip 8. "\\txtaor" "\\txcrun" "\\txtaorcrun"
    "\\txtaoram" "\\txcrunam" "\\txtaorcrunam"
    }
}

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = \markup { \column { "Ancient movements" "J. MacDonald" } }
    e \fifteenthcutting a G \Gfifteenthcutting a
    e \seventeenthcutting a G \Gseventeenthcutting a
    }
    \addlyrics {
    \skip 4 "\fifteenthcutting" \skip 4 "\Gfifteenthcutting"
    \skip 4 "\seventeenthcutting" \skip 4 "\Gseventeenthcutting"
    }
}

\score {
    {
    \bagpipeKey
    \set Staff.instrumentName = " "
    e \barluadh g G \Gbarluadh g
    }
    \addlyrics {
    \skip 4 "\barluadh" \skip 4 "\Gbarluadh"
    }
}

\markup {
\column {
    \override #'(line-width . 140)
    \justify {
    These are the specific bagpipe markups that are
    available. You need to know alot more about entering normal music
    in order to produce userful output. All of this is available in
    the Lilypond tutorial and manual, as well as in the tips, regression
    tests, and snippet repository.
    }
    \line { " " }
    \override #'(line-width . 140)
    \justify {
    Check out \with-url #"http://www.lilypond.org/" {\bold www.lilypond.org} to learn
    more about this. All of these things are linked from the documentation
    page. Make sure you use the \bold 2.12.0 documentation — lots of
    things have changed since the older versions.
    }
}
}

\header {
    title = "Cheat sheet for entering bagpipe music"
    subtitle = "Intended for Lilypond 2.14 or better"
    tagline = \markup { "P/S Sven Axelsson, The Murray Pipes & Drums of Gothenburg" }
}