David,

did you notice Harm's pointed the elegant way I was looking for ?
Addapted to your code it goes :

\version "2.19.13"

parentGrace = #(define-music-function (parser loc myGrace ) (ly:music?)
#{
  \once \override NoteHead.X-offset = #-.5
  \once \omit Staff.Flag
  \once \omit Staff.Stem
  \once \override ParenthesesItem.font-size = #-1
  \once \override ParenthesesItem.stencil = #(lambda (grob)
       (let* ((acc (ly:grob-object (ly:grob-parent grob Y)
'accidental-grob))
              (dot (ly:grob-object (ly:grob-parent grob Y) 'dot)))
         (if (not (null? acc)) (ly:pointer-group-interface::add-grob grob
'elements acc))
         (if (not (null? dot)) (ly:pointer-group-interface::add-grob grob
'elements dot))
         (parentheses-item::print grob)))
  \parenthesize $myGrace
#})

{
  \clef "altovarC"
  \pitchedTrill c2\startTrillSpan
   -\tweak minimum-length #10
  -\tweak springs-and-rods #ly:spanner::set-spacing-rods
  -\tweak bound-details.left.Y #-3.25
  -\tweak bound-details.right.Y #-2.75
  -\tweak bound-details.left.padding #3.5
  -\tweak bound-details.right.padding #.8
  \glissando ~ des
  \grace {  \parentGrace d8 }
  c8\stopTrillSpan r8
}

Thank you Harm ;)
Cheers,
Pierre

2015-01-23 10:55 GMT+01:00 David Stephen Grant <da...@davidgrant.no>:

> Thanks Pierre,
> This seems to work perfectly in the score I'm working on.
> All the best,
> David
>
> On 23 January 2015 at 10:26, Pierre Perol-Schneider <
> pierre.schneider.pa...@gmail.com> wrote:
>
>> Hi David,
>>
>> my first idea was to change the grace note head stencil but, for some
>> reason, I cannot change the ledger lin length:
>>
>> parentGrace = {
>>   \once\omit Flag
>>   \once\omit Stem
>>   \once\omit Accidental
>>   \once\override NoteHead.stencil = #(lambda (grob)
>>                                   (grob-interpret-markup grob
>>                                     #{
>>                                       \markup\concat\fontsize #-1  {
>>                                         \musicglyph
>> #"accidentals.leftparen"
>>                                         \hspace #.3
>>                                         \musicglyph #"accidentals.natural"
>>                                         \hspace #.2
>>                                         \musicglyph #"noteheads.s2"
>>                                         \hspace #.2
>>                                         \musicglyph
>> #"accidentals.rightparen"
>>                                       }
>>                                     #}
>>                                     ))
>> }
>>
>> {
>>   \clef "altovarC"
>>   %{
>>     \once \override Glissando.minimum-length = #10
>>     \once \override Glissando.springs-and-rods =
>> #ly:spanner::set-spacing-rods
>>     \once \override Glissando.bound-details.left.Y = #-3.25
>>     \once \override Glissando.bound-details.right.Y = #-2.75
>>     \once \override Glissando.bound-details.left.padding = #3.5
>>     \once \override Glissando.bound-details.right.padding = #.8
>>   %}
>>   \pitchedTrill c2\startTrillSpan
>>   %% shorter syntax:
>>   %-\tweak minimum-length #8 % <= for a similar note to note distance
>>   -\tweak minimum-length #10
>>   -\tweak springs-and-rods #ly:spanner::set-spacing-rods
>>   -\tweak bound-details.left.Y #-3.25
>>   -\tweak bound-details.right.Y #-2.75
>>   -\tweak bound-details.left.padding #3.5
>>   -\tweak bound-details.right.padding #.8
>>   \glissando ~ des
>>   \parentGrace
>>   \grace { d8 }
>>   c8\stopTrillSpan r8
>> }
>>
>> So I finally change my mind for grace's accidental :
>>
>> parentAccidental = {
>>   \once\omit Flag
>>   \once\omit Stem
>>   \once\override NoteHead.X-offset = #-.5
>>   \once\override Accidental.extra-offset = #'(1.9 . 0)
>>   \once\override Accidental.stencil = #(lambda (grob)
>>                                   (grob-interpret-markup grob
>>                                     #{
>>                                       \markup\concat  {
>>                                         \musicglyph
>> #"accidentals.leftparen"
>>                                         \hspace #.3
>>                                         \musicglyph #"accidentals.natural"
>>                                         \hspace #1.4
>>                                         \musicglyph
>> #"accidentals.rightparen"
>>                                       }
>>                                     #}
>>                                     ))
>> }
>>
>> {
>>   \clef "altovarC"
>>   \pitchedTrill c2\startTrillSpan
>>   -\tweak minimum-length #10
>>   -\tweak springs-and-rods #ly:spanner::set-spacing-rods
>>   -\tweak bound-details.left.Y #-3.25
>>   -\tweak bound-details.right.Y #-2.85
>>   -\tweak bound-details.left.padding #3.5
>>   -\tweak bound-details.right.padding #-1.6
>>   \glissando ~ des
>>   \parentAccidental
>>   \grace { d8 }
>>   c8\stopTrillSpan r8
>> }
>>
>> I bet that some more elegant solutions exist but I don't see any right
>> now.
>>
>> HTH,
>> Pierre
>>
>>
>> 2015-01-23 8:01 GMT+01:00 David Stephen Grant <da...@davidgrant.no>:
>>
>>> Hi list,
>>> I'm trying to create a pitched trill where the parenthesized note
>>> glisses to a new note.
>>> I've got quite close to the notation I'm after, but I can't find a way
>>> to parenthesize the goal note the same way as the pitchedTrill.
>>> \parenthesize doesn't seem to include the accidental, and is in a different
>>> style to pitchedTrill. Any ideas?
>>> Thanks!
>>> Best,
>>> David
>>>
>>> _______________________________________________
>>> lilypond-user mailing list
>>> lilypond-user@gnu.org
>>> https://lists.gnu.org/mailman/listinfo/lilypond-user
>>
>>
_______________________________________________
lilypond-user mailing list
lilypond-user@gnu.org
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to