]> git.donarmstrong.com Git - lilypond.git/blob - lily/span-arpeggio-engraver.cc
patch::: 1.3.93.jcn2
[lilypond.git] / lily / span-arpeggio-engraver.cc
1 /*
2   span-arpeggio-engraver.cc -- implement Span_arpeggio_engraver
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 2000 Jan Nieuwenhuizen <janneke@gnu.org>
7 */
8
9 #include "engraver.hh"
10 #include "item.hh"
11 #include "arpeggio.hh"
12 #include "span-arpeggio.hh"
13 #include "group-interface.hh"
14
15
16 /** 
17
18   Make arpeggios that span multiple staffs.  Catch arpeggios, and span a
19   Span_arpeggio over them if we find more than two arpeggios.
20   */
21 class Span_arpeggio_engraver : public Engraver
22 {
23 public:
24   VIRTUAL_COPY_CONS (Translator);
25   Span_arpeggio_engraver ();
26
27 protected:
28   virtual void acknowledge_element (Score_element_info);
29   virtual void process_acknowledged ();
30   virtual void do_pre_move_processing ();
31
32 private:
33   Item *span_arpeggio_;
34   Link_array<Score_element> arpeggios_;
35 };
36
37
38 Span_arpeggio_engraver::Span_arpeggio_engraver ()
39 {
40   span_arpeggio_ = 0;
41 }
42
43 void
44 Span_arpeggio_engraver::acknowledge_element (Score_element_info info)
45 {
46   int depth = info.origin_trans_l_arr (this).size ();
47   if (Arpeggio::has_interface (info.elem_l_))
48     //if (info.origin_trans_l_arr (this).size ()
49     //    && Arpeggio::has_interface (info.elem_l_))
50     {
51       arpeggios_.push (info.elem_l_);
52     }
53 }
54
55 void
56 Span_arpeggio_engraver::process_acknowledged ()
57 {
58   if (arpeggios_.size () > 1 && !span_arpeggio_) 
59     {
60       span_arpeggio_ = new Item (get_property ("basicSpanArpeggioProperties"));
61       Pointer_group_interface pgi (span_arpeggio_, "arpeggios");
62       for (int i = 0; i < arpeggios_.size () ; i++)
63         {
64           pgi.add_element (arpeggios_[i]);
65           span_arpeggio_->add_dependency (arpeggios_[i]);
66         }
67       
68       span_arpeggio_->set_parent (arpeggios_[0], Y_AXIS);
69       span_arpeggio_->set_parent (arpeggios_[0], X_AXIS);
70       
71       announce_element (span_arpeggio_, 0);
72     }
73 }
74
75 void
76 Span_arpeggio_engraver::do_pre_move_processing ()
77 {
78   if (span_arpeggio_) 
79     {
80       typeset_element (span_arpeggio_);
81       span_arpeggio_ = 0;
82     }
83   arpeggios_.clear ();
84 }
85
86 ADD_THIS_TRANSLATOR (Span_arpeggio_engraver);
87