lily/command-request.cc

   1 /*
   2   commandrequest.cc -- implement Nonmusical reqs
   3
   4   source file of the GNU LilyPond music typesetter
   5
   6   (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
   7 */
   8
   9 #include "command-request.hh"
  10 #include "debug.hh"
  11 #include "musical-request.hh"
  12
  13 void
  14 Command_script_req::do_print() const
  15 {}
  16 IMPLEMENT_STATIC_NAME(Command_script_req);
  17 IMPLEMENT_STATIC_NAME(Cadenza_req);
  18
  19 void
  20 Cadenza_req::do_print()const
  21 {
  22     mtor << on_b_;
  23 }
  24
  25 Cadenza_req::Cadenza_req(bool b)
  26 {
  27     on_b_ =b;
  28 }
  29 /* *************** */
  30
  31
  32 int
  33 Bar_req::compare(Bar_req const &c1)const
  34 {
  35     return type_str_ == c1.type_str_;
  36 }
  37
  38 IMPLEMENT_STATIC_NAME(Bar_req);
  39
  40 void
  41 Bar_req::do_print() const
  42 {
  43     mtor << type_str_;
  44 }
  45
  46 Bar_req::Bar_req(String s)
  47 {
  48     type_str_ = s;
  49 }
  50
  51 Partial_measure_req::Partial_measure_req(Moment m)
  52 {
  53     duration_ =m;
  54 }
  55 /* *************** */
  56
  57 IMPLEMENT_STATIC_NAME(Timing_req);
  58
  59 void
  60 Timing_req::do_print()const{}
  61
  62 IMPLEMENT_STATIC_NAME(Command_req);
  63
  64 void
  65 Command_req::do_print()const{}
  66 /* *************** */
  67 IMPLEMENT_STATIC_NAME(Barcheck_req);
  68
  69 void
  70 Barcheck_req::do_print() const{}
  71
  72 /* *************** */
  73 IMPLEMENT_STATIC_NAME(Clef_change_req);
  74
  75 void
  76 Clef_change_req::do_print() const
  77 {
  78 #ifndef NPRINT
  79     mtor << clef_str_ ;
  80 #endif
  81 }
  82
  83 Clef_change_req::Clef_change_req(String s)
  84 {
  85     clef_str_ = s;
  86 }
  87 /* *************** */
  88 IMPLEMENT_STATIC_NAME(Group_feature_req);
  89
  90 void
  91 Group_feature_req::do_print() const
  92 {
  93 #ifndef NPRINT
  94     mtor << type_str_ << "=" << value_str_;
  95 #endif
  96 }
  97
  98 IMPLEMENT_STATIC_NAME(Group_change_req);
  99
 100 void
 101 Group_change_req::do_print()const
 102 {
 103 #ifndef NPRINT
 104     mtor << "id : " << newgroup_str_;
 105 #endif
 106 }
 107 /* *************** */
 108 IMPLEMENT_STATIC_NAME(Terminate_voice_req);
 109
 110 void
 111 Terminate_voice_req::do_print()const
 112 {
 113 }
 114
 115 /* *************** */
 116 IMPLEMENT_STATIC_NAME(Partial_measure_req);
 117
 118 void
 119 Partial_measure_req::do_print() const
 120 {
 121     mtor << duration_;
 122 }
 123
 124 IMPLEMENT_STATIC_NAME(Meter_change_req);
 125
 126 void
 127 Meter_change_req::do_print() const
 128 {
 129     mtor << beats_i_ << "/" << one_beat_i_;
 130 }
 131
 132 int
 133 Meter_change_req::compare(Meter_change_req const &m)
 134 {
 135     return m.beats_i_ == beats_i_ && one_beat_i_ == m.one_beat_i_;
 136 }
 137
 138 Meter_change_req::Meter_change_req()
 139 {
 140     beats_i_ = 0;
 141     one_beat_i_ =0;
 142 }
 143
 144 void
 145 Meter_change_req::set(int b,int o)
 146 {
 147     beats_i_=b;
 148     one_beat_i_=o;
 149 }
 150
 151 /* *************** */
 152
 153 IMPLEMENT_STATIC_NAME(Measure_grouping_req);
 154
 155 void
 156 Measure_grouping_req::do_print() const
 157 {
 158     for (int i=0; i < elt_length_arr_.size(); i++) {
 159         mtor << beat_i_arr_[i] <<"*" << elt_length_arr_[i]<<" ";
 160     }
 161 }
 162 /* *************** */
 163
 164 void
 165 Key_change_req::transpose(Melodic_req const & d)const
 166 {
 167     WARN << "don't know how to transpose a key. \n";
 168     for (int i=0; i < melodic_p_arr_.size(); i++) {
 169         melodic_p_arr_[i]->transpose(d);
 170     }
 171 }
 172
 173 IMPLEMENT_STATIC_NAME(Key_change_req);
 174 void
 175 Key_change_req::squash_octaves()
 176 {
 177     for (int i=0; i < melodic_p_arr_.size(); i++) {
 178         melodic_p_arr_[i]->octave_i_ = 0;
 179     }
 180 }
 181
 182 void
 183 Key_change_req::do_print() const
 184 {
 185     for (int i=0; i < melodic_p_arr_.size(); i++) {
 186         melodic_p_arr_[i]->print();
 187     }
 188 }
 189
 190 Key_change_req::Key_change_req()
 191 {
 192         minor_b_ = false;
 193         multi_octave_b_= false;
 194 }
 195
 196 Key_change_req::Key_change_req(Key_change_req const&c)
 197 {
 198         for (int i=0; i < c.melodic_p_arr_.size(); i++)
 199                 melodic_p_arr_.push( c.melodic_p_arr_[i]->clone()->musical()->melodic() );
 200         minor_b_ = c.minor_b_;
 201         multi_octave_b_ = c.multi_octave_b_;
 202 }
 203
 204 Key_change_req::~Key_change_req()
 205 {
 206         for (int i=0; i < melodic_p_arr_.size(); i++)
 207                 delete melodic_p_arr_[i];
 208 }
 209
 210 int
 211 Key_change_req::flats_i()
 212 {
 213         int flats_i = 0;
 214         for ( int i = 0; i < melodic_p_arr_.size(); i++ ) {
 215                 Melodic_req* mel_l = melodic_p_arr_[i]->melodic();
 216                 assert( mel_l );
 217                 if ( mel_l->accidental_i_ < 0 )
 218                         flats_i -= mel_l->accidental_i_;
 219         }
 220         return flats_i;
 221 }
 222
 223 int
 224 Key_change_req::minor_b()
 225 {
 226         return minor_b_;
 227 }
 228
 229 int
 230 Key_change_req::sharps_i()
 231 {
 232         int sharps_i = 0;
 233         for ( int i = 0; i < melodic_p_arr_.size(); i++ ) {
 234                 Melodic_req* mel_l = melodic_p_arr_[i]->melodic();
 235                 assert( mel_l );
 236                 if ( mel_l->accidental_i_ > 0 )
 237                         sharps_i+= mel_l->accidental_i_;
 238         }
 239         return sharps_i;
 240 }
 241