1
0
Fork 0
mirror of https://github.com/kastdeur/lilydrum.git synced 2024-12-22 17:23:32 +01:00
lilydrum/lib/special_sticking.ily
2017-05-03 13:16:58 +02:00

34 lines
1.2 KiB
Text

% ================================================= %
% Side Sticking (modifies note, or adds mark) %
% ================================================= %
% Part of lilydrum
backstick = #(define-music-function (parser location notes) (ly:music?)
#{
\temporary \override Staff.NoteHead.style = #'triangle
\temporary \override Staff.NoteHead.font-size = #1.2
$notes
\revert Staff.NoteHead.font-size
\revert Staff.NoteHead.style
#})
crossstick = #(define-music-function (parser location notes) (ly:music?)
#{
\temporary \override Staff.NoteHead.style = #'xcircle
\temporary \override Staff.NoteHead.font-size = #1.2
$notes
\revert Staff.NoteHead.font-size
\revert Staff.NoteHead.style
#})
rimshot = #(define-music-function (parser location notes) (ly:music?)
#{
\temporary \override Staff.NoteHead.font-size = #1.2
%\temporary \override Staff.NoteHead.stencil = #ly:text-interface::print
%\temporary \override Staff.NoteHead.text = \markup {
% \combine
% \halign #-0.7 \draw-circle #0.85 #0.2 ##f
% \musicglyph #"noteheads.normal"
%}
$notes
%\revert Staff.NoteHead.stencil
%\revert Staff.NoteHead.text
\revert Staff.NoteHead.font-size
#})