Herman wrote: > ... an open circle with a line through it. ... > I looked in lilypond if this symbol is available, but > I coudn't find it. Is there a way to generate it?
Yes. Using scheme and postscript, you can generate your own stencil and substitute your stencil in place of the default notehead (see the attached file). \override NoteHead #'stencil = #circSlashStil Although to be honest, I don't know how to make this work in drummode, which (obviously) is a requirement. After glancing at the docs (NR 2.5.1)... http://lilypond.org/doc/v2.12/Documentation/user/lilypond/Common-notation-for-percussion#Custom-percussion-staves ... it looks likeDrumStaff.drumStyleTable expects glyph-names, and I don't know how to make a glyph- name for my stencil. Does anyone know? I think I've done the hardest part, coding the stencil, and the last step ought to be trivial. I just can't figure it out. - Mark
\version "2.12.0"
#(define (circSlashStil grob)
(let* ((line-thickness (ly:staff-symbol-line-thickness grob))
(width (+ line-thickness 1))
(stem-thickness (* line-thickness 1.3))
(radius (/ (- width stem-thickness) 2)))
(ly:grob-set-property! grob 'stencil
(ly:make-stencil (list 'embedded-ps
(string-append "
/line-thickness " (number->string line-thickness) " def
/stem-thickness " (number->string stem-thickness) " def
/radius " (number->string radius) " def
/width " (number->string width) " def
/half-width width 2 div def
/x0 half-width def
/y0 0 def
/x1 width stem-thickness 2 div sub def
/y1 half-width stem-thickness 2 div sub def
/x2 stem-thickness 2 div def
/y2 half-width neg stem-thickness 2 div add def
gsave
currentpoint translate
stem-thickness setlinewidth
newpath
x0 y0 radius 0 360 arc
stroke
newpath
1 setlinecap
x1 y1 moveto
x2 y2 lineto
stroke
grestore"))
(cons 0 width)
(cons 0 0)))))
tomNoteHeads = \override NoteHead #'stencil = #circSlashStil
normalNoteHeads = \revert NoteHead #'stencil
\header { tagline=##f }
\relative c'' {
\stemUp
c16 c c \tomNoteHeads c
c \normalNoteHeads c c \tomNoteHeads a \normalNoteHeads
<\tweak #'stencil #circSlashStil a> c c <\tweak #'stencil #circSlashStil f,>
}
<<attachment: tom-tom_notehead.png>>
_______________________________________________ lilypond-user mailing list lilypond-user@gnu.org http://lists.gnu.org/mailman/listinfo/lilypond-user
