-/*
+/*
arpeggio-engraver.cc -- implement Arpeggio_engraver
-
+
source file of the GNU LilyPond music typesetter
-
- (c) 2000 Jan Nieuwenhuizen <janneke@gnu.org>
- */
+
+ (c) 2000--2005 Jan Nieuwenhuizen <janneke@gnu.org>
+*/
#include "engraver.hh"
#include "group-interface.hh"
-#include "item.hh"
-#include "musical-request.hh"
#include "arpeggio.hh"
#include "stem.hh"
-#include "local-key-item.hh"
#include "rhythmic-head.hh"
#include "side-position-interface.hh"
-#include "staff-symbol-referencer.hh"
+#include "note-column.hh"
class Arpeggio_engraver : public Engraver
{
public:
- VIRTUAL_COPY_CONS (Translator);
- Arpeggio_engraver ();
+ TRANSLATOR_DECLARATIONS (Arpeggio_engraver);
protected:
- virtual void acknowledge_element (Score_element_info);
- virtual void process_acknowledged ();
- virtual void do_pre_move_processing ();
- virtual bool do_try_music (Music *);
-
+ virtual void acknowledge_grob (Grob_info);
+ virtual void process_music ();
+ virtual void stop_translation_timestep ();
+ virtual bool try_music (Music *);
private:
- Item* arpeggio_;
- Arpeggio_req *arpeggio_req_;
- Link_array <Score_element> stems_;
- Link_array<Score_element> supports_;
+ Item *arpeggio_;
+ Music *arpeggio_req_;
};
Arpeggio_engraver::Arpeggio_engraver ()
}
bool
-Arpeggio_engraver::do_try_music (Music* m)
+Arpeggio_engraver::try_music (Music *m)
{
if (!arpeggio_req_)
{
- if (Arpeggio_req *a = dynamic_cast<Arpeggio_req*> (m))
- {
- arpeggio_req_ = a;
- return true;
- }
+ arpeggio_req_ = m;
}
- return false;
+ return true;
}
void
-Arpeggio_engraver::acknowledge_element (Score_element_info info)
+Arpeggio_engraver::acknowledge_grob (Grob_info info)
{
- if (arpeggio_req_)
+ if (arpeggio_)
{
- if (Stem::has_interface (info.elem_l_))
+ if (Stem::has_interface (info.grob_))
+ {
+ if (!arpeggio_->get_parent (Y_AXIS))
+ arpeggio_->set_parent (info.grob_, Y_AXIS);
+
+ Pointer_group_interface::add_grob (arpeggio_,
+ ly_symbol2scm ("stems"),
+ info.grob_);
+ }
+
+ /*
+ We can't catch local key items (accidentals) from Voice context,
+ see Local_key_engraver
+ */
+ else if (Rhythmic_head::has_interface (info.grob_))
{
- stems_.push (info.elem_l_);
+ Side_position_interface::add_support (arpeggio_, info.grob_);
}
- else if (Rhythmic_head::has_interface (info.elem_l_)
- || Local_key_item::has_interface (info.elem_l_))
+ else if (Note_column::has_interface (info.grob_))
{
- supports_.push (info.elem_l_);
+ info.grob_->set_property ("arpeggio", arpeggio_->self_scm ());
}
}
}
void
-Arpeggio_engraver::process_acknowledged ()
+Arpeggio_engraver::process_music ()
{
- if (!arpeggio_ && !stems_.empty ())
+ if (arpeggio_req_)
{
- arpeggio_ = new Item (get_property ("Arpeggio"));
- arpeggio_->set_parent (stems_[0], Y_AXIS);
- Side_position::set_axis (arpeggio_, X_AXIS);
- Side_position::set_direction (arpeggio_, LEFT);
- Staff_symbol_referencer::set_interface (arpeggio_);
- Pointer_group_interface pgi (arpeggio_, "stems");
- for (int i = 0; i < stems_.size (); i++)
- {
- pgi.add_element (stems_[i]);
- //Side_position::add_support (arpeggio_, stems_[i]);
- }
- for (int i = 0; i < supports_.size (); i++)
- {
- ;//Side_position::add_support (arpeggio_, supports_[i]);
- }
- announce_element (arpeggio_, arpeggio_req_);
+ arpeggio_ = make_item ("Arpeggio", arpeggio_req_->self_scm ());
}
}
void
-Arpeggio_engraver::do_pre_move_processing ()
+Arpeggio_engraver::stop_translation_timestep ()
{
- if (arpeggio_)
- {
- typeset_element (arpeggio_);
- arpeggio_ = 0;
- }
+ arpeggio_ = 0;
arpeggio_req_ = 0;
- stems_.clear ();
- supports_.clear ();
}
-
-ADD_THIS_TRANSLATOR (Arpeggio_engraver);
-
+ADD_TRANSLATOR (Arpeggio_engraver,
+ /* descr */ "Generate an Arpeggio from a Arpeggio_req",
+ /* creats*/ "Arpeggio",
+ /* accepts */ "arpeggio-event",
+ /* acks */ "stem-interface rhythmic-head-interface note-column-interface",
+ /* reads */ "",
+ /* write */ "");