]> git.donarmstrong.com Git - lilypond.git/blob - lily/note-heads-engraver.cc
780b6425007d9ab047777b46a80ef058ce58a957
[lilypond.git] / 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;
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           Dots * d = new Dots;
77
78           Staff_symbol_referencer_interface sd (d);
79           sd.set_interface ();
80           
81           note_p->add_dots (d);
82           d->set_elt_property ("dot-count", gh_int2scm (note_req_l->duration_.dots_i_));
83           announce_element (Score_element_info (d,0));
84           dot_p_arr_.push (d);
85         }
86       si.set_position(note_req_l->pitch_.steps ());
87
88       Score_element_info itinf (note_p,note_req_l);
89       announce_element (itinf);
90       note_p_arr_.push (note_p);
91     }
92 }
93  
94 void
95 Note_heads_engraver::do_pre_move_processing()
96 {
97   for (int i=0; i < note_p_arr_.size (); i++)
98     {
99       typeset_element (note_p_arr_[i]);
100     }
101   note_p_arr_.clear ();
102   for (int i=0; i < dot_p_arr_.size (); i++)
103     {
104       typeset_element (dot_p_arr_[i]);
105     }
106   dot_p_arr_.clear ();
107   
108   note_req_l_arr_.clear ();
109 }
110
111
112
113
114 ADD_THIS_TRANSLATOR(Note_heads_engraver);
115