2 multi_measure_rest-engraver.cc -- implement Multi_measure_rest_engraver
4 (c) 1998--1999 Jan Nieuwenhuizen <janneke@gnu.org>
5 Han-Wen Nienhuys <hanwen@cs.uu.nl>
9 #include "musical-request.hh"
10 #include "multi-measure-rest.hh"
11 #include "multi-measure-rest-engraver.hh"
12 #include "paper-column.hh"
13 #include "engraver-group-engraver.hh"
14 #include "timing-translator.hh"
16 #include "staff-symbol-referencer.hh"
19 ADD_THIS_TRANSLATOR (Multi_measure_rest_engraver
);
21 Multi_measure_rest_engraver::Multi_measure_rest_engraver ()
24 rest_moments_
[START
] =
25 rest_moments_
[STOP
] =0;
26 multi_measure_req_l_
= 0;
33 Multi_measure_rest_engraver::acknowledge_element (Score_element_info i
)
35 if (Bar
*c
= dynamic_cast<Bar
*> (i
.elem_l_
))
38 mmrest_p_
->add_column (c
);
40 lastrest_p_
->add_column (c
);
45 Multi_measure_rest_engraver::do_try_music (Music
* req_l
)
48 if (Multi_measure_rest_req
*mr
=
49 dynamic_cast<Multi_measure_rest_req
*> (req_l
))
51 else if (Repetitions_req
*rr
=
52 dynamic_cast<Repetitions_req
*> (req_l
))
56 if (multi_measure_req_l_
)
57 if (!multi_measure_req_l_
->equal_b (r
)
58 || rest_moments_
[START
] != now_mom ())
61 multi_measure_req_l_
= r
;
62 rest_moments_
[START
] = now_mom ();
64 rest_moments_
[STOP
] = rest_moments_
[START
] +
65 multi_measure_req_l_
->duration_
.length_mom ();
72 Multi_measure_rest_engraver::do_process_requests ()
74 if (multi_measure_req_l_
&& !mmrest_p_
)
77 Translator
* tr
= daddy_grav_l()->get_simple_translator ("Timing_engraver"); // ugh
78 Timing_translator
* time
= dynamic_cast<Timing_translator
*> (tr
);
80 mmrest_p_
= new Multi_measure_rest
;
81 Staff_symbol_referencer_interface
si (mmrest_p_
);
85 if(dynamic_cast<Repetitions_req
*> (multi_measure_req_l_
))
86 mmrest_p_
->set_elt_property ("alt-symbol",
87 ly_str02scm ("scripts-repeatsign"));
88 announce_element (Score_element_info (mmrest_p_
, multi_measure_req_l_
));
90 = gh_scm2int (time
->get_property ("currentBarNumber", 0));
95 Multi_measure_rest_engraver::do_pre_move_processing ()
97 Moment
now (now_mom ());
98 Translator
* tr
= daddy_grav_l()->get_simple_translator ("Timing_engraver"); // ugh
99 Timing_translator
* time
= dynamic_cast<Timing_translator
*> (tr
);
102 if (mmrest_p_
&& (now
>= rest_moments_
[START
])
103 && !time
->measure_position ()
104 && (scm_ilength (mmrest_p_
->get_elt_property ("columns")) >= 2))
106 typeset_element (mmrest_p_
);
108 must keep mmrest_p_ around to set measures_i_
113 typeset_element (lastrest_p_
);
119 Multi_measure_rest_engraver::do_post_move_processing ()
121 Translator
* tr
= daddy_grav_l()->get_simple_translator ("Timing_engraver"); // ugh
122 Timing_translator
* time
= dynamic_cast<Timing_translator
*> (tr
);
124 Moment
now (now_mom ());
126 if (mmrest_p_
&& !time
->measure_position ())
128 lastrest_p_
= mmrest_p_
;
129 lastrest_p_
->measures_i_
130 = gh_scm2int (time
->get_property ("currentBarNumber", 0)) - start_measure_i_
;
134 if (now
>= rest_moments_
[STOP
])
136 multi_measure_req_l_
= 0;