[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: embedded-ps stencil confusion
From: |
Mark Polesky |
Subject: |
Re: embedded-ps stencil confusion |
Date: |
Sat, 4 Oct 2008 23:31:50 -0700 (PDT) |
On Sat, Oct 4, 2008 at 8:43 PM, Patrick McCarty <address@hidden> wrote:
> Wow, Mark, that is really cool! This should be added to the LSR.
> Would you like me to add it?
Sure! But here's a slightly different version that demonstrates the
concept a little better (I think).
Of course, feel free to make any editorial changes, or whatever.
Thanks,
Mark
-----------------------------------------------------------
\version "2.11.61-1"
parallelogram =
#(ly:make-stencil (list 'embedded-ps
"gsave
currentpoint translate
BeginEPSF
%%BeginDocument:
newpath
0 0.25 moveto
1.3125 0.75 lineto
1.3125 -0.25 lineto
0 -0.75 lineto
closepath
fill
%%EndDocument
EndEPSF
grestore")
(cons 0 1.3125)
(cons 0 0))
myNoteHeads = \override NoteHead #'stencil = \parallelogram
normalNoteHeads = \revert NoteHead #'stencil
\relative {
\myNoteHeads g' d' \normalNoteHeads
<f, \tweak #'stencil \parallelogram b e>
}
embedded-ps_stencil.png
Description: PNG image