2 key-reg.cc -- implement Key_engraver
4 source file of the GNU LilyPond music typesetter
6 (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
9 Todo: key undo, special keys.
12 #include "key-grav.hh"
13 #include "key-item.hh"
14 #include "command-request.hh"
15 #include "local-key-grav.hh"
16 #include "musical-request.hh"
17 #include "local-key-item.hh"
19 #include "time-description.hh"
21 Key_engraver::Key_engraver()
24 do_post_move_processing();
28 Key_engraver::create_key()
33 Staff_info inf = get_staff_info();
34 if (inf.c0_position_i_l_)
35 c0_i = *get_staff_info().c0_position_i_l_;
37 kit_p_ = new Key_item(c0_i);
38 announce_element(Score_elem_info(kit_p_,keyreq_l_));
44 Key_engraver::do_try_request(Request * req_l)
46 Command_req* creq_l= req_l->command();
47 if (!creq_l|| !creq_l->keychange())
52 keyreq_l_ = creq_l->keychange();
58 Key_engraver::acknowledge_element(Score_elem_info info)
60 Command_req * r_l = info.req_l_->command() ;
61 if (r_l && r_l->clefchange()) {
63 } else if (info.elem_l_->name() == Bar::static_name()) {
65 default_key_b_ = true;
72 Key_engraver::do_process_requests()
74 if (key_.multi_octave_b_) {
75 assert(false); // TODO .
76 } else if (keyreq_l_) {
82 Key_engraver::do_pre_move_processing()
85 kit_p_->default_b_ = default_key_b_;
86 typeset_element( kit_p_);
94 Key_engraver::read_req(Key_change_req * r)
96 key_.multi_octave_b_ = r->multi_octave_b_;
97 accidental_idx_arr_.clear();
98 for (int i = 0; i < r->melodic_p_arr_.size(); i ++) {
99 Melodic_req * m_l =r->melodic_p_arr_[i];
100 int n_i =m_l->notename_i_;
101 int a_i = m_l->accidental_i_;
102 int o_i = m_l->octave_i_;
103 if (r->multi_octave_b_)
104 key_.set(o_i, n_i, a_i);
107 accidental_idx_arr_.push(n_i);
112 Key_engraver::do_post_move_processing()
115 default_key_b_ = false;
119 IMPLEMENT_IS_TYPE_B1(Key_engraver,Engraver);
120 ADD_THIS_ENGRAVER(Key_engraver);