kastdeur/lilydrum
1
0
Fork 0
mirror of https://github.com/kastdeur/lilydrum.git synced 2024-12-22 17:23:32 +01:00
Code Issues Releases Activity

Typo in Alexander MacKenzie

Browse source 
Added Swiss Ruff
Put Flams/Drags/Ruffs style in own command, instead of relying on {start|stop}GraceMusic
This commit is contained in:
Eric Teunis de Boone 2015-03-28 10:13:02 +01:00
parent 7a870a63b2
commit c85b87dd41
3 changed files with 50 additions and 36 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
.gitignore vendored Normal file
View file

@ -0,0 +1,6 @@
*.ps
*.pdf
*.png
*.log
bwwtolily.py
_output/

4
airs/alexander_mackenzie.ly
View file

@ -28,14 +28,14 @@
% Part 2 ( Part 2.2 = Part 1)
d8:32(
g4) \flamd d16. g32 d8:32( g8) \flamd d8 |
d32-> g32 d32 g32 d32 g32 d32-> g32 d32 g32 d32 g32 d4-> d8:32( |
d32-> g32 d32 g32 d32 g32 d32 g32-> d32 g32 d32 g32 d4-> d8:32( |
g4) \flamd d16. g32 d8:32( g8.) g16 |
d4.:32( d4) d8:32( |
\break
g4) \flamd d16. g32 d8:32( g8) \flamd d8 |
d32-> g32 d32 g32 d32 g32 d32-> g32 d32 g32 d32 g32 d4-> \flamd d16. g32 |
d32-> g32 d32 g32 d32 g32 d32 g32-> d32 g32 d32 g32 d4-> \flamd d16. g32 |
d8:32( g16.) d32-> g16. g32 d8:32( g16.) d32-> g16. g32 |
d4.:32( d4)

48
lilydrum.ly
View file

@ -108,34 +108,42 @@ dynLine = #(define-music-function
\once \override TextSpanner.bound-details.right.text = \markup { \draw-line #'(0 . -1) }
#})
% grace notes
startGraceMusic = {
\stemUp \tiny
% =================================================
% Flams, Drags & the sort
% =================================================
drumgrace = #(define-music-function (parser location notes) (ly:music?) #{
\stemUp
\override Flag.stroke-style = #"grace"
\once \override Beam.positions = #'(3 . 3)
\once \override DrumStaff.Stem.length = #7
}
stopGraceMusic = {
\override Score.GraceSpacing #'spacing-increment = #0
\override Score.Stem #'beamlet-max-length-proportion = #'(0.5 . 0.5)
\tiny \grace $notes \normalsize
\revert Score.Stem #'beamlet-default-length
\revert Flag.stroke-style
\normalsize
\stemNeutral
}
#})
% Flams
flamd = \drummode { \grace { g8 } } % right Flam
flamddr = \drummode { \grace { g8\startGroup } } % with start repeat
flamg = \drummode { \grace { d8 } } % left Flam
flamgdr = \drummode { \grace { d8\startGroup } } % with start repeat
flamd = \drummode { \drumgrace { g8 } } % right Flam
flamddr = \drummode { \drumgrace { g8\startGroup } } % with start repeat
flamg = \drummode { \drumgrace { d8 } } % left Flam
flamgdr = \drummode { \drumgrace { d8\startGroup } } % with start repeat
% Drags
dragd = \drummode { \grace{ g16[ g] }} % right Drag
dragddr = \drummode { \grace{ g16[\startGroup g] }} % with start repeat
dragg = \drummode { \grace{ d16[ d] }} % left Drag
draggdr = \drummode { \grace{ d16[\startGroup d] }} % with start repeat
dragd = \drummode { \drumgrace{ g16[ g] }} % right Drag
dragddr = \drummode { \drumgrace{ g16[\startGroup g] }} % with start repeat
dragg = \drummode { \drumgrace{ d16[ d] }} % left Drag
draggdr = \drummode { \drumgrace{ d16[\startGroup d] }} % with start repeat
% Ruff
ruffg = \drummode { \grace{ g16[ d g] }} % left Ruff
ruffgdr = \drummode { \grace{ g16[\startGroup d g] }} % with start repeat
ruffd = \drummode { \grace{ d16[ g d] }} % right Ruff
ruffd = \drummode { \grace{ d16[\startGroup g d] }} % with start repeat
ruffg = \drummode { \drumgrace{ g16[ d g] }} % left Ruff
ruffgdr = \drummode { \drumgrace{ g16[\startGroup d g] }} % with start repeat
ruffd = \drummode { \drumgrace{ d16[ g d] }} % right Ruff
ruffd = \drummode { \drumgrace{ d16[\startGroup g d] }} % with start repeat
% Swiss Ruff
sruffg = \drummode { \drumgrace{ g16[ d d] }} % left Swiss Ruff
sruffgdr = \drummode { \drumgrace{ g16[\startGroup d d] }} % with start repeat
sruffd = \drummode { \drumgrace{ d16[ g g] }} % right Swiss Ruff
sruffd = \drummode { \drumgrace{ d16[\startGroup g g] }} % with start repeat