commit 607fc7727c18134e584410704d71c14719297400 Author: Sven Axelsson Date: Wed Apr 16 09:32:57 2008 +0200 Initial add of all bagpipe music files. diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..d1a1a12 --- /dev/null +++ b/.gitignore @@ -0,0 +1,5 @@ +*.ps +*.pdf +*.png +*.log + diff --git a/_output/adv_info.txt b/_output/adv_info.txt new file mode 100644 index 0000000..25644bd --- /dev/null +++ b/_output/adv_info.txt @@ -0,0 +1,38 @@ +[MSR (GiftskÃ¥psetet)] +1=2-4_marches/lord_alexander_kennedy +2=strathspeys/cameronian_rant +3=reels/sheepwife + +[Hornpipe/Jig] +1=hornpipes/john_mckenzies_fancy +2=jigs/eileen_macdonald + +[2/4 Marches for practise] +1=2-4_marches/donald_cameron +2=2-4_marches/lord_alexander_kennedy +3=2-4_marches/duke_of_roxburghs_farewell_to_blackmount +4=2-4_marches/abercairney_highlanders + +[Strathspeys for practise] +1=strathspeys/cameronian_rant +2=strathspeys/maggie_cameron +3=strathspeys/susan_macleod + +[Reels for practise] +1=reels/sheepwife +2=reels/mrs_macpherson_of_inveran +3=reels/little_cascade +4=reels/lexy_macaskill + +[Hornpipes for practise] +1=hornpipes/jimmys_gift +2=hornpipes/john_mckenzies_fancy +3=hornpipes/train_journey_north +4=hornpipes/duncan_johnstone + +[Jigs for practise] +1=jigs/braes_of_mellinish +2=jigs/jig_of_slurs +3=jigs/eileen_macdonald +4=jigs/alan_macpherson_of_mosspark +5=jigs/donald_willie_and_his_dog diff --git a/_output/set_info.txt b/_output/set_info.txt new file mode 100644 index 0000000..0b01062 --- /dev/null +++ b/_output/set_info.txt @@ -0,0 +1,88 @@ +[2/4 Marches] +1=2-4_marches/corriechoillie +2=2-4_marches/teribus + +[3/4 Marches] +1=3-4_marches/green_hills_of_tyrol +2=3-4_marches/when_the_battle_is_over + +[4/4 Marches Set 1] +1=4-4_marches/scotland_the_brave +2=4-4_marches/badge_of_scotland +3=4-4_marches/rowan_tree + +[4/4 Marches Set 2] +1=4-4_marches/silver_wings +2=4-4_marches/lord_lovats_lament +3=4-4_marches/flett_from_flotta +4=4-4_marches/braes_of_bonhill + +[4/4 Marches Set 3] +1=4-4_marches/boys_brigade_centenary_march +2=4-4_marches/cabar_feidh + +[6/8 Marches Set 1] +1=6-8_marches/atholl_highlanders +2=6-8_marches/cock_of_the_north + +[6/8 Marches Set 2] +1=6-8_marches/ballochyle +2=6-8_marches/duncan_mcgillivray + +[9/8 Marches] +1=9-8_marches/battle_of_the_somme +2=9-8_marches/grinder +3=9-8_marches/heights_of_dargai + +[Selection 1] +1=hornpipes/calum_campbells_caprice +2=others/er_du_jol_mon +3=strathspeys/mac_an_irish +4=reels/sound_of_sleat +5=piobaireachd/glengarrys_lament +6=jigs/donald_willie_and_his_dog + +[Selection 2] +1=hornpipes/blair_highlanders +2=airs/el_alamein +3=strathspeys/macphedrans_strathspey +4=reels/airlies_big_day +5=reels/wretched_man +6=reels/famous_bridge +7=piobaireachd/clan_campbells_gathering +8=hornpipes/donald_macleod +9=jigs/rocking_the_baby + +[M/S/R Set 1] +1=2-4_marches/conundrum +2=strathspeys/monymusk +3=reels/captain_lachlan_macphail_of_tiree + +[M/S/R Set 2] +1=2-4_marches/mrs_john_maccoll +2=strathspeys/shepherds_crook +3=reels/major_manson + +[M/S/R Set 3] +1=2-4_marches/highland_wedding +2=strathspeys/susan_macleod +3=reels/sheepwife + +[Slow Air & Jigs] +1=airs/leaving_lismore +2=jigs/glasgow_police_pipers +3=jigs/paddys_leather_breeches + +[Hornpipe & Jigs] +1=hornpipes/uphold_the_right +2=jigs/archie_beag +3=jigs/banjo_breakdown + +[Murray's Fancy] +1=suites/murrays_fancy_6_hornpipe + +[Amazing Grace] +1=airs/amazing_grace + +[Highland Cathedral] +1=airs/highland_cathedral diff --git a/_sets/2-4_marches.ly b/_sets/2-4_marches.ly new file mode 100644 index 0000000..5dea647 --- /dev/null +++ b/_sets/2-4_marches.ly @@ -0,0 +1,8 @@ +% $Id: /Music/Bagpipe/_sets/2-4_marches.ly 174 2005-09-10T23:33:14.464875Z sven $ + +\header { + title = "2/4 Marches" +} + +\include "2-4_marches/corriechoillie.ly" +\include "2-4_marches/teribus.ly" diff --git a/_sets/3-4_marches.ly b/_sets/3-4_marches.ly new file mode 100644 index 0000000..2fa5546 --- /dev/null +++ b/_sets/3-4_marches.ly @@ -0,0 +1,8 @@ +% $Id: /Music/Bagpipe/_sets/3-4_marches.ly 174 2005-09-10T23:33:14.464875Z sven $ + +\header { + title = "3/4 Marches" +} + +\include "3-4_marches/green_hills_of_tyrol.ly" +\include "3-4_marches/when_the_battle_is_over.ly" diff --git a/_sets/4-4_marches_1.ly b/_sets/4-4_marches_1.ly new file mode 100644 index 0000000..2b6be50 --- /dev/null +++ b/_sets/4-4_marches_1.ly @@ -0,0 +1,10 @@ +% $Id: /Music/Bagpipe/_sets/4-4_marches_1.ly 189 2005-12-18T17:12:37.812500Z sven $ + +\header { + title = "4/4 Marches Set 1" +} + +\include "4-4_marches/scotland_the_brave.ly" +\include "4-4_marches/badge_of_scotland.ly" +#(break-before-next-score) +\include "4-4_marches/rowan_tree.ly" diff --git a/_sets/4-4_marches_2.ly b/_sets/4-4_marches_2.ly new file mode 100644 index 0000000..8964c3b --- /dev/null +++ b/_sets/4-4_marches_2.ly @@ -0,0 +1,11 @@ +% $Id: /Music/Bagpipe/_sets/4-4_marches_2.ly 189 2005-12-18T17:12:37.812500Z sven $ + +\header { + title = "4/4 Marches Set 2" +} + +\include "4-4_marches/silver_wings.ly" +\include "4-4_marches/lord_lovats_lament.ly" +#(break-before-next-score) +\include "4-4_marches/flett_from_flotta.ly" +\include "4-4_marches/braes_of_bonhill.ly" diff --git a/_sets/4-4_marches_3.ly b/_sets/4-4_marches_3.ly new file mode 100644 index 0000000..c2d1d7f --- /dev/null +++ b/_sets/4-4_marches_3.ly @@ -0,0 +1,9 @@ +% $Id: /Music/Bagpipe/_sets/4-4_marches_3.ly 189 2005-12-18T17:12:37.812500Z sven $ + +\header { + title = "4/4 Marches Set 3" +} + +\include "4-4_marches/boys_brigade_centenary_march.ly" +#(break-before-next-score) +\include "4-4_marches/cabar_feidh.ly" diff --git a/_sets/6-8_marches_1.ly b/_sets/6-8_marches_1.ly new file mode 100644 index 0000000..115452a --- /dev/null +++ b/_sets/6-8_marches_1.ly @@ -0,0 +1,9 @@ +% $Id: /Music/Bagpipe/_sets/6-8_marches_1.ly 189 2005-12-18T17:12:37.812500Z sven $ + +\header { + title = "6/8 Marches Set 1" +} + +\include "6-8_marches/atholl_highlanders.ly" +#(break-before-next-score) +\include "6-8_marches/cock_of_the_north.ly" diff --git a/_sets/6-8_marches_2.ly b/_sets/6-8_marches_2.ly new file mode 100644 index 0000000..b3028ca --- /dev/null +++ b/_sets/6-8_marches_2.ly @@ -0,0 +1,9 @@ +% $Id: /Music/Bagpipe/_sets/6-8_marches_2.ly 189 2005-12-18T17:12:37.812500Z sven $ + +\header { + title = "6/8 Marches Set 2" +} + +\include "6-8_marches/ballochyle.ly" +#(break-before-next-score) +\include "6-8_marches/duncan_mcgillivray.ly" diff --git a/_sets/9-8_marches.ly b/_sets/9-8_marches.ly new file mode 100644 index 0000000..db8fb62 --- /dev/null +++ b/_sets/9-8_marches.ly @@ -0,0 +1,13 @@ +% $Id: /Music/Bagpipe/_sets/9-8_marches.ly 214 2006-04-16T22:10:50.062500Z sven $ + +\header { + title = "9/8 Marches" +} + +\include "9-8_marches/battle_of_the_somme.ly" +\include "9-8_marches/grinder.ly" +\include "9-8_marches/heights_of_dargai.ly" + +\paper { + between-system-space = 15\mm +} diff --git a/_sets/medley_2008_strasbourg.ly b/_sets/medley_2008_strasbourg.ly new file mode 100644 index 0000000..71260e8 --- /dev/null +++ b/_sets/medley_2008_strasbourg.ly @@ -0,0 +1,32 @@ +% $Id: /Music/Bagpipe/_sets/6-8_marches_1.ly 189 2005-12-18T17:12:37.812500Z sven $ + +\header { + title = "2008 Medley for Strasbourg" +} + +\markuplines{\wordwrap{Four bars jig intro, then first four bars extending the + last note of bar 2 and 4 by four extra beats, then start again from the top.}} +\include "jigs/archie_beag.ly" +\include "airs/mist_covered_mountains.ly" + +#(break-before-next-score) +\include "strathspeys/unknown.ly" +\include "strathspeys/mac_an_irish.ly" +\include "scandinavian/harp_schottis.ly" + +#(break-before-next-score) +\include "reels/airlies_big_day.ly" +\include "reels/foot_it_neatly.ly" +\include "piobaireachd/lament_for_the_harp_tree.ly" + +\markuplines{\wordwrap{Hold the cluster for 10 seconds or so, start with cuttings + from the top, one set of unison cuttings before the tune starts.}} + +#(break-before-next-score) +\include "jigs/braes_of_mellinish.ly" + +\markuplines{\wordwrap{Cluster like before, one single beat in jig tempo then + break immediately into hornpipe.}} + +#(break-before-next-score) +\include "suites/murrays_fancy_6_hornpipe.ly" \ No newline at end of file diff --git a/_sets/quintet_2006_open_grade.ly b/_sets/quintet_2006_open_grade.ly new file mode 100644 index 0000000..e193ef9 --- /dev/null +++ b/_sets/quintet_2006_open_grade.ly @@ -0,0 +1,18 @@ +% $Id: /Music/Bagpipe/_sets/quintet_2006_open_grade.ly 207 2006-03-05T23:12:54.793764Z sven $ + +\header { + title = "Open Grade Quintet 2006" + dedication = "Mats, Sven, Daniel, Eugen, Marie" +} + +\include "reels/me_clootch_is_awee.ly" +\include "piobaireachd/his_fathers_lament_for_donald_mackenzie.ly" +#(break-before-next-score) +\include "strathspeys/unknown.ly" +\include "reels/macleods_reel.ly" +#(break-before-next-score) +\include "reels/joes_rant.ly" +#(break-before-next-score) +\include "reels/sheepwife.ly" +#(break-before-next-score) +\include "jigs/fiddlers_rally_mpdset.ly" diff --git a/bagpipe.ly b/bagpipe.ly new file mode 100755 index 0000000..f508d36 --- /dev/null +++ b/bagpipe.ly @@ -0,0 +1,345 @@ +%{ + Bagpipe music settings for Lilypond. + This file builds on work by Andrew McNabb (http://www.mcnabbs.org/andrew/) + + Substantial changes and additions made by + Sven Axelsson, the Murray Pipes & Drums of Gothenburg + (http://www.murrays.nu) + + $Id: /Music/Bagpipe/bagpipe.ly 227 2007-10-16T13:16:11.328125Z sven $ +%} + +\version "2.11.0" + +% Notes of the scale of the Great Highland Bagpipe. Extra high notes for bombarde. +% Flat notes used mainly in some modern music. + +pitchnamesBagpipe = #`( + (G . ,(ly:make-pitch 0 4 NATURAL)) + (a . ,(ly:make-pitch 0 5 NATURAL)) + (b . ,(ly:make-pitch 0 6 NATURAL)) + (bflat . ,(ly:make-pitch 0 6 FLAT)) + (c . ,(ly:make-pitch 1 0 SHARP)) + (cflat . ,(ly:make-pitch 1 0 FLAT)) + (d . ,(ly:make-pitch 1 1 NATURAL)) + (e . ,(ly:make-pitch 1 2 NATURAL)) + (f . ,(ly:make-pitch 1 3 SHARP)) + (fflat . ,(ly:make-pitch 1 3 FLAT)) + (g . ,(ly:make-pitch 1 4 NATURAL)) + (gflat . ,(ly:make-pitch 1 4 FLAT)) + (A . ,(ly:make-pitch 1 5 NATURAL)) + (B . ,(ly:make-pitch 1 6 NATURAL)) + (C . ,(ly:make-pitch 2 0 SHARP)) +) +pitchnames = \pitchnamesBagpipe +#(ly:parser-set-note-names parser pitchnames) + +% Bagpipe music is written in something like D major. If we use +% flattened notes, the flat should be shown on all instances. +bagpipeKey = { + \key d \major + #(set-accidental-style 'forget) +} + +% Show the key signature e.g. for BMW compatibility. +showKeySignature = { + \override Staff.KeySignature #'stencil = #'ly:key-signature-interface::print +} + +% Show the true key signature (E-flat major). Use together with +% \transpose f a to print scores for other instruments. +showTrueKeySignature = { + \override Staff.KeySignature #'stencil = #'ly:key-signature-interface::print + \override Stem #'direction = #0 + \override Slur #'direction = #0 + \override Tie #'direction = #0 +} + +% Various tweaks to get good defaults for bagpipe music. +\layout { + indent = 0.0 + + \context { + \Score + + \remove "Bar_number_engraver" + + \override Stem #'direction = #down + \override Slur #'direction = #up + \override Tie #'direction = #up + + \override KeySignature #'print-function = ##f + \override VoltaBracket #'Y-offset = #7.4 + \override VoltaBracket #'height = #2.2 + } + + \context { + \StaffGroup + + extraNatural = ##f + + \override KeySignature #'stencil = ##f + } + + \context { + \Staff + + extraNatural = ##f + midiInstrument = #"bagpipe" + + \override KeySignature #'stencil = ##f + } +} + +% Some common timing tweaks. + +% Sets the autobeamer to span quarter notes only. Use for fast music. +quarterBeaming = { + #(override-auto-beam-setting '(end * * * *) 1 4 'Staff) + #(override-auto-beam-setting '(end * * * *) 1 2 'Staff) + #(override-auto-beam-setting '(end * * * *) 3 4 'Staff) + #(override-auto-beam-setting '(end * * * *) 4 4 'Staff) + #(revert-auto-beam-setting '(end 1 32 2 4 ) 1 8 'Staff) + #(revert-auto-beam-setting '(end 1 32 2 4 ) 3 8 'Staff) + #(revert-auto-beam-setting '(end 1 32 4 4 ) 1 8 'Staff) + #(revert-auto-beam-setting '(end 1 32 4 4 ) 3 8 'Staff) + #(revert-auto-beam-setting '(end 1 32 4 4 ) 5 8 'Staff) + #(revert-auto-beam-setting '(end 1 32 4 4 ) 7 8 'Staff) +} +halfBeaming = { + #(override-auto-beam-setting '(end * * 2 2) 1 2 'Staff) + #(override-auto-beam-setting '(end * * 2 2) 2 2 'Staff) +} +% Reels are in allabreve time with half note beaming. +reelTime = { + \time 2/2 + \halfBeaming +} +% 4/4 marches are written with numerical time signature and with quarter beaming. +marchTime = { + \time 4/4 + \numericTimeSignature + \quarterBeaming +} + +% Single grace notes +grG = { \grace { \small G32 } } +gra = { \grace { \small a32 } } +grb = { \grace { \small b32 } } +grc = { \grace { \small c32 } } +grd = { \grace { \small d32 } } +gre = { \grace { \small e32 } } +grf = { \grace { \small f32 } } +grg = { \grace { \small g32 } } +grA = { \grace { \small A32 } } + +% Doublings +dblG = { \grace { \small g32[ G d] } } +dbla = { \grace { \small g32[ a d] } } +dblb = { \grace { \small g32[ b d] } } +dblc = { \grace { \small g32[ c d] } } +dbld = { \grace { \small g32[ d e] } } +dble = { \grace { \small g32[ e f] } } +dblf = { \grace { \small g32[ f g] } } +% These are the same as the half doublings. +dblg = { \grace { \small g32[ f] } } +dblA = { \grace { \small A32[ g] } } + +% Half doublings +hdblG = { \grace { \small G32[ d] } } +hdbla = { \grace { \small a32[ d] } } +hdblb = { \grace { \small b32[ d] } } +hdblc = { \grace { \small c32[ d] } } +hdbld = { \grace { \small d32[ e] } } +hdble = { \grace { \small e32[ f] } } +hdblf = { \grace { \small f32[ g] } } +hdblg = { \grace { \small g32[ f] } } +hdblA = { \grace { \small A32[ g] } } + +% Thumb doublings +tdblG = { \grace { \small A32[ G d] } } +tdbla = { \grace { \small A32[ a d] } } +tdblb = { \grace { \small A32[ b d] } } +tdblc = { \grace { \small A32[ c d] } } +tdbld = { \grace { \small A32[ d e] } } +tdble = { \grace { \small A32[ e f] } } +tdblf = { \grace { \small A32[ f g] } } +tdblg = { \grace { \small A32[ g f] } } + +% Shakes +% A few of these can't really be played and are here only for consistency. +shakea = { \grace { \small g32[ a d a G] } } +shakeb = { \grace { \small g32[ b d b G] } } +shakec = { \grace { \small g32[ c d c G] } } +shaked = { \grace { \small g32[ d e d G] } } +shakee = { \grace { \small g32[ e f e a] } } +shakef = { \grace { \small g32[ f g f a] } } +shakeg = { \grace { \small A32[ f g a] } } +shakeA = { \grace { \small A32[ g A a] } } + +% Half shakes +hshakea = { \grace { \small a32[ d a G] } } +hshakeb = { \grace { \small b32[ d b G] } } +hshakec = { \grace { \small c32[ d c G] } } +hshaked = { \grace { \small d32[ e d G] } } +hshakee = { \grace { \small e32[ f e a] } } +hshakef = { \grace { \small f32[ g f a] } } +hshakeg = { \grace { \small g32[ f g a] } } +hshakeA = { \grace { \small A32[ g A a] } } + +% Thumb shakes +tshakea = { \grace { \small A32[ a d a G] } } +tshakeb = { \grace { \small A32[ b d b G] } } +tshakec = { \grace { \small A32[ c d c G] } } +tshaked = { \grace { \small A32[ d e d G] } } +tshakee = { \grace { \small A32[ e f e a] } } +tshakef = { \grace { \small A32[ f g f a] } } +tshakeg = { \grace { \small A32[ f g a] } } +tshakeA = { \grace { \small A32[ g A a] } } + +% Slurs +% A few of these can't really be played and are here only for consistency. +slura = { \grace { \small g32[ a G] } } +slurb = { \grace { \small g32[ b G] } } +slurc = { \grace { \small g32[ c G] } } +slurd = { \grace { \small g32[ d G] } } +slure = { \grace { \small g32[ e a] } } +slurf = { \grace { \small g32[ f a] } } +slurg = { \grace { \small A32[ f a] } } +slurA = { \grace { \small f32[ a] } } + +% Half slurs +hslura = { \grace { \small a32[ G] } } +hslurb = { \grace { \small b32[ G] } } +hslurc = { \grace { \small c32[ G] } } +hslurd = { \grace { \small d32[ G] } } +hslure = { \grace { \small e32[ a] } } +hslurf = { \grace { \small f32[ a] } } +hslurg = { \grace { \small g32[ a] } } +hslurA = { \grace { \small A32[ a] } } + +% Thumb slurs +tslura = { \grace { \small A32[ a G] } } +tslurb = { \grace { \small A32[ b G] } } +tslurc = { \grace { \small A32[ c G] } } +tslurd = { \grace { \small A32[ d a] } } +tslure = { \grace { \small A32[ e a] } } +tslurf = { \grace { \small A32[ f a] } } +tslurg = { \grace { \small A32[ f a] } } +tslurA = { \grace { \small f32[ a] } } + +% Catches +catcha = { \grace { \small a32[ G d G] } } +catchb = { \grace { \small b32[ G d G] } } +catchc = { \grace { \small c32[ G d G] } } +catchd = { \grace { \small d32[ G b G] } } +catche = { \grace { \small e32[ G d G] } } + +% G-grace catches +gcatcha = { \grace { \small g32[ a G d G] } } +gcatchb = { \grace { \small g32[ b G d G] } } +gcatchc = { \grace { \small g32[ c G d G] } } +gcatchd = { \grace { \small g32[ d G b G] } } +gcatche = { \grace { \small g32[ e G d G] } } + +% Thumb catches +tcatcha = { \grace { \small A32[ a G d G] } } +tcatchb = { \grace { \small A32[ b G d G] } } +tcatchc = { \grace { \small A32[ c G d G] } } +tcatchd = { \grace { \small A32[ d G b G] } } +tcatche = { \grace { \small A32[ e G d G] } } + +% Triple strikes (BMW has them all, but I've never seen any but the A one used, so ...) +tripleA = { \grace { \small A32[ g A g A g] } } + +% Throws +thrwd = { \grace { \small G32[ d c] } } +Gthrwd = { \grace { \small d32[ c] } } +gripthrwd = { \grace { \small G32[ d G c] } } +thrwe = { \grace { \small e32[ a f a] } } +thrwf = { \grace { \small f32[ e g e] } } + +% Birls +birl = { \grace { \small a32[ G a G] } } +wbirl = { \grace { \small G32[ a G] } } +gbirl = { \grace { \small g32[ a G a G] } } +dbirl = { \grace { \small d32[ a G a G] } } + +% Grips +grip = { \grace { \small G32[ d G] } } +dgrip = { \grace { \small G32[ b G] } } +egrip = { \grace { \small G32[ e G] } } + +% Taorluaths +taor = { \grace { \small G32[ d G e] } } +dtaor = { \grace { \small G32[ b G e] } } +Gtaor = { \grace { \small d32[ G e] } } +taoramb = { \grace { \small G32[ d G b e] } } +taoramc = { \grace { \small G32[ d G c e] } } +taoramd = { \grace { \small G32[ d G c d e] } } + +% Crunluaths +crun = { \grace { \small G32[ d G e a f a ] } } +dcrun = { \grace { \small G32[ b G e a f a ] } } +Gcrun = { \grace { \small d32[ G e G f a ] } } +crunamb = { \grace { \small G32[ d G b e b f b ] } } +crunamc = { \grace { \small G32[ d G c e c f c ] } } +crunamd = { \grace { \small G32[ d G c d e d f d ] } } +crunambfosg = { \grace { \small e32[ b f b ] } } +crunamcfosg = { \grace { \small e32[ c f c ] } } +crunamdfosg = { \grace { \small e32[ d f d ] } } + +% Special piobaireachd notations +grGcad = { \grace { \small G16 } } +gracad = { \grace { \small a16 } } +cad = { \grace { \small g32[ e8 d32] } } +hcad = { \grace { \small g32[ e8] } } +tcad = { \grace { \small e8[ d32] } } +thcad = { \grace { \small e8 } } +% This is the same as thrwe +dre = { \grace { \small e32[ a f a] } } +% This is the same as thrwf +dare = { \grace { \small f32[ e g e] } } +bari = { \grace { \small e32[ G f G] } } +dari = { \grace { \small f32[ e g e f e] } } +pthrwd = { \grace { \small G32[ d32 c] } } +darodo = { \grace { \small G32[ d G c G] } } +Gdarodo = { \grace { \small d32[ G c G] } } +pdarodo = { \grace { \small G16[ d32 G c G16] } } +pGdarodo = { \grace { \small d32[ G c G16] } } +% Weird stuff from Joseph MacDonald’s book +fifteenthcutting = { \grace { \small G32[ d G e a f a e a d] } } +fifteenthcuttingG = { \grace { \small G32[ d G e G f G e G d] } } +Gfifteenthcutting = { \grace { \small d32[ G e a f a e a d] } } +GfifteenthcuttingG = { \grace { \small d32[ G e G f G e G d] } } +seventeenthcutting = { \grace { \small G32[ d G e a f a e a d a c] } } +seventeenthcuttingG = { \grace { \small G32[ d G e G f G e G d G c] } } +Gseventeenthcutting = { \grace { \small d32[ G e a f a e a d a c] } } +GseventeenthcuttingG = { \grace { \small d32[ G e G f G e G d G c] } } +barluadh = { \grace { \small G32[ d G e a f a e a d a c a b a e a f a] } } +barluadhG = { \grace { \small G32[ d G e G f G e G d G c G b G e G f G] } } +Gbarluadh = { \grace { \small d32[ G e a f a e a d a c a b a e a f a] } } +GbarluadhG = { \grace { \small d32[ G e G f G e G d G c G b G e G f G] } } +% Non-gracenote piobaireachd markup. +trebling = \markup { + \override #'(baseline-skip . 0.3) + \column { + \musicglyph #"scripts.tenuto" + \musicglyph #"scripts.tenuto" + \musicglyph #"scripts.tenuto" + } +} +% Abbreviated notation common in piobaireachd scores. +% TODO: Make sure these are put on a fixed Y-position. +txtaor = \markup { "T" } +txcrun = \markup { "C" } +txtaorcrun = \markup { + \override #'(baseline-skip . 1.8) + \column { "T" "C" } +} +txtaoram = \markup { "T’’" } +txcrunam = \markup { "C’’" } +txtaorcrunam = \markup { + \override #'(baseline-skip . 1.8) + \column { "T’’" "C’’" } +} diff --git a/cheatsheet.ly b/cheatsheet.ly new file mode 100644 index 0000000..90c384d --- /dev/null +++ b/cheatsheet.ly @@ -0,0 +1,251 @@ +%{ + All of the bagpipe specific markup. + + $Id: /Music/Bagpipe/cheatsheet.ly 227 2007-10-16T13:16:11.328125Z sven $ +%} + +\version "2.11.43" + +#(ly:set-option 'point-and-click #f) + +% Choose a size +#(set-global-staff-size 18) +#(set-default-paper-size "a4" 'landscape) + +\include "bagpipe.ly" + +\paper { + indent = 0\mm + ragged-right = ##t + ragged-bottom = ##t +} +\layout { + indent = 30\mm + \context { + \Staff + \remove "Bar_engraver" + \remove "Time_signature_engraver" + } +} + +\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 + \slure e \slurf f \slurg g \slurA A + \hslurf f \tslurf f + } + \addlyrics { + "\slura" "\slurb" "\slurc" "\slurd" + "\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." } + +\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" + } + \header { piece = " " breakbefore = ##t } +} +\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 + e \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 e \thrwf f a \gripthrwd d + } + \addlyrics { + \skip 4 "\\thrwd" \skip 4 "\Gthrwd" \skip 4 "\\thrwf" \skip 4 "\\gripthrwd" + } +} + +\score { + { + \bagpipeKey + \set Staff.instrumentName = "Grips and birls " + a \grip c a \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 + } + \addlyrics { + \skip 4 "\\taor" \skip 4 "\dtaor" \skip 4 "\Gtaor" + \skip 4 "\\taoramb" \skip 4 "\\taoramc" \skip 4 "\\taoramd" + } +} + +\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 + } + \addlyrics { + \skip 4 "\\crun" \skip 4 "\dcrun" \skip 4 "\Gcrun" + \skip 4 "\\crunamb" \skip 4 "\\crunamc" \skip 4 "\\crunamd" + } + \header { piece = " " breakbefore = ##t } +} + +\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 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 "\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 . 130) + \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 . 130) + \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.10.0 documentation — lots of + things have changed since the older versions. + } +} +} + +\header { + title = "Cheat sheet for entering bagpipe music" + subtitle = "Intended for Lilypond 2.11 or better" + tagline = \markup { "P/S Sven Axelsson, MPD" } +} \ No newline at end of file diff --git a/format.ly b/format.ly new file mode 100644 index 0000000..308e937 --- /dev/null +++ b/format.ly @@ -0,0 +1,39 @@ +%{ + Header formatting for bagpipe tunes. Customize to get your name in the tag line. + + $Id: /Music/Bagpipe/format.ly 227 2007-10-16T13:16:11.328125Z sven $ +%} + +\version "2.11.43" + +% Bring in the time/date package. Set format to month day, year + +#(use-modules (srfi srfi-19)) +today = #(date->string (current-date) "~B ~d, ~Y") + +\paper { + raggedbottom = ##t + tagline = \markup { + \line { + "Rev. " \today + #(ly:export (ly:wide-char->utf-8 #x2014)) % Em-dash + "P/S Sven Axelsson, MPD" + } + } + scoreTitleMarkup = \markup { + \override #'(baseline-skip . 3) + \column { + \fill-line { + \column { + \large \bold \fromproperty #'header:title + \bold \fromproperty #'header:subtitle + } + \fromproperty #'header:meter + \line { \fromproperty #'header:composer " " \italic \fromproperty #'header:arranger } + } + #(ly:export (if (not (ly:get-option 'without-comment)) + (markup #:justify-field 'header:comment) + (markup))) + } + } +} diff --git a/formatbook.ly b/formatbook.ly new file mode 100644 index 0000000..9c0827a --- /dev/null +++ b/formatbook.ly @@ -0,0 +1,49 @@ +%{ + Header formatting for bagpipe tunes. Customize to get your name in the tag line. + + $Id: format.ly 225 2005-09-10 23:34:07Z sven $ +%} + +\version "2.11.43" + +% Bring in the time/date package. Set format to month day, year + +#(use-modules (srfi srfi-19)) +today = #(date->string (current-date) "~B ~d, ~Y") + +\paper { + raggedbottom = ##t + tagline = \markup { + \line { + "Rev. " \today + #(ly:export (ly:wide-char->utf-8 #x2014)) % Em-dash + "P/S Sven Axelsson, MPD" + } + } + bookTitleMarkup = \markup { + \override #'(baseline-skip . 3.5) + \column { + \fill-line { \fromproperty #'header:dedication } + \override #'(baseline-skip . 3.5) + \column { + \huge \bigger \bold + \fill-line { + \bigger \fromproperty #'header:title + } + \fill-line { + \large \smaller \bold + \bigger \fromproperty #'header:subtitle + } + \fill-line { + \smaller + \line { "(" \fromproperty #'header:source ")" } + } + \fill-line { + \line { \fromproperty #'header:meter } + \line { \fromproperty #'header:composer " " \italic \fromproperty #'header:arranger } + } + \fill-line { " " } % Empty line + } + } + } +} diff --git a/readme.txt b/readme.txt new file mode 100644 index 0000000..ef0bf7e --- /dev/null +++ b/readme.txt @@ -0,0 +1,67 @@ +ATT SKRIVA SÄCKPIPEMUSIK MED LILYPOND +===================================== + + +1. Installera Lilypond 2.6.0 +---------------------------- + +* Numera finns "riktiga" installerare för Mac och Windows och Red Hat Linux. + Det finns också en version som använder Autopackage; en universell + Linux-installerare. +* Hämta installeraren för ditt system här: http://lilypond.org/web/install/ +* Gör som du brukar för att installera. + + +2. Installera och använda bagpipe.ly +------------------------------------ + +* Dessa instruktioner är skrivna för Windows. Om du kör något annat så får du + själv lista ut vad som skiljer sig. + +Skapa en katalog för musikfiler, t.ex. C:\Music och kopiera alla filer och kataloger +från bagpipe.zip till den nya katalogen. OBS lägg inte filerna i Mina dokument +eftersom en del av de program som behövs för Lilypond inte tycker om sökvägar +med blanksteg i. + +Kopiera filerna i mappen scm till motsvarande mapp i din Lilypond-installation +och skriv över de två filerna där. Dessa filer finns normalt i +C:\Program\LilyPond\usr\share\lilypond\2.6.0\scm +OBS: Detta är viktigt! Dessa filer krävs för att rubriker ska fungera korrekt. + +Dubbelklicka på cheatsheet.ly. Detta skapar en PDF med alla specifika säckpipe- +kommandon, så du kan se hur du skriver t.ex. en crunluath a mach. Nu ser du också +om din installation fungerar som den ska. + +OBS: när du dubbelklickat på en *.ly-fil så verkar det som inget händer. Detta är +normalt. Lilypond räknar och tänker en stund innan den skapar PDF-filen. Om du +kör en stor fil, t.ex. standard_settings.ly, så kan det ta upp till en minut +innan du ser att något händer. + +bagpipe.ly är där alla säckpipespecifika kommandon och inställningar finns. Titta +gärna i filen för att se hur saker och ting fungerar. Om du upptäcker gracenoter +som saknas lägger du till dessa här. + +format.ly anger rubrikformatet. Ändra här om du vill att rubrikerna ska se ut +på något annat sätt än Sven Axelssons standardformat. + +music.ly är ett exempel på hur du genererar filer med musik från notbiblioteket. +För att det ska gå smidigt att sätta samman många låtar i olika set så +inkluderar inte varje låt själv bagpipe.ly och format.ly, utan detta görs +från en särskild fil som sen inkluderar en eller flera låtar. + +standard_settings.ly är ytterligare ett sådant exempel. Det är början till +vår berömda bok med alla våra fantastiska arrangemang. + +_template.ly är en mall du kan använda för att skriva nya låtar. Alla låtfiler +ska struktureras på detta sätt. + +OBS igen: Om du vill skriva rubriker eller annan text som innehåller svenska +tecken (eller japanska, eller ryska) så måste du spara filen i formatet +UTF-8. Windows-användare kan använda Notepad till detta. Ni andra får själva +hitta ett lämpligt program. + +cheatsheet.ly PDF:en och bagpipe.ly bör vara nog för att du ska förstå hur +säckpipenotationen fungerar. Du behöver säkert också läsa Lilypond-dokumentationen +som finns här: http://lilypond.org/doc/v2.6/Documentation/out-www/ + +Det var det hela.