Re: Custom glyph articulation [WAS: Creating new articulation (adding to an internal alist) ]

[tisimst]

This worked for me:

%<-------------- SNIP -------------

#(append! default-script-alist

   (list

    `("mon-articulation"

       . (

           (text . ,#{ \markup \essai #})

           (stencil . ,ly:text-interface::print)

           ; any other properties

           (toward-stem-shift-in-column . 0.0)

           (padding . 0.20)

           (avoid-slur . around)

           (direction . ,UP)))))

%<-------------- SNIP -------------

HTH,

Abraham

On Mon, Apr 6, 2015 at 7:13 AM, Schneidy [via Lilypond] <[hidden email]> wrote:

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

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
[hidden email]
https://lists.gnu.org/mailman/listinfo/lilypond-user

~Pierre

---

If you reply to this email, your message will be added to the discussion below:

http://lilypond.1069038.n5.nabble.com/Custom-glyph-articulation-WAS-Creating-new-articulation-adding-to-an-internal-alist-tp174112.html

To start a new topic under User, email [hidden email]
To unsubscribe from Lilypond, click here.
NAML

---

View this message in context: Re: Custom glyph articulation [WAS: Creating new articulation (adding to an internal alist) ]
Sent from the User mailing list archive at Nabble.com.