]> git.donarmstrong.com Git - lilypond.git/blob - lily/arpeggio-engraver.cc
* lily/include/translator.hh (class Translator): remove
[lilypond.git] / lily / arpeggio-engraver.cc
1 /*
2   arpeggio-engraver.cc -- implement Arpeggio_engraver
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 2000--2005 Jan Nieuwenhuizen <janneke@gnu.org>
7 */
8
9 #include "engraver.hh"
10
11 #include "pointer-group-interface.hh"
12 #include "arpeggio.hh"
13 #include "stem.hh"
14 #include "rhythmic-head.hh"
15 #include "side-position-interface.hh"
16 #include "note-column.hh"
17
18 #include "translator.icc"
19
20 class Arpeggio_engraver : public Engraver
21 {
22 public:
23   TRANSLATOR_DECLARATIONS (Arpeggio_engraver);
24
25   void acknowledge_stem (Grob_info);
26   void acknowledge_rhythmic_head (Grob_info);
27   void acknowledge_note_column (Grob_info);
28 protected:
29   void process_music ();
30   void stop_translation_timestep ();
31   virtual bool try_music (Music *);
32 private:
33   Item *arpeggio_;
34   Music *arpeggio_event_;
35 };
36
37 Arpeggio_engraver::Arpeggio_engraver ()
38 {
39   arpeggio_ = 0;
40   arpeggio_event_ = 0;
41 }
42
43 bool
44 Arpeggio_engraver::try_music (Music *m)
45 {
46   if (!arpeggio_event_)
47     {
48       arpeggio_event_ = m;
49     }
50   return true;
51 }
52
53 void
54 Arpeggio_engraver::acknowledge_stem (Grob_info info)
55 {
56   if (arpeggio_)
57     {
58       if (!arpeggio_->get_parent (Y_AXIS))
59         arpeggio_->set_parent (info.grob (), Y_AXIS);
60
61       Pointer_group_interface::add_grob (arpeggio_,
62                                          ly_symbol2scm ("stems"),
63                                          info.grob ());
64     }
65 }
66 void
67 Arpeggio_engraver::acknowledge_rhythmic_head (Grob_info info)
68 {
69   if (arpeggio_)
70
71     /*
72       We can't catch local key items (accidentals) from Voice context,
73       see Local_key_engraver
74     */
75     {
76       Side_position_interface::add_support (arpeggio_, info.grob ());
77     }
78 }
79  
80 void
81 Arpeggio_engraver::acknowledge_note_column (Grob_info info)
82 {
83   if (arpeggio_)
84     {
85       info.grob ()->set_object ("arpeggio", arpeggio_->self_scm ());
86     }
87 }
88
89 void
90 Arpeggio_engraver::process_music ()
91 {
92   if (arpeggio_event_)
93     {
94       arpeggio_ = make_item ("Arpeggio", arpeggio_event_->self_scm ());
95     }
96 }
97
98 void
99 Arpeggio_engraver::stop_translation_timestep ()
100 {
101   arpeggio_ = 0;
102   arpeggio_event_ = 0;
103 }
104
105 ADD_ACKNOWLEDGER(Arpeggio_engraver, stem)
106 ADD_ACKNOWLEDGER(Arpeggio_engraver, rhythmic_head)
107 ADD_ACKNOWLEDGER(Arpeggio_engraver, note_column)
108
109 ADD_TRANSLATOR (Arpeggio_engraver,
110                 /* descr */ "Generate an Arpeggio symbol",
111                 /* creats*/ "Arpeggio",
112                 /* accepts */ "arpeggio-event",
113                 /* reads */ "",
114                 /* write */ "");