lily/note-name-engraver.cc

   1 /*
   2   note-name-engraver.cc --  implement Note_name_engraver
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1999 Han-Wen Nienhuys <hanwen@cs.uu.nl>
   7
   8  */
   9
  10 #include "engraver.hh"
  11 #include "musical-request.hh"
  12 #include "text-item.hh"
  13
  14 class Note_name_engraver : public Engraver
  15 {
  16 public:
  17   VIRTUAL_COPY_CONS(Translator);
  18   Link_array<Note_req> req_l_arr_;
  19   Link_array<Text_item> texts_;
  20   virtual bool  do_try_music (Music*m);
  21   virtual void do_process_requests ();
  22   virtual void do_pre_move_processing ();
  23 };
  24
  25 bool
  26 Note_name_engraver::do_try_music (Music *m)
  27 {
  28   if (Note_req *r = dynamic_cast<Note_req* > (m))
  29     {
  30       req_l_arr_.push (r);
  31       return true;
  32     }
  33   return false;
  34 }
  35
  36
  37 void
  38 Note_name_engraver::do_process_requests ()
  39 {
  40   String s ;
  41   for (int i=0; i < req_l_arr_.size (); i++)
  42     {
  43       if (i)
  44         s += " ";
  45       s += req_l_arr_[i]->pitch_.str ();
  46     }
  47   if (s.length_i())
  48     {
  49       Text_item * t = new Text_item;
  50       t->set_elt_property ("text", ly_str02scm ( s.ch_C()));
  51       announce_element (Score_element_info (t, req_l_arr_[0]));
  52       texts_.push (t);
  53     }
  54 }
  55
  56 void
  57 Note_name_engraver::do_pre_move_processing ()
  58 {
  59   for (int i=0; i < texts_.size (); i++)
  60     {
  61       typeset_element (texts_[i]);
  62     }
  63   texts_.clear() ;
  64   req_l_arr_.clear ();
  65 }
  66
  67 ADD_THIS_TRANSLATOR(Note_name_engraver);