On 10/9/2017 2:11 PM, ptoye wrote:
OK Ben, here's very hurriedly scan of the offending bar. You'll probably have
to view it at a distance as the pixels are a bit too visible. Score1.pdf
<http://lilypond.1069038.n5.nabble.com/file/t4036/Score1.pdf>
Hi Peter,
I think this will work for you if you just play with the values for the
tie curves. :) Good luck!
(see attached)
\version "2.19.52"
\language "english"
#(define ((alter-lv-tie-curve offsets) grob)
(let ((coords (ly:semi-tie::calc-control-points grob)))
(define (add-offsets coords offsets)
(if (null? coords)
'()
(cons
(cons (+ (caar coords) (car offsets))
(+ (cdar coords) (cadr offsets)))
(add-offsets (cdr coords) (cddr offsets)))))
(add-offsets coords offsets)))
xlv = \override LaissezVibrerTie #'before-line-breaking = #(lambda (grob)
(set! (ly:grob-property grob 'control-points)
(if (= UP (ly:grob-property grob 'direction))
((alter-lv-tie-curve '(0 0 0.75 0.7 2.25 0.7 3 0)) grob)
((alter-lv-tie-curve '(0 0 0.75 -0.7 2.25 -0.7 3 0)) grob))))
\score
{
{
\tuplet 3/2 { \override Stem.direction = #DOWN \xlv e'!2( cs''
gs'')\laissezVibrer }
\hide NoteHead \hide Stem g''2 g'' \bar
"|."
}
}
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user
