Changed symbol for backsticking

Added TODO for musical_functions
Changed flourish symbol
This commit is contained in:
Eric Teunis de Boone 2017-02-02 17:06:20 +01:00
parent 8c2534337a
commit a555d378d1
5 changed files with 29 additions and 13 deletions

View File

@ -18,14 +18,14 @@ up = ^\markup \center-column {% Arrow-head and line do not line up nicely most o
\draw-line #'(0 . -3) % draw stick \draw-line #'(0 . -3) % draw stick
%} %}
} }
blfy = ^\markup \center-column { &infty; } bfly = ^\markup \center-column { \char ##x221E }
rblfy = ^\markup \center-column { rblfy = ^\markup \center-column {
\line{ \line{
\combine \combine
\arrow-head #X #LEFT ##f \arrow-head #X #LEFT ##f
\draw-line #'(3 . 0 ) \draw-line #'(3 . 0 )
} }
\line { &infy; } \line { \char ##x221E }
} }
rthrow = ^\markup \center-column { rthrow = ^\markup \center-column {

View File

@ -106,3 +106,6 @@ drumPitchNames =
\accepts "PipeBandDrumStaff" \accepts "PipeBandDrumStaff"
} }
} }
% Explicit bar lines (End + Repeat)
#(define-bar-line ".|:-|." "|." ".|:" "|.")

View File

@ -11,10 +11,10 @@ sidePitchTwo = #(ly:make-pitch -2 1 NATURAL)
tenorPitchOne = #(ly:make-pitch -2 3 NATURAL) tenorPitchOne = #(ly:make-pitch -2 3 NATURAL)
tenorPitchTwo = #(ly:make-pitch -2 4 NATURAL) tenorPitchTwo = #(ly:make-pitch -2 4 NATURAL)
tenorPitchThree = #(ly:make-pitch -2 5 NATURAL) tenorPitchThree = #(ly:make-pitch -2 5 NATURAL)%
tenorPitchFour = #(ly:make-pitch -2 6 NATURAL) tenorPitchFour = #(ly:make-pitch -2 6 NATURAL)%
tenorPitchFive = #(ly:make-pitch -1 0 NATURAL) tenorPitchFive = #(ly:make-pitch -1 0 NATURAL)%Seems the nicest
tenorPitchSix = #(ly:make-pitch -1 1 NATURAL) tenorPitchSix = #(ly:make-pitch -1 1 NATURAL)%
tenorPitchSeven = #(ly:make-pitch -2 3 NATURAL) tenorPitchSeven = #(ly:make-pitch -2 3 NATURAL)
tenorPitchEight = #(ly:make-pitch -2 3 NATURAL) tenorPitchEight = #(ly:make-pitch -2 3 NATURAL)
tenorPitchNine = #(ly:make-pitch -2 3 NATURAL) tenorPitchNine = #(ly:make-pitch -2 3 NATURAL)
@ -24,11 +24,16 @@ tenorPitchEleven = #(ly:make-pitch -2 3 NATURAL)
% Default Pitches % Default Pitches
sideDefault = \sidePitchTwo sideDefault = \sidePitchTwo
bassDefault = \bassPitchTwo bassDefault = \bassPitchTwo
tenorDefault = \tenorPitchSeven tenorDefault = \tenorPitchFive
midiDrumPitches.right-hand = \sideDefault midiDrumPitches.right-hand = \sideDefault
midiDrumPitches.left-hand = \sideDefault midiDrumPitches.left-hand = \sideDefault
midiTenor = {
\set midiDrumPitches.right-hand = \tenorDefault
\set midiDrumPitches.left-hand = \tenorDefault
}
\midi { \midi {
\context { \context {
\DrumStaff \DrumStaff

View File

@ -50,9 +50,12 @@ dynLine = #(define-music-function
#}) #})
% unison brackets % unison brackets
% still to add: a little 'u' % TODO: a little 'u'
% TODO: open ended brackets(\odr,\ofr)
dr = #(define-event-function (parser location) () #{ \startGroup #}) dr = #(define-event-function (parser location) () #{ \startGroup #})
fr = #(define-event-function (parser location) () #{ \stopGroup #}) fr = #(define-event-function (parser location) () #{ \stopGroup #})
odr = #(define-event-function (parser location) () #{ \startGroup #})
ofr = #(define-event-function (parser location) () #{ \stopGroup #})
tutti = #(define-event-function (parser location notes) (ly:music?) #{ tutti = #(define-event-function (parser location notes) (ly:music?) #{
\startGroup \startGroup
$notes $notes

View File

@ -4,18 +4,23 @@
% 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 = #'cross \temporary \override Staff.NoteHead.style = #'triangle
$notes \temporary \override Staff.NoteHead.font-size = #1.2
$notes
\revert Staff.NoteHead.font-size
\revert Staff.NoteHead.style \revert Staff.NoteHead.style
#}) #})
crossstick = #(define-music-function (parser location notes) (ly:music?) crossstick = #(define-music-function (parser location notes) (ly:music?)
#{ #{
\temporary \override Staff.NoteHead.style = #'xcircle \temporary \override Staff.NoteHead.style = #'xcircle
$notes \temporary \override Staff.NoteHead.font-size = #1.2
$notes
\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?)
#{ #{
$notes \temporary \override Staff.NoteHead.font-size = #1.2
$notes
\revert Staff.NoteHead.font-size
#}) #})