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--1999 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 (SCM_NUMBERP(dist))
  37     {
  38       valign_p_->threshold_interval_[BIGGER]  = gh_scm2double (dist);
  39     }
  40
  41   dist = get_property ("minVerticalAlign", 0);
  42   if (SCM_NUMBERP(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 #if 0
  62   Translator * t =   i.origin_trans_l_arr_[0];
  63 #endif
  64   int sz = i.origin_trans_l_arr_.size()  ;
  65
  66 #if 0
  67   return (sz == 1 && dynamic_cast<Translator_group*> (t))
  68     || (sz == 2 && dynamic_cast<Axis_group_engraver*> (t));
  69 #endif
  70
  71   Axis_group_element * elt = dynamic_cast<Axis_group_element *> (i.elem_l_);
  72
  73   return sz > 1 && elt && elt->axes_[0] == Y_AXIS && !elt->parent_l (Y_AXIS);
  74 }
  75
  76 void
  77 Vertical_align_engraver::acknowledge_element (Score_element_info i)
  78 {
  79   if (qualifies_b (i))
  80     {
  81       valign_p_->add_element (i.elem_l_);
  82     }
  83   else if (dynamic_cast<Span_bar*>(i.elem_l_) && i.origin_trans_l_arr_.size ())
  84     {
  85       i.elem_l_->add_dependency (valign_p_);
  86     }
  87 }
  88
  89
  90
  91 ADD_THIS_TRANSLATOR(Vertical_align_engraver);