Hello Pierre,

Not sure I got what you’re after, can this help? Would need to be offset to the 
right, though:

%%%%%%%%%%%%
\version "2.19.17"

myArticulationPath =
#'((moveto    0.58   0.91)
   (curveto   0.58   0.83   0.63   0.80   0.70   0.80)
   (curveto   0.90   0.80   0.87   1.15   1.11   1.28)
   (curveto   0.90   1.29   0.58   1.11   0.58   0.91))

myArticulation =
\markup {
  \scale #'(-2 . -2)
  \override #'(filled . #t)
  \path #0.01 #myArticulationPath
}

{
  c'^\myArticulation
}
%%%%%%%%%%%%

> Le 6 avr. 2015 à 15:42, Pierre Perol-Schneider 
> <[email protected]> a écrit :
> 
> Hi Urs,
> 
> Tanks for the tip but I'm afraid not. Actually it says:
> "Some extensions that have been made possible through extra glyphs in the 
> Arnold font."
> 
> What I'd like is to avoid using any of the existing or extra glyph, just a 
> custom path drawing.
> 
> Cheers,
> Pierre
> 
> 2015-04-06 15:24 GMT+02:00 Urs Liska <[email protected] 
> <mailto:[email protected]>>:
> I don't know this out of my hat.
> But you may look into my file in openlilylib. It's ly/stylesheets 
> /fonts/arnold-extensions.ily (I think).
> 
> Good luck
> Urs
> 
> Am 6. April 2015 15:12:49 MESZ, schrieb Pierre Perol-Schneider 
> <[email protected] <mailto:[email protected]>>:
> Hi All,
> 
> I've followed this conversation with a lot of interest:
> http://lilypond.1069038.n5.nabble.com/Creating-new-articulation-adding-to-an-internal-alist-td172689.html
>  
> <http://lilypond.1069038.n5.nabble.com/Creating-new-articulation-adding-to-an-internal-alist-td172689.html>
> 
> However, there's something I'm missing.
> I'm trying to put my own glyph into a new articulation script without 
> success: I still have to go through the feta glyph and change the stencil 
> afterward.
> Is there a simple way to avoid this additional workaround ?
> 
> TIA
> Pierre
> 
> %%%% Snippet %%%%
> \version "2.19.2"
> 
> %% Nothing realistic here, 'essai' is just to show something:
> essai = 
> \markup
> \scale #'(-2 . -2)
> \override #'(filled . #t) 
> \path #0.01 
> #'((moveto    0.58   0.91)
>    (curveto   0.58   0.83   0.63   0.80   0.70   0.80)
>    (curveto   0.90   0.80   0.87   1.15   1.11   1.28)
>    (curveto   0.90   1.29   0.58   1.11   0.58   0.91))
> 
> 
> %% New articulation: 
> #(append! default-script-alist
>    (list
>     `("mon-articulation"
>        . (
>            ;; In order to put my own glyph named 'essai'
>            ;; I want to modify this line:
>            (script-stencil . (feta . ("thumb" . "thumb"))) 
>            ; any other properties
>            (toward-stem-shift-in-column . 0.0)
>            (padding . 0.20)
>            (avoid-slur . around)
>            (direction . ,UP)))))
> 
> monArticulation = #(make-articulation "mon-articulation")
> 
> %% workaround to show what I'd like to get:
> monArticulation-workaround = 
>   #(define-event-function 
>      (parser location) 
>      ()
>      #{
>        -\tweak stencil #(lambda 
>                          (grob) 
>                          (grob-interpret-markup grob essai))
>        \monArticulation 
>      #})
> 
> 
> { 
>   c'\monArticulation 
>   c'\monArticulation-workaround
> }
> 
> \layout {
>   \context {
>     \Score
>     scriptDefinitions = #default-script-alist
>   }
> }
> 
> %%%%%%%%%%%%%%%%%%%%%%
> 
> 
> 
> lilypond-user mailing list
> [email protected] <mailto:[email protected]>
> https://lists.gnu.org/mailman/listinfo/lilypond-user 
> <https://lists.gnu.org/mailman/listinfo/lilypond-user>
> 
> _______________________________________________
> lilypond-user mailing list
> [email protected]
> https://lists.gnu.org/mailman/listinfo/lilypond-user

_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to