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"
{
head_l_drul_[RIGHT] =0;
head_l_drul_[LEFT] =0;
- same_pitch_b_ =false;
}
/*
ugh: direction of the Tie is more complicated. See [Ross] p136 and further
*/
-void
-Tie::set_default_dir()
+Direction
+Tie::get_default_dir() const
{
int m= (head_l_drul_[LEFT]->position_i_
+ head_l_drul_[RIGHT]->position_i_) /2;
- dir_ = (m < 0)? DOWN : UP;
+ return(m < 0)? DOWN : UP;
}
void
assert (head_l_drul_[LEFT] || head_l_drul_[RIGHT]);
// URG
- Real notewidth = paper ()->note_width () * 0.8;
- Real interline_f = paper ()->interline_f ();
+ Real notewidth = paper_l ()->note_width () * 0.8;
+ Real interline_f = paper_l ()->get_realvar (interline_scm_sym);
/*
[OSU]: slur and tie placement
--> height <= 5 length ?? we use <= 3 length, now...
*/
- Real gap_f = paper ()->get_var ("slur_x_gap");
+ Real gap_f = paper_l ()->get_var ("slur_x_gap");
Direction d = LEFT;
do
do
{
// tie attached to outer notehead
- if (head_l_drul_[d] && head_l_drul_[d]->extremal_i_)
+ if (head_l_drul_[d]
+ && head_l_drul_[d]->remove_elt_property (extremal_scm_sym) != SCM_BOOL_F)
{
if (d == LEFT)
dx_f_drul_[d] += notewidth;
Avoid too steep ties
* slur from notehead to stemend: c''()b''
*/
- Real damp_f = paper ()->get_var ("tie_slope_damping");
+ Real damp_f = paper_l ()->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 () += extent (X_AXIS).length ();
}
void
-Tie::do_substitute_dependency (Score_element*o, Score_element*n)
+Tie::do_substitute_element_pointer (Score_element*o, Score_element*n)
{
Note_head *new_l =n?dynamic_cast<Note_head *> (n):0;
if (dynamic_cast <Item *> (o) == head_l_drul_[LEFT])
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 ();
+ r.distance_f_ = paper_l ()->get_var ("tie_x_minimum");
a.push (r);
return a;
}