source file of the GNU LilyPond music typesetter
- (c) 1997--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+ (c) 1997--1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
*/
#include "paper-def.hh"
// URG: share code with slur!
assert (head_l_drul_[LEFT] || head_l_drul_[RIGHT]);
- Real notewidth = paper ()->note_width ();
+ // URG
+ Real notewidth = paper ()->note_width () * 0.8;
Real interline_f = paper ()->interline_f ();
- Real tie_min = paper ()->get_var ("tie_x_minimum");
/*
[OSU]: slur and tie placement
// uhm? loose end of tie // tie attached to stem
else
{
- dx_f_drul_[d] = -d * (spanned_drul_[d]->width ().length ()
+ dx_f_drul_[d] = -d * (spanned_drul_[d]->extent (X_AXIS).length ()
-0.5 * notewidth);
}
}
// tie attached to outer notehead
if (!head_l_drul_[d])
{
- if (dx_f_drul_[RIGHT] - dx_f_drul_[LEFT] < tie_min)
- {
- dx_f_drul_[d] -= d * tie_min
- - (dx_f_drul_[RIGHT] - dx_f_drul_[LEFT]);
- dx_f_drul_[d] = dx_f_drul_[(Direction)-d] + d * tie_min;
- }
-
dy_f_drul_[d] = dy_f_drul_[(Direction) -d];
}
}
Real damp_f = paper ()->get_var ("tie_slope_damping");
Offset d_off = Offset (dx_f_drul_[RIGHT] - dx_f_drul_[LEFT],
dy_f_drul_[RIGHT] - dy_f_drul_[LEFT]);
- d_off.x () += width ().length ();
+ d_off.x () += extent (X_AXIS).length ();
Real ratio_f = abs (d_off.y () / d_off.x ());
if (ratio_f > damp_f)
- dy_f_drul_[(Direction)(- dir_ * sign (d_off.y ()))] -=
- dir_ * (damp_f - ratio_f) * d_off.x ();
+ dy_f_drul_[(Direction)(- dir_ * sign (d_off.y ()))] +=
+ dir_ * (ratio_f - damp_f) * d_off.x ();
}
void
head_l_drul_[RIGHT] = new_l;
}
+Interval
+Tie::do_width () const
+{
+ Real min_f = paper ()->get_var ("tie_x_minimum");
+ Interval width_int = Bow::do_width ();
+ return width_int.length () < min_f ? Interval (0, min_f) : width_int;
+}
+
+Array<Rod>
+Tie::get_rods () const
+{
+ Array<Rod> a;
+ Rod r;
+ r.item_l_drul_ = spanned_drul_;
+ r.distance_f_ = do_width ().length ();
+ a.push (r);
+ return a;
+}