]> git.donarmstrong.com Git - lilypond.git/blob - lily/note-heads-engraver.cc
release: 1.2.5
[lilypond.git] / lily / note-heads-engraver.cc
1 /*
2   head-grav.cc -- part of GNU LilyPond
3
4   (c)  1997--1999 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
14 Note_heads_engraver::Note_heads_engraver()
15 {
16 }
17
18 bool
19 Note_heads_engraver::do_try_music (Music *m) 
20 {
21   if (Note_req * n =dynamic_cast <Note_req *> (m))
22     {
23       note_req_l_arr_.push (n);
24       notes_end_pq_.insert (now_mom () + m->length_mom ());
25       
26       return true;
27     }
28   else if (Tonic_req* t = dynamic_cast<Tonic_req*> (m))
29     {
30       return true;
31     }
32   else if (Busy_playing_req * p = dynamic_cast<Busy_playing_req*> (m))
33     {
34       return notes_end_pq_.size ();
35     }
36   return false;
37   
38 }
39
40 void
41 Note_heads_engraver::do_process_requests()
42 {
43   if (note_p_arr_.size ())
44     return ;
45   
46   String noteheadstyle = get_property ("noteHeadStyle", 0);
47   for (int i=0; i < note_req_l_arr_.size (); i++)
48     {
49       Note_head *note_p  = new Note_head;
50       Note_req * note_req_l = note_req_l_arr_[i];
51       note_p->balltype_i_ = note_req_l->duration_.durlog_i_;
52
53       if (note_req_l->duration_.dots_i_)
54         {
55           Dots * d = new Dots;
56           note_p->dots_l_ = d;
57           d->dots_i_ = note_req_l->duration_.dots_i_;
58
59           Scalar dir = get_property ("verticalDirection",0);
60           if (dir.isdir_b())
61             {
62               d->resolve_dir_ = (Direction)(int)dir;
63             }
64           
65           announce_element (Score_element_info (d,0));
66           dot_p_arr_.push (d);
67         }
68       note_p->position_i_  = note_req_l->pitch_.steps ();
69
70       if (noteheadstyle == "transparent")
71         note_p->set_elt_property (transparent_scm_sym, SCM_BOOL_T);
72       else 
73         note_p->set_elt_property (style_scm_sym,
74                                   ly_ch_C_to_scm (noteheadstyle.ch_C()));
75
76       
77       Score_element_info itinf (note_p,note_req_l);
78       announce_element (itinf);
79       note_p_arr_.push (note_p);
80     }
81 }
82  
83 void
84 Note_heads_engraver::do_pre_move_processing()
85 {
86   for (int i=0; i < note_p_arr_.size (); i++)
87     {
88       typeset_element (note_p_arr_[i]);
89     }
90   note_p_arr_.clear ();
91   for (int i=0; i < dot_p_arr_.size (); i++)
92     {
93       typeset_element (dot_p_arr_[i]);
94     }
95   dot_p_arr_.clear ();
96   
97   note_req_l_arr_.clear ();
98 }
99
100 void
101 Note_heads_engraver::do_post_move_processing()
102 {
103   Moment n (now_mom ());
104   while (notes_end_pq_.size () && notes_end_pq_.front () <=n)
105     notes_end_pq_.get ();
106 }
107
108
109
110 ADD_THIS_TRANSLATOR(Note_heads_engraver);