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

[Abraham Lee]

However, in version 2.18.2, I discovered that I had to change the markup definition of essai slightly:

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

\version "2.18.2"

%% Nothing realistic here, 'essai' is just to show something:

essai = 

\markup

\center-align % <--- not needed in latest unstable

\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"

       . (

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

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

           ; any other properties

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

           (padding . 0.30)

           (avoid-slur . around)

           ;(script-priority . 100)

           (direction . ,UP)))))

monArticulation = #(make-articulation "mon-articulation")

{ 

  % this is what happens when treated as

  % a markup with other scripts (notice

  % the order and mis-alignment)

  c'^\essai^>^!

  % this is what happens when treated as

  % a script/articulation with other scripts

  % (alignment is correct and order can

  % be controlled with "script-priority" property)

  c'\monArticulation^>^!

}

\layout {

  \context {

    \Score

    scriptDefinitions = #default-script-alist

  }

}

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

- Abraham

On Mon, Apr 6, 2015 at 11:15 AM, tisimst <address@hidden> wrote:

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.

_______________________________________________
lilypond-user mailing list
address@hidden
https://lists.gnu.org/mailman/listinfo/lilypond-user