lily/head-grav.cc

   1 /*
   2   head-grav.cc -- part of GNU LilyPond
   3
   4   (c)  1997--1998 Han-Wen Nienhuys <hanwen@stack.nl>
   5 */
   6
   7 #include "note-head.hh"
   8 #include "head-grav.hh"
   9 #include "paper-def.hh"
  10 #include "musical-request.hh"
  11 #include "dots.hh"
  12
  13 Note_head_engraver::Note_head_engraver()
  14 {
  15   dot_p_=0;
  16   note_p_ = 0;
  17   note_req_l_ =0;
  18 }
  19
  20 bool
  21 Note_head_engraver::do_try_request (Request *req_l)
  22 {
  23   if (note_req_l_)
  24     return false;
  25
  26   if (!(req_l->musical() && req_l->musical ()->note ()))
  27
  28     return false;
  29
  30   note_req_l_=req_l->musical()->rhythmic ();
  31   return true;
  32 }
  33
  34 void
  35 Note_head_engraver::do_process_requests()
  36 {
  37   if (!note_req_l_ || note_p_)
  38     return;
  39
  40   note_p_  = new Note_head;
  41   note_p_->balltype_i_ = note_req_l_->duration_.durlog_i_;
  42   note_p_->dots_i_ = note_req_l_->duration_.dots_i_;
  43   if (note_p_->dots_i_)
  44     {
  45       dot_p_ = new Dots;
  46       note_p_->dots_l_ = dot_p_;
  47       announce_element (Score_elem_info (dot_p_,0));
  48     }
  49
  50   note_p_->position_i_ = note_req_l_->note()->pitch_.steps ();
  51
  52   Staff_info inf = get_staff_info();
  53   if (inf.c0_position_i_l_)
  54     note_p_->position_i_ += *inf.c0_position_i_l_;
  55
  56
  57   Score_elem_info itinf (note_p_,note_req_l_);
  58   announce_element (itinf);
  59 }
  60
  61 void
  62 Note_head_engraver::do_pre_move_processing()
  63 {
  64   if (note_p_)
  65     {
  66       typeset_element (note_p_);
  67       note_p_ = 0;
  68     }
  69   if (dot_p_)
  70     {
  71       typeset_element (dot_p_);
  72       dot_p_ =0;
  73     }
  74 }
  75 void
  76 Note_head_engraver::do_post_move_processing()
  77 {
  78   note_req_l_ = 0;
  79 }
  80
  81
  82 IMPLEMENT_IS_TYPE_B1(Note_head_engraver,Engraver);
  83 ADD_THIS_TRANSLATOR(Note_head_engraver);