lily/stem-grav.cc

   1 /*
   2   stem-grav.cc -- implement Stem_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   7 */
   8
   9 #include "stem-grav.hh"
  10 #include "note-head.hh"
  11 #include "stem.hh"
  12 #include "musical-request.hh"
  13 #include "duration-convert.hh"
  14
  15 Stem_engraver::Stem_engraver()
  16 {
  17   stem_p_ =0;
  18   dir_ =CENTER;
  19 }
  20
  21 void
  22 Stem_engraver::acknowledge_element(Score_elem_info i)
  23 {
  24   if (i.elem_l_->is_type_b (Note_head::static_name()))
  25     {
  26       Note_head *h  = (Note_head*) i.elem_l_->item();
  27       if (!stem_p_)
  28         {
  29           Rhythmic_req * r = i.req_l_->musical()->rhythmic();
  30           stem_p_ = new Stem;
  31           stem_p_->flag_i_ = Duration_convert::type2_i(r->duration_.durlog_i_);
  32           announce_element (Score_elem_info (stem_p_, r));
  33         }
  34       stem_p_->add (h);
  35     }
  36 }
  37
  38 void
  39 Stem_engraver::do_pre_move_processing()
  40 {
  41   if (stem_p_)
  42     {
  43       if (dir_)
  44         stem_p_->dir_ = dir_;
  45
  46       typeset_element(stem_p_);
  47       stem_p_ =0;
  48     }
  49 }
  50
  51 void
  52 Stem_engraver::set_feature (Feature i)
  53 {
  54   if (i.type_ == "vdir")
  55     dir_ = (Direction) int(i.value_);
  56 }
  57
  58 IMPLEMENT_IS_TYPE_B1(Stem_engraver, Engraver);
  59 ADD_THIS_ENGRAVER(Stem_engraver);