lily/note-heads-engraver.cc

   1 /*
   2   head-grav.cc -- part of GNU LilyPond
   3
   4   (c)  1997--2000 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   5 */
   6
   7 #include "note-head.hh"
   8 #include "note-heads-engraver.hh"
   9 #include "paper-def.hh"
  10 #include "musical-request.hh"
  11 #include "dots.hh"
  12 #include "dot-column.hh"
  13 #include "staff-symbol-referencer.hh"
  14
  15 Note_heads_engraver::Note_heads_engraver()
  16 {
  17 }
  18
  19 bool
  20 Note_heads_engraver::do_try_music (Music *m)
  21 {
  22   if (Note_req * n =dynamic_cast <Note_req *> (m))
  23     {
  24       note_req_l_arr_.push (n);
  25       note_end_mom_  = note_end_mom_ >? now_mom () + m->length_mom ();
  26
  27       return true;
  28     }
  29   else if (Tonic_req* t = dynamic_cast<Tonic_req*> (m))
  30     {
  31       return true;
  32     }
  33   else if (Inversion_req* i = dynamic_cast<Inversion_req*> (m))
  34     {
  35       return true;
  36     }
  37   else if (Bass_req* b = dynamic_cast<Bass_req*> (m))
  38     {
  39       return true;
  40     }
  41   else if (Busy_playing_req * p = dynamic_cast<Busy_playing_req*> (m))
  42     {
  43       return now_mom () < note_end_mom_;
  44     }
  45   else if (Pitch_interrogate_req *p = dynamic_cast<Pitch_interrogate_req*> (m))
  46     {
  47       for (int i= note_req_l_arr_.size (); i--;)
  48         p->pitch_arr_.push (note_req_l_arr_[i]->pitch_); // GUH UGH UGHUGH.
  49       return true;
  50     }
  51   return false;
  52
  53 }
  54
  55 void
  56 Note_heads_engraver::do_process_music()
  57 {
  58   if (note_p_arr_.size ())
  59     return ;
  60
  61   for (int i=0; i < note_req_l_arr_.size (); i++)
  62     {
  63       Note_head *note_p  = new Note_head (get_property ("basicNoteHeadProperties"));
  64
  65       Staff_symbol_referencer_interface si (note_p);
  66       si.set_interface ();
  67
  68
  69       Note_req * note_req_l = note_req_l_arr_[i];
  70
  71       note_p->set_elt_property ("duration-log",
  72                                 gh_int2scm (note_req_l->duration_.durlog_i_ <? 2));
  73
  74       if (note_req_l->duration_.dots_i_)
  75         {
  76            Item * d = new Item (get_property ("basicDotsProperties"));
  77
  78           Staff_symbol_referencer_interface sd (d);
  79           sd.set_interface ();
  80
  81           note_p->add_dots (d);
  82
  83           if (note_req_l->duration_.dots_i_
  84               != gh_scm2int (d->get_elt_property ("dot-count")))
  85             d->set_elt_property ("dot-count", gh_int2scm (note_req_l->duration_.dots_i_));
  86
  87           announce_element (Score_element_info (d,0));
  88           dot_p_arr_.push (d);
  89         }
  90       si.set_position(note_req_l->pitch_.steps ());
  91
  92       Score_element_info itinf (note_p,note_req_l);
  93       announce_element (itinf);
  94       note_p_arr_.push (note_p);
  95     }
  96 }
  97
  98 void
  99 Note_heads_engraver::do_pre_move_processing()
 100 {
 101   for (int i=0; i < note_p_arr_.size (); i++)
 102     {
 103       typeset_element (note_p_arr_[i]);
 104     }
 105   note_p_arr_.clear ();
 106   for (int i=0; i < dot_p_arr_.size (); i++)
 107     {
 108       typeset_element (dot_p_arr_[i]);
 109     }
 110   dot_p_arr_.clear ();
 111
 112   note_req_l_arr_.clear ();
 113 }
 114
 115
 116
 117
 118 ADD_THIS_TRANSLATOR(Note_heads_engraver);
 119