Added Rimshot symbol and use of `\rimshot`
This commit is contained in:
Eric Teunis de Boone 2018-01-17 01:32:47 +01:00
parent 2f474e8b9b
commit c5224ea9b6
3 changed files with 15 additions and 19 deletions

View File

@ -31,11 +31,11 @@ dragg = \drummode { \drumgrace { d16[ d] } } % Drag left
dragddr = \drummode { \drumgrace { g16[\dr g] } } % Drag right with start repeat dragddr = \drummode { \drumgrace { g16[\dr g] } } % Drag right with start repeat
draggdr = \drummode { \drumgrace { d16[\dr d] } } % Drag left with start repeat draggdr = \drummode { \drumgrace { d16[\dr d] } } % Drag left with start repeat
% Open Drags % open drags
odragd = \drummode { \drumgrace { g16[ <>^"o" g] } } % Open Drag right odragd = \drummode { \drumgrace { << { g16[ g] } { s32 s32^\markup { \musicglyph #"scripts.open" } } >> } } % Open Drag right
odragg = \drummode { \drumgrace { d16[ <>^"o" d] } } % Open Drag left odragg = \drummode { \drumgrace { << { d16[ d] } { s32 s32^\markup { \musicglyph #"scripts.open" } } >> } } % Open Drag left
odragddr = \drummode { \drumgrace { g16[\dr <>^"o" g] } } % Open Drag right with start repeat odragddr = \drummode { \drumgrace { << { d16[\dr d] } { s32 s32^\markup { \musicglyph #"scripts.open" } } >> } } % Open Drag right with start repeat
odraggdr = \drummode { \drumgrace { d16[\dr <>^"o" d] } } % Open Drag left with start repeat odraggdr = \drummode { \drumgrace { << { g16[\dr g] } { s32 s32^\markup { \musicglyph #"scripts.open" } } >> } } % Open Drag left with start repeat
% Ruff % Ruff
ruffg = \drummode { \drumgrace { g16[ d g] } } % Ruff right ruffg = \drummode { \drumgrace { g16[ d g] } } % Ruff right
@ -64,7 +64,7 @@ sruffddr = \drummode { \drumgrace { d16[\dr g g] } } % Swiss Ruff left with sta
#{ $right #}) #{ $right #})
% print the note, else it won't show up % print the note, else it won't show up
$note #note
#} #}
) )
) )

View File

@ -2,7 +2,7 @@
% Rehearsal Marks % % Rehearsal Marks %
% ================================================= % % ================================================= %
#(newline) #(newline)
#(display "Midi Support loaded") #(display "Rehearsal Marks loaded")
% From Svenax's bagpipemusic % From Svenax's bagpipemusic
markText = #(define-music-function (parser location text) (string?) #{ markText = #(define-music-function (parser location text) (string?) #{
\once \override Score.RehearsalMark #'self-alignment-X = #LEFT \once \override Score.RehearsalMark #'self-alignment-X = #LEFT
@ -29,4 +29,4 @@ altBracket = #(define-music-function (parser location tag) (string?) #{
% Short al fine's and stuff % Short al fine's and stuff
dacapoalfine = {\markTextEol "D.C. al fine" } dacapoalfine = {\markTextEol "D.C. al fine" }
fine = {\markTextEol "Fine" }

View File

@ -6,7 +6,7 @@ backstick = #(define-music-function (parser location notes) (ly:music?)
#{ #{
\temporary \override Staff.NoteHead.style = #'triangle \temporary \override Staff.NoteHead.style = #'triangle
\temporary \override Staff.NoteHead.font-size = #1.2 \temporary \override Staff.NoteHead.font-size = #1.2
$notes #notes
\revert Staff.NoteHead.font-size \revert Staff.NoteHead.font-size
\revert Staff.NoteHead.style \revert Staff.NoteHead.style
#}) #})
@ -14,21 +14,17 @@ crossstick = #(define-music-function (parser location notes) (ly:music?)
#{ #{
\temporary \override Staff.NoteHead.style = #'xcircle \temporary \override Staff.NoteHead.style = #'xcircle
\temporary \override Staff.NoteHead.font-size = #1.2 \temporary \override Staff.NoteHead.font-size = #1.2
$notes #notes
\revert Staff.NoteHead.font-size \revert Staff.NoteHead.font-size
\revert Staff.NoteHead.style \revert Staff.NoteHead.style
#}) #})
rimshot = #(define-music-function (parser location notes) (ly:music?) rimshot = #(define-music-function (parser location notes) (ly:music?)
#{ #{
\temporary \override Staff.NoteHead.font-size = #1.2 \temporary \override Staff.NoteHead.font-size = #1.2
%\temporary \override Staff.NoteHead.stencil = #ly:text-interface::print \temporary \override Staff.NoteHead.stencil = #ly:text-interface::print
%\temporary \override Staff.NoteHead.text = \markup { \temporary \override Staff.NoteHead.text = \markup { \musicglyph #"scripts.halfopen" }
% \combine #notes
% \halign #-0.7 \draw-circle #0.85 #0.2 ##f \revert Staff.NoteHead.stencil
% \musicglyph #"noteheads.normal" \revert Staff.NoteHead.text
%}
$notes
%\revert Staff.NoteHead.stencil
%\revert Staff.NoteHead.text
\revert Staff.NoteHead.font-size \revert Staff.NoteHead.font-size
#}) #})