lily/vertical-align-engraver.cc

   1 /*
   2   vertical-align-grav.cc -- implement Vertical_align_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c)  1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7 */
   8 #include "translator-group.hh"
   9 #include "axis-group-engraver.hh"
  10 #include "paper-column.hh"
  11 #include "vertical-align-engraver.hh"
  12 #include "axis-align-spanner.hh"
  13 #include "axis-group-spanner.hh"
  14 #include "span-bar.hh"
  15
  16 Vertical_align_engraver::Vertical_align_engraver()
  17 {
  18   valign_p_ =0;
  19 }
  20
  21 void
  22 Vertical_align_engraver::do_creation_processing()
  23 {
  24   valign_p_ =new Axis_align_spanner;
  25   valign_p_->set_axis (Y_AXIS);
  26   valign_p_->stacking_dir_ = DOWN;
  27
  28   valign_p_->set_bounds(LEFT,get_staff_info().command_pcol_l ());
  29   announce_element (Score_element_info (valign_p_ , 0));
  30 }
  31
  32 void
  33 Vertical_align_engraver::do_removal_processing()
  34 {
  35   SCM dist (get_property ("maxVerticalAlign", 0));
  36   if (gh_number_p(dist))
  37     {
  38       valign_p_->threshold_interval_[BIGGER]  = gh_scm2double (dist);
  39     }
  40
  41   dist = get_property ("minVerticalAlign", 0);
  42   if (gh_number_p(dist))
  43     {
  44       valign_p_->threshold_interval_[SMALLER]  = gh_scm2double (dist);
  45     }
  46
  47   dist = get_property ("alignmentReference",0);
  48   if (isdir_b (dist))
  49     {
  50       valign_p_->align_dir_ = to_dir (dist);
  51     }
  52   valign_p_->set_bounds(RIGHT,get_staff_info().command_pcol_l ());
  53   typeset_element (valign_p_);
  54   valign_p_ =0;
  55 }
  56
  57
  58 bool
  59 Vertical_align_engraver::qualifies_b (Score_element_info i) const
  60 {
  61   int sz = i.origin_trans_l_arr_.size()  ;
  62
  63
  64   Axis_group_element * elt = dynamic_cast<Axis_group_element *> (i.elem_l_);
  65
  66   return sz > 1 && elt && elt->axes_[0] == Y_AXIS && !elt->parent_l (Y_AXIS);
  67 }
  68
  69 void
  70 Vertical_align_engraver::acknowledge_element (Score_element_info i)
  71 {
  72   if (qualifies_b (i))
  73     {
  74       valign_p_->add_element (i.elem_l_);
  75     }
  76   else if (dynamic_cast<Span_bar*>(i.elem_l_) && i.origin_trans_l_arr_.size ())
  77     {
  78       i.elem_l_->add_dependency (valign_p_);
  79     }
  80 }
  81
  82
  83
  84 ADD_THIS_TRANSLATOR(Vertical_align_engraver);