Hi Aaron,

I tried all three of your solutions and get the same error:

Unsupported SCM value for format: (rmoveto 2.777338 1/2 rcurveto
1.81180552352106 0 5.43541657056318 -1 5.43541657056318 -3/2)

Converting to `document.pdf'...

warning: `(gs -q -dNODISPLAY -dNOSAFER -dNOPAUSE -dBATCH
-dAutoRotatePages=/None -dPrinted=false ./tmp--tmp-1982250)' failed (1)


I appreciate the attempt though. Will keep this in the back of my mind for
future learning; for now will probably just use regular glissando.

-Kyle

On Tue, Oct 27, 2020 at 4:58 AM <lilypond-user-requ...@gnu.org> wrote:

> Send lilypond-user mailing list submissions to
>         lilypond-user@gnu.org
>
> To subscribe or unsubscribe via the World Wide Web, visit
>         https://lists.gnu.org/mailman/listinfo/lilypond-user
> or, via email, send a message with subject or body 'help' to
>         lilypond-user-requ...@gnu.org
>
> You can reach the person managing the list at
>         lilypond-user-ow...@gnu.org
>
> When replying, please edit your Subject line so it is more specific
> than "Re: Contents of lilypond-user digest..."
> Today's Topics:
>
>    1. Re: can bendAfter be made to skip over notes? (Aaron Hill)
>    2. Re: can bendAfter be made to skip over notes? (Aaron Hill)
>    3. Re: can bendAfter be made to skip over notes? (Aaron Hill)
>    4. Problems with Barré (sir.teddy.the.fi...@gmail.com)
>
>
>
> ---------- Forwarded message ----------
> From: Aaron Hill <lilyp...@hillvisions.com>
> To: lilypond-user@gnu.org
> Cc:
> Bcc:
> Date: Mon, 26 Oct 2020 22:54:31 -0700
> Subject: Re: can bendAfter be made to skip over notes?
> On 2020-10-26 7:37 pm, 98123981293 1293812397123 wrote:
> > Hi list,
> >
> > I usually use the following snippet to handle glissandi across hidden
> > noteheads:
> >
> > glissandoSkipOn = {
> >   \override NoteColumn.glissando-skip = ##t
> >   \hide NoteHead
> >   \override Accidental.transparent = ##t
> >   \override NoteHead.no-ledgers = ##t
> > }
> >
> > is it possible to implement something similar for bendAfter? A quick
> > check
> > of the archives did not reveal anything relevant but please link me if
> > this
> > has already been covered. Pic attached with the line as I want it to
> > look
> > in green.
> >
> > Thank you,
> > Kyle
>
> The Glissando_engraver knows to look for glissando-skip, however no such
> logic exists for Bend_engraver.  It would be possible to re-write the
> engraver and introduce a new bend-skip context property, however a
> perhaps simpler option is to change the stencil for a glissando to look
> like a bend:
>
> %%%%
> \version "2.20.0"
>
> bend-glissando-print =
> #(lambda (grob)
>    (let* ((lnh (ly:spanner-bound grob LEFT))
>           (rnh (ly:spanner-bound grob RIGHT))
>           (lsp (ly:grob-staff-position lnh))
>           (rsp (ly:grob-staff-position rnh))
>           (dy (/ (- rsp lsp) 2))
>           (dot (ly:grob-object lnh 'dot))
>           (acc (ly:grob-object rnh 'accidental-grob))
>           (th (* (ly:grob-property grob 'thickness 1)
>                  (ly:output-def-lookup (ly:grob-layout grob)
>                                        'line-thickness)))
>           (pad (ly:grob-property grob 'padding 0.5))
>           (cmx (ly:grob-common-refpoint
>                  (ly:grob-common-refpoint grob lnh X) rnh X))
>           (cmy (ly:grob-common-refpoint grob lnh Y))
>           (lx (+ pad (max (interval-end (ly:generic-bound-extent lnh
> cmx))
>                           (if dot
>                               (interval-end
>                                (ly:grob-robust-relative-extent dot cmx
> X))
>                               (- INFINITY-INT)))))
>           (rx (- (min (interval-start (ly:generic-bound-extent rnh cmx))
>                       (if acc
>                           (interval-start
>                            (ly:grob-robust-relative-extent acc cmx X))
>                           INFINITY-INT))
>                  pad))
>           (dx (- rx lx))
>           (sx (ly:grob-relative-coordinate grob cmx X)))
>      (ly:make-stencil
>        (list 'path th
>          `(quote
>            (rmoveto ,(- lx sx) 0.5
>             rcurveto ,(/ dx 3) 0 ,dx ,(* dy 2/3) ,dx ,dy)))
>        (cons (- lx sx) (- rx sx))
>        (cons (+ 0.5 (min 0 dy)) (+ 0.5 (max 0 dy))))))
>
> bendGlissando =
>    \tweak thickness #2
>    \tweak stencil #bend-glissando-print
>    \glissando
>
> { c''2. \bendGlissando
>    \once \override NoteColumn.glissando-skip = ##t
>    e'4 gis'1 }
> %%%%
>
>
> -- Aaron Hill
>
>
> ---------- Forwarded message ----------
> From: Aaron Hill <lilyp...@hillvisions.com>
> To: lilypond-user@gnu.org
> Cc:
> Bcc:
> Date: Mon, 26 Oct 2020 22:56:41 -0700
> Subject: Re: can bendAfter be made to skip over notes?
> On 2020-10-26 10:54 pm, Aaron Hill wrote:
> > On 2020-10-26 7:37 pm, 98123981293 1293812397123 wrote:
> >> Hi list,
> >>
> >> I usually use the following snippet to handle glissandi across hidden
> >> noteheads:
> >>
> >> glissandoSkipOn = {
> >>   \override NoteColumn.glissando-skip = ##t
> >>   \hide NoteHead
> >>   \override Accidental.transparent = ##t
> >>   \override NoteHead.no-ledgers = ##t
> >> }
> >>
> >> is it possible to implement something similar for bendAfter? A quick
> >> check
> >> of the archives did not reveal anything relevant but please link me if
> >> this
> >> has already been covered. Pic attached with the line as I want it to
> >> look
> >> in green.
> >>
> >> Thank you,
> >> Kyle
> >
> > The Glissando_engraver knows to look for glissando-skip, however no
> > such logic exists for Bend_engraver.  It would be possible to re-write
> > the engraver and introduce a new bend-skip context property, however a
> > perhaps simpler option is to change the stencil for a glissando to
> > look like a bend:
> >
> > [...]
>
> Sorry, I pasted an old version of the code that did not handle the
> vertical alignment properly:
>
> %%%%
> \version "2.20.0"
>
> bend-glissando-print =
> #(lambda (grob)
>    (let* ((lnh (ly:spanner-bound grob LEFT))
>           (rnh (ly:spanner-bound grob RIGHT))
>           (lsp (ly:grob-staff-position lnh))
>           (rsp (ly:grob-staff-position rnh))
>           (dy (/ (- rsp lsp) 2))
>           (dot (ly:grob-object lnh 'dot))
>           (acc (ly:grob-object rnh 'accidental-grob))
>           (th (* (ly:grob-property grob 'thickness 1)
>                  (ly:output-def-lookup (ly:grob-layout grob)
>                                        'line-thickness)))
>           (pad (ly:grob-property grob 'padding 0.5))
>           (cmx (ly:grob-common-refpoint
>                  (ly:grob-common-refpoint grob lnh X) rnh X))
>           (cmy (ly:grob-common-refpoint grob lnh Y))
>           (lx (+ pad (max (interval-end (ly:generic-bound-extent lnh
> cmx))
>                           (if dot
>                               (interval-end
>                                (ly:grob-robust-relative-extent dot cmx
> X))
>                               (- INFINITY-INT)))))
>           (rx (- (min (interval-start (ly:generic-bound-extent rnh cmx))
>                       (if acc
>                           (interval-start
>                            (ly:grob-robust-relative-extent acc cmx X))
>                           INFINITY-INT))
>                  pad))
>           (dx (- rx lx))
>           (sx (ly:grob-relative-coordinate grob cmx X)))
>      (ly:make-stencil
>        (list 'path th
>          `(quote
>            (rmoveto ,(- lx sx) ,(/ lsp 2)
>             rcurveto ,(/ dx 3) 0 ,dx ,(* dy 2/3) ,dx ,dy)))
>        (cons (- lx sx) (- rx sx))
>        (cons (+ (/ lsp 2) (min 0 dy)) (+ 0.5 (max 0 dy))))))
>
> bendGlissando =
>    \tweak thickness #2
>    \tweak stencil #bend-glissando-print
>    \glissando
>
> { c''2. \bendGlissando
>    \once \override NoteColumn.glissando-skip = ##t
>    e'4 gis'1 }
> %%%%
>
> -- Aaron Hill
>
>
>
>
>
> ---------- Forwarded message ----------
> From: Aaron Hill <lilyp...@hillvisions.com>
> To: lilypond-user@gnu.org
> Cc:
> Bcc:
> Date: Mon, 26 Oct 2020 23:01:20 -0700
> Subject: Re: can bendAfter be made to skip over notes?
> On 2020-10-26 10:56 pm, Aaron Hill wrote:
> > On 2020-10-26 10:54 pm, Aaron Hill wrote:
> >> On 2020-10-26 7:37 pm, 98123981293 1293812397123 wrote:
> >>> Hi list,
> >>>
> >>> I usually use the following snippet to handle glissandi across hidden
> >>> noteheads:
> >>>
> >>> glissandoSkipOn = {
> >>>   \override NoteColumn.glissando-skip = ##t
> >>>   \hide NoteHead
> >>>   \override Accidental.transparent = ##t
> >>>   \override NoteHead.no-ledgers = ##t
> >>> }
> >>>
> >>> is it possible to implement something similar for bendAfter? A quick
> >>> check
> >>> of the archives did not reveal anything relevant but please link me
> >>> if this
> >>> has already been covered. Pic attached with the line as I want it to
> >>> look
> >>> in green.
> >>>
> >>> Thank you,
> >>> Kyle
> >>
> >> The Glissando_engraver knows to look for glissando-skip, however no
> >> such logic exists for Bend_engraver.  It would be possible to re-write
> >> the engraver and introduce a new bend-skip context property, however a
> >> perhaps simpler option is to change the stencil for a glissando to
> >> look like a bend:
> >>
> >> [...]
> >
> > Sorry, I pasted an old version of the code that did not handle the
> > vertical alignment properly:
> >
> > [...]
>
> Grr.  I must be getting really tired.  One more attempt and then I give
> up:
>
> %%%%
> \version "2.20.0"
>
> bend-glissando-print =
> #(lambda (grob)
>    (let* ((lnh (ly:spanner-bound grob LEFT))
>           (rnh (ly:spanner-bound grob RIGHT))
>           (lsp (ly:grob-staff-position lnh))
>           (rsp (ly:grob-staff-position rnh))
>           (dy (/ (- rsp lsp) 2))
>           (dot (ly:grob-object lnh 'dot))
>           (acc (ly:grob-object rnh 'accidental-grob))
>           (th (* (ly:grob-property grob 'thickness 1)
>                  (ly:output-def-lookup (ly:grob-layout grob)
>                                        'line-thickness)))
>           (pad (ly:grob-property grob 'padding 0.5))
>           (cmx (ly:grob-common-refpoint
>                  (ly:grob-common-refpoint grob lnh X) rnh X))
>           (cmy (ly:grob-common-refpoint grob lnh Y))
>           (lx (+ pad (max (interval-end (ly:generic-bound-extent lnh
> cmx))
>                           (if dot
>                               (interval-end
>                                (ly:grob-robust-relative-extent dot cmx
> X))
>                               (- INFINITY-INT)))))
>           (rx (- (min (interval-start (ly:generic-bound-extent rnh cmx))
>                       (if acc
>                           (interval-start
>                            (ly:grob-robust-relative-extent acc cmx X))
>                           INFINITY-INT))
>                  pad))
>           (dx (- rx lx))
>           (sx (ly:grob-relative-coordinate grob cmx X)))
>      (ly:make-stencil
>        (list 'path th
>          `(quote
>            (rmoveto ,(- lx sx) ,(/ lsp 2)
>             rcurveto ,(/ dx 3) 0 ,dx ,(* dy 2/3) ,dx ,dy)))
>        (cons (- lx sx) (- rx sx))
>        (cons (+ (/ lsp 2) (min 0 dy)) (+ (/ lsp 2) (max 0 dy))))))
>
> bendGlissando =
>    \tweak thickness #2
>    \tweak stencil #bend-glissando-print
>    \glissando
>
> { c''2. \bendGlissando
>    \once \override NoteColumn.glissando-skip = ##t
>    e'4 gis'1 }
> %%%%
>
>
> -- Aaron Hill
>
>
>
>
>
> ---------- Forwarded message ----------
> From: <sir.teddy.the.fi...@gmail.com>
> To: <lilypond-user@gnu.org>
> Cc:
> Bcc:
> Date: Tue, 27 Oct 2020 09:58:43 +0100
> Subject: Problems with Barré
>
> Hi all,
>
> I’m using this <http://lsr.di.unimi.it/LSR/Item?id=632> barré-function
> from the LSR and I’m trying to make it work when the first note (or the
> last one) is a rest.
>
>
>
> Here’s the code:
>
> %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
>
> \version "2.20.0"
>
> guitbarre =
>
> #(define-music-function (barre location str music) (string? ly:music?)
>
>   (let ((elts (extract-named-music music '(NoteEvent EventChord))))
>
>         (if (pair? elts)
>
>             (let ((first-element (first elts))
>
>                   (last-element (last elts)))
>
>               (set! (ly:music-property first-element 'articulations)
>
>                     (cons (make-music 'TextSpanEvent 'span-direction -1)
>
>                           (ly:music-property first-element
> 'articulations)))
>
>               (set! (ly:music-property last-element 'articulations)
>
>                     (cons (make-music 'TextSpanEvent 'span-direction 1)
>
>                           (ly:music-property last-element
> 'articulations))))))
>
>       #{
>
>           \once \override TextSpanner.font-shape = #'upright
>
>           \once \override TextSpanner.staff-padding = #3
>
>           \once \override TextSpanner.style = #'line
>
>           \once \override TextSpanner.to-barline = ##f
>
>           \once \override TextSpanner.bound-details =
>
>                #`((left
>
>                    (text . ,#{ \markup { \raise #-.5 \concat { \bold {
> #str " " }}} #})
>
>                    (Y . 0)
>
>                    (padding . .25)
>
>                    (attach-dir . -2))
>
>                   (right
>
>                    (text . ,#{ \markup { \draw-line #'( 0 . -1) } #})
>
>                    (Y . 0)
>
>                    (padding . 0.25)
>
>                    (attach-dir . 2)))
>
>          $music
>
>       #})
>
>
>
> \relative c' {
>
>   %1       <-- This one works
>
>   \guitbarre #"VI" { g4 g4 g4 g4 }
>
>
>
>   %2 <-- This one does not
>
>   <<
>
>     \new Voice \guitbarre #"I" {\voiceOne r4 <f' a c>4  4 4}
>
>     \new Voice {\voiceTwo f,1}
>
>   >>
>
> }
>
> %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
>
>
>
> What do I have to change or is there some other trick to make it work?
>
>
>
> Thanks In Advance
> _______________________________________________
> lilypond-user mailing list
> lilypond-user@gnu.org
> https://lists.gnu.org/mailman/listinfo/lilypond-user
>

Reply via email to