Hi Janek,
(actually, i believe it would make more sense to fix tie formatting itself).


I think you are right but that isn't an easy task. I was looking for a tweak that is a little more robust because it is now depending on the note spacing. If I use for example ragged-right = ##f the tie is different and the tweak fails.But I suppose there isn't a ultimate tweak that works in all conditions, including transpose.

For now I tweak my tie with the old shape function.

Thanks anyway.

Greetings, Ed
\version "2.18.0"

\include "shapeII-definition.ily"

% ---------------------------------------------------------------
% Tweaks
% ---------------------------------------------------------------
tweakTieColor = \once \override Tie.color = #red
tweakDotColor = \once \override Dots.color = #red

stretchTie = #(define-music-function (parser location x y) (number? number?)
  #{
    \once \shape #`((,(- x) . ,y)(,(- x) . ,y)(,x . ,y)(,x . ,y)) Tie
    \tweakTieColor
  #})
    
stretchTieUpp = \stretchTie #.6 #1
stretchTieUp  = \stretchTie #.6 #.25
stretchTieDn  = \stretchTie #.6 #-.25
squeezTieUp   = \stretchTie #-.6  #.25

% optimalTie = \shapeII #'((0 2)() ()(0 2)) Tie
% optimalSlur = \shapeII #'((h 0 2)) Slur


ignoreDot  = {
  \once \override Dots.Y-extent = #'(-0.1 . 0.1)
  \tweakDotColor }
% ---------------------------------------------------------------


\markup \bold {Default}
{ 
  \time 3/4
  \relative f'' {
    r2 f4 ~
    f2. ~ 
    f4 r g ~
    g2. ~
    g4 r a ~
    a2. ~
    a4 r r
    \break
    r2 b,4 ~
    b2. ~ 
    b4 r c ~
    c2. ~
    c4 r d ~
    d2. ~
    d4 r r
    \break
    r2 e,4 ~
    e2. ~ 
    e4 r f ~
    f2. ~
    f4 r g ~
    g2. ~
    g4 r r
    \break
    r2 b,4 ~
    b2. ~ 
    b4 r c ~
    c2. ~
    c4 r d ~
    d2. ~
    d4 r r
  }
}

\markup \bold {Tweaked}
{ 
  \time 3/4
  \relative f'' {  
    r2 f4 ~ _\markup \tiny {ignore the dot}
    \ignoreDot f2.- ~
    f4 r \stretchTieUp g ~
    \stretchTieUp g2. ~
    g4 r a ~ _\markup \tiny {ignore the dot}
    \ignoreDot a2. ~
    a4 r r
    \break
    r2 \stretchTieUpp b,4 ~
    b2. ~ 
    b4 r c ~
    c2. ~
    c4 r \stretchTieUpp d ~
    d2. ~
    d4 r r
    \break
    r2 e,4 ~
    e2. ~ 
    e4 r \stretchTieDn f ~
    \stretchTieDn f2. ~
    f4 r g ~
    g2. ~
    g4 r r
    \break
    r2 \stretchTieDn b,4 ~
    \stretchTieDn b2. ~ 
    b4 r c ~
    c2. ~
    c4 r \stretchTieDn d ~
    \stretchTieDn d2. ~
    d4 r r
  }
}
%{
\markup \bold {shapeII}
{ 
  \time 3/4
  \relative f'' {  
    r2 f4 ~ _\markup \tiny {ignore the dot}
    \ignoreDot f2.- ~
    f4 r \optimalTie g ~
    \stretchTieUp g2. ~
    g4 r a ~ _\markup \tiny {ignore the dot}
    \ignoreDot a2. ~
    a4 r r
    \break
    r2 \stretchTieUpp b,4 ~
    b2. ~ 
    b4 r c ~
    c2. ~
    c4 r \stretchTieUpp d ~
    d2. ~
    d4 r r
    \break
    r2 e,4 ~
    e2. ~ 
    e4 r \stretchTieDn f ~
    \stretchTieDn f2. ~
    f4 r g ~
    g2. ~
    g4 r r
    \break
    r2 \stretchTieDn b,4 ~
    \stretchTieDn b2. ~ 
    b4 r c ~
    c2. ~
    c4 r \stretchTieDn d ~
    \stretchTieDn d2. ~
    d4 r r
    \break
    r2 b4 ~
    b2. ~ 
    b4 r \squeezTieUp c ~
    \squeezTieUp c2. ~
    c4 r d ~
    d2. ~
    d4 r r
    
  }
}
%}

\paper
{ 
  indent = #0
  ragged-right=##t
}
_______________________________________________
lilypond-user mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/lilypond-user

Reply via email to