kastdeur
/
lilydrum
mirror of https://github.com/kastdeur/lilydrum.git
1
0
Fork 0
Code Issues Releases Activity

Whitespace fix for Special Sticking

This commit is contained in:
Eric Teunis de Boone 2020-07-05 19:49:12 +02:00
parent 42adbf719a
commit f8d879f4cc
1 changed files with 32 additions and 29 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

61
lib/special_sticking.ily
View File

@ -1,30 +1,33 @@
% ================================================= % % ================================================= %
% Side Sticking (modifies note, or adds mark) % % Side Sticking (modifies note, or adds mark) %
% ================================================= % % ================================================= %
% Part of lilydrum % Part of lilydrum
backstick = #(define-music-function (parser location notes) (ly:music?)
#{ backstick = #(define-music-function (parser location notes) (ly:music?)
\temporary \override Staff.NoteHead.style = #'triangle #{
\temporary \override Staff.NoteHead.font-size = #1.2 \temporary \override Voice.NoteHead.style = #'triangle
#notes \temporary \override Voice.NoteHead.font-size = #1.2
\revert Staff.NoteHead.font-size #notes
\revert Staff.NoteHead.style \revert Voice.NoteHead.font-size
#}) \revert Voice.NoteHead.style
crossstick = #(define-music-function (parser location notes) (ly:music?) #})
#{
\temporary \override Staff.NoteHead.style = #'xcircle crossstick = #(define-music-function (parser location notes) (ly:music?)
\temporary \override Staff.NoteHead.font-size = #1.2 #{
#notes \temporary \override Voice.NoteHead.style = #'xcircle
\revert Staff.NoteHead.font-size \temporary \override Voice.NoteHead.font-size = #1.2
\revert Staff.NoteHead.style #notes
#}) \revert Voice.NoteHead.font-size
rimshot = #(define-music-function (parser location notes) (ly:music?) \revert Voice.NoteHead.style
#{ #})
\temporary \override Staff.NoteHead.font-size = #1.2
\temporary \override Staff.NoteHead.stencil = #ly:text-interface::print rimshot = #(define-music-function (parser location notes) (ly:music?)
\temporary \override Staff.NoteHead.text = \markup { \musicglyph #"scripts.halfopen" } #{
#notes \temporary \override Voice.NoteHead.font-size = #1.2
\revert Staff.NoteHead.stencil \temporary \override Voice.NoteHead.stencil = #ly:text-interface::print
\revert Staff.NoteHead.text \temporary \override Voice.NoteHead.text = \markup { \musicglyph #"scripts.halfopen" }
\revert Staff.NoteHead.font-size #notes
#}) \revert Voice.NoteHead.stencil
\revert Voice.NoteHead.text
\revert Voice.NoteHead.font-size
#})