]> git.donarmstrong.com Git - lilypond.git/blob - lily/note-heads-engraver.cc
release: 1.1.58
[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       return true;
25     }
26   if (Tonic_req* t = dynamic_cast<Tonic_req*> (m))
27     {
28       return true;
29     }
30   return false;
31 }
32
33 void
34 Note_heads_engraver::do_process_requests()
35 {
36   if (note_p_arr_.size ())
37     return ;
38   
39   String noteheadstyle = get_property ("noteHeadStyle", 0);
40   for (int i=0; i < note_req_l_arr_.size (); i++)
41     {
42       Note_head *note_p  = new Note_head;
43       Note_req * note_req_l = note_req_l_arr_[i];
44       note_p->balltype_i_ = note_req_l->duration_.durlog_i_;
45       note_p->dots_i_ = note_req_l->duration_.dots_i_;
46       if (note_p->dots_i_)
47         {
48           Dots * d = new Dots;
49           note_p->dots_l_ = d;
50           announce_element (Score_element_info (d,0));
51           dot_p_arr_.push (d);
52         }
53
54       //      note_p->steps_i_ = note_req_l->pitch_.steps ();
55       note_p->position_i_ = note_req_l->pitch_.steps ();
56
57
58       if (noteheadstyle == "transparent")
59         note_p->set_elt_property (transparent_scm_sym, SCM_BOOL_T);
60       else 
61         note_p->set_elt_property (style_scm_sym,
62                                   gh_str02scm (noteheadstyle.ch_C()));
63
64       
65       Score_element_info itinf (note_p,note_req_l);
66       announce_element (itinf);
67       note_p_arr_.push (note_p);
68     }
69 }
70  
71 void
72 Note_heads_engraver::do_pre_move_processing()
73 {
74   for (int i=0; i < note_p_arr_.size (); i++)
75     {
76       typeset_element (note_p_arr_[i]);
77     }
78   note_p_arr_.clear ();
79   for (int i=0; i < dot_p_arr_.size (); i++)
80     {
81       typeset_element (dot_p_arr_[i]);
82     }
83   dot_p_arr_.clear ();
84   
85   note_req_l_arr_.clear ();
86 }
87
88 void
89 Note_heads_engraver::do_post_move_processing()
90 {
91
92 }
93
94
95
96 ADD_THIS_TRANSLATOR(Note_heads_engraver);