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--1998 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7 */
   8
   9 #include "p-col.hh"
  10 #include "vertical-align-engraver.hh"
  11 #include "vertical-align-spanner.hh"
  12 #include "vertical-group-spanner.hh"
  13
  14 Vertical_align_engraver::Vertical_align_engraver()
  15 {
  16   valign_p_ =0;
  17 }
  18
  19 void
  20 Vertical_align_engraver::do_creation_processing()
  21 {
  22   valign_p_ =new Vertical_align_spanner;
  23   valign_p_->set_bounds(LEFT,get_staff_info().command_pcol_l ());
  24   announce_element (Score_element_info (valign_p_ , 0));
  25 }
  26
  27 void
  28 Vertical_align_engraver::do_removal_processing()
  29 {
  30   Scalar dist (get_property ("maxVerticalAlign"));
  31   if (dist.length_i () && dist.isnum_b ())
  32     {
  33       valign_p_->threshold_interval_[BIGGER]  = Real (dist);
  34     }
  35
  36   dist = get_property ("minVerticalAlign");
  37   if (dist.length_i () && dist.isnum_b ())
  38     {
  39       valign_p_->threshold_interval_[SMALLER]  = Real (dist);
  40     }
  41
  42   valign_p_->set_bounds(RIGHT,get_staff_info().command_pcol_l ());
  43   typeset_element (valign_p_);
  44   valign_p_ =0;
  45 }
  46
  47 void
  48 Vertical_align_engraver::acknowledge_element (Score_element_info i)
  49 {
  50   if (i.origin_grav_l_arr_.size() == 1 &&
  51       dynamic_cast<Vertical_group_spanner *> (i.elem_l_) &&
  52       !i.elem_l_->axis_group_l_a_[Y_AXIS])
  53     {
  54       assert (!valign_p_->contains_b (i.elem_l_));
  55
  56       valign_p_->add_element (i.elem_l_);
  57     }
  58 }
  59
  60
  61
  62 ADD_THIS_TRANSLATOR(Vertical_align_engraver);