]> git.donarmstrong.com Git - lilypond.git/blob - lily/bar-number-grav.cc
release: 0.1.11
[lilypond.git] / lily / bar-number-grav.cc
1 /*
2   bar-number-grav.cc -- implement Bar_number_grav
3
4   source file of the GNU LilyPond music typesetter
5
6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
7 */
8
9
10 #include "bar-number-grav.hh"
11 #include "script.hh"
12 #include "text-def.hh"
13 #include "command-request.hh"
14 #include "bar.hh"
15 #include "time-description.hh"
16
17 Bar_number_grav::Bar_number_grav()
18 {
19   script_p_ =0;
20 }
21
22 static Command_script_req dummy;
23
24 void
25 Bar_number_grav::acknowledge_element (Score_elem_info i)
26 {
27   if (i.origin_grav_l_arr_.size() == 1 &&
28       i.elem_l_->is_type_b (Bar::static_name()) && !script_p_) 
29     {
30       Time_description const * time = get_staff_info().time_C_;
31       if (!time || time->cadenza_b_)
32         return ;
33       
34       script_p_ = new Script;
35       Text_def *td_p =new Text_def;
36       td_p->text_str_ = time->bars_i_;
37
38       script_p_->specs_l_ = td_p;
39       script_p_->breakable_b_ = true;
40       script_p_->dir_ = UP;
41
42       announce_element (Score_elem_info (script_p_, &dummy));
43     }
44 }
45
46 void
47 Bar_number_grav::do_pre_move_processing()
48 {
49   if (script_p_) 
50     {
51       typeset_element (script_p_);
52       script_p_ =0;
53     }
54 }
55
56 IMPLEMENT_IS_TYPE_B1(Bar_number_grav,Engraver);
57 ADD_THIS_ENGRAVER(Bar_number_grav);