lily/local-key-grav.cc

   1 /*
   2   local-key-reg.cc -- implement Local_key_engraver
   3
   4   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   5 */
   6
   7 #include "musical-request.hh"
   8 #include "command-request.hh"
   9 #include "local-key-grav.hh"
  10 #include "local-key-item.hh"
  11 #include "key-grav.hh"
  12 #include "debug.hh"
  13 #include "key-item.hh"
  14 #include "tie.hh"
  15 #include "note-head.hh"
  16 #include "time-description.hh"
  17
  18 Local_key_engraver::Local_key_engraver()
  19 {
  20     key_C_ = 0;
  21 }
  22
  23 void
  24 Local_key_engraver::do_pre_move_processing()
  25 {
  26     Local_key_item *key_item_p = 0;
  27     if (mel_l_arr_.size()) {
  28         for (int i=0; i  < mel_l_arr_.size(); i++) {
  29             Item * support_l = support_l_arr_[i];
  30             Note_req * note_l = mel_l_arr_[i];
  31
  32             if (tied_l_arr_.find_l(support_l) &&
  33                 !note_l->forceacc_b_)
  34                 continue;
  35
  36             if( !note_l->forceacc_b_ &&
  37                 local_key_.oct(note_l->octave_i_).acc(note_l->notename_i_)
  38                 == note_l->accidental_i_)
  39                 continue;
  40
  41
  42
  43             if (!key_item_p)
  44                 key_item_p = new Local_key_item(*get_staff_info().c0_position_i_l_);
  45             key_item_p->add(note_l);
  46             key_item_p->add_support(support_l);
  47             local_key_.oct(note_l->octave_i_)
  48                 .set(note_l->notename_i_, note_l->accidental_i_);
  49         }
  50
  51     }
  52     if (key_item_p) {
  53         for(int i=0; i < support_l_arr_.size(); i++)
  54             key_item_p->add_support(support_l_arr_[i]);
  55
  56         announce_element(Score_elem_info(key_item_p, 0)); // ugh ugh ugh
  57         typeset_element(key_item_p);
  58     }
  59
  60     mel_l_arr_.set_size(0);
  61     tied_l_arr_.set_size(0);
  62     support_l_arr_.set_size(0);
  63     forced_l_arr_.set_size(0);
  64 }
  65
  66 void
  67 Local_key_engraver::acknowledge_element(Score_elem_info info)
  68 {
  69     Score_elem * elem_l = info.elem_l_;
  70     if (info.req_l_->musical() && info.req_l_->musical()->note()) {
  71         Note_req * note_l = info.req_l_->musical()->note();
  72         Item * item_l = info.elem_l_->item();
  73
  74         mel_l_arr_.push(note_l );
  75         support_l_arr_.push(item_l);
  76
  77     } else if (info.req_l_->command()
  78                && info.req_l_->command()->keychange()) {
  79         Key_engraver * key_grav_l =
  80             (Key_engraver*)info.origin_grav_l_arr_[0];
  81         key_C_ = &key_grav_l->key_;
  82         local_key_ = *key_C_;
  83     } else if (elem_l->name() == Key_item::static_name()) {
  84         Key_engraver * key_grav_l =
  85             (Key_engraver*)info.origin_grav_l_arr_[0];
  86         key_C_ = &key_grav_l->key_;
  87     } else if (elem_l->name() == Tie::static_name()) {
  88         Tie * tie_l = (Tie*)elem_l->spanner();
  89         if (tie_l->same_pitch_b_)
  90             tied_l_arr_.push(tie_l-> right_head_l_ );
  91     }
  92 }
  93
  94 void
  95 Local_key_engraver::do_process_requests()
  96 {
  97     Time_description const * time_C_ = get_staff_info().time_C_;
  98     if (! time_C_->whole_in_measure_){
  99         if (key_C_)
 100             local_key_= *key_C_;
 101         else if(0&& time_C_->when_ >Moment(0))
 102             warning ("Help me! can't figure out current key");
 103     }
 104 }
 105
 106
 107 IMPLEMENT_IS_TYPE_B1(Local_key_engraver,Engraver);
 108 ADD_THIS_ENGRAVER(Local_key_engraver);