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;